Skip to content

Instantly share code, notes, and snippets.

@mokevnin
Created July 26, 2013 20:23
Show Gist options
  • Select an option

  • Save mokevnin/6091941 to your computer and use it in GitHub Desktop.

Select an option

Save mokevnin/6091941 to your computer and use it in GitHub Desktop.
-module(example).
-export([words_count/1]).
words_count(Str) ->
words_count_ac(Str, outside, 0).
words_count_ac([], _, Acc) ->
Acc;
words_count_ac([Head | Tail], outside, Acc) when Head /= 32 ->
words_count_ac(Tail, inside, Acc + 1);
words_count_ac([Head | Tail], inside, Acc) when Head == 32 ->
words_count_ac(Tail, outside, Acc);
words_count_ac([_ | Tail], States, Acc) ->
words_count_ac(Tail, States, Acc).
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment