aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorHans Bolinder <[email protected]>2017-10-25 12:13:05 +0200
committerHans Bolinder <[email protected]>2017-10-25 12:13:05 +0200
commit7fb796ab3636af53a7ef659099c1fb9fe37c1957 (patch)
tree2c3b3e6b49d63b2950d05d0a32cf63ff6b5b3821
parentb232eb7b2367019164c5ce29a82dae03d455b986 (diff)
parente245c2fcfce63de29e80b3b0379fc92513b3b6a5 (diff)
downloadotp-7fb796ab3636af53a7ef659099c1fb9fe37c1957.tar.gz
otp-7fb796ab3636af53a7ef659099c1fb9fe37c1957.tar.bz2
otp-7fb796ab3636af53a7ef659099c1fb9fe37c1957.zip
Merge branch 'hasse/parsetools/unused_funcs_leexinc/ERL-497/OTP-14697' into maint
* hasse/parsetools/unused_funcs_leexinc/ERL-497/OTP-14697: parsetools: Fix unused functions warnings in leexinc.hrl
-rw-r--r--lib/parsetools/include/leexinc.hrl4
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);