stuff
This commit is contained in:
+3
-6
@@ -374,11 +374,8 @@ tokens_from_iolist(S) -> tokens(S).
|
||||
| {error, gsc_err()},
|
||||
Tokens :: [tk()].
|
||||
% @doc
|
||||
% Recursively parse all tokens off the front end of the string. `Rest' is
|
||||
% the first tail of the string for which no token parser succeeds.
|
||||
%
|
||||
% Semantically, `Rest'` being nonempty amounts to the presence of an illegal
|
||||
% character.
|
||||
% Recursively parse all tokens off the front end of the
|
||||
% string.
|
||||
|
||||
tokens(S) ->
|
||||
% defensive normalization
|
||||
@@ -525,7 +522,7 @@ slurp_token(Pos, SrcStr) ->
|
||||
Rest :: string().
|
||||
% @doc
|
||||
% grab a single token off the front of the string according to
|
||||
% `token_shapes_parse_order/0'
|
||||
% `ParseOrder'
|
||||
|
||||
slurp_token_shapes([TokenType | TTs], Pos, SrcStr) ->
|
||||
case slurp_token_of_shape(TokenType, Pos, SrcStr) of
|
||||
|
||||
Reference in New Issue
Block a user