diff options
| author | Hans Bolinder <[email protected]> | 2017-10-25 12:32:14 +0200 |
|---|---|---|
| committer | Hans Bolinder <[email protected]> | 2017-10-25 12:32:14 +0200 |
| commit | 976bd95467a9dcae615a087c431024aabaebe8d6 (patch) | |
| tree | 3b489026a7a3366d987278ccbbe15347c59c100b | |
| parent | 48006b39ea9870845f5804d0250618cfcc027b34 (diff) | |
| parent | 7fb796ab3636af53a7ef659099c1fb9fe37c1957 (diff) | |
| download | otp-976bd95467a9dcae615a087c431024aabaebe8d6.tar.gz otp-976bd95467a9dcae615a087c431024aabaebe8d6.tar.bz2 otp-976bd95467a9dcae615a087c431024aabaebe8d6.zip | |
Merge branch 'maint'
* maint:
parsetools: Fix unused functions warnings in leexinc.hrl
| -rw-r--r-- | lib/parsetools/include/leexinc.hrl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/parsetools/include/leexinc.hrl b/lib/parsetools/include/leexinc.hrl index b4449607cb..2a74c252ff 100644 --- a/lib/parsetools/include/leexinc.hrl +++ b/lib/parsetools/include/leexinc.hrl @@ -272,6 +272,8 @@ skip_cont(Rest, Line, {skip_token,Push}, Error) -> skip_cont(Rest, Line, {error,_S}, Error) -> skip_tokens(yystate(), Rest, Line, Rest, 0, Line, Error, reject, 0). +-compile({nowarn_unused_function, [yyrev/1, yyrev/2, yypre/2, yysuf/2]}). + yyrev(List) -> lists:reverse(List). yyrev(List, Tail) -> lists:reverse(List, Tail). yypre(List, N) -> lists:sublist(List, N). @@ -282,6 +284,8 @@ yysuf(List, N) -> lists:nthtail(N, List). %% Line has been updated with respect to newlines in the prefix of %% Chars consisting of (TokenLength - AcceptLength) characters. +-compile({nowarn_unused_function, adjust_line/4}). + adjust_line(N, N, _Cs, L) -> L; adjust_line(T, A, [$\n|Cs], L) -> adjust_line(T-1, A, Cs, L-1); |