aboutsummaryrefslogtreecommitdiffstats
path: root/lib/stdlib/src/erl_scan.erl
diff options
context:
space:
mode:
authorBjörn-Egil Dahlberg <[email protected]>2013-10-01 22:08:14 +0200
committerBjörn-Egil Dahlberg <[email protected]>2014-01-28 15:56:27 +0100
commit226e1e5898058aa3459c4d562df13132c9bc0899 (patch)
treeeee22b111ec343689872e51448b9ba8349fe2767 /lib/stdlib/src/erl_scan.erl
parent60e7d2695dcf8ac2484db87c649ca69f1d0b763c (diff)
downloadotp-226e1e5898058aa3459c4d562df13132c9bc0899.tar.gz
otp-226e1e5898058aa3459c4d562df13132c9bc0899.tar.bz2
otp-226e1e5898058aa3459c4d562df13132c9bc0899.zip
Teach erl_scan to recognize ':='
Diffstat (limited to 'lib/stdlib/src/erl_scan.erl')
-rw-r--r--lib/stdlib/src/erl_scan.erl3
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/stdlib/src/erl_scan.erl b/lib/stdlib/src/erl_scan.erl
index 52376a8f3a..ae59d5f44f 100644
--- a/lib/stdlib/src/erl_scan.erl
+++ b/lib/stdlib/src/erl_scan.erl
@@ -596,6 +596,9 @@ scan1("||"++Cs, St, Line, Col, Toks) ->
tok2(Cs, St, Line, Col, Toks, "||", '||', 2);
scan1("|"=Cs, _St, Line, Col, Toks) ->
{more,{Cs,Col,Toks,Line,[],fun scan/6}};
+%% :=
+scan1(":="++Cs, St, Line, Col, Toks) ->
+ tok2(Cs, St, Line, Col, Toks, ":=", ':=', 2);
%% :-
scan1(":-"++Cs, St, Line, Col, Toks) ->
tok2(Cs, St, Line, Col, Toks, ":-", ':-', 2);