diff options
| author | Björn-Egil Dahlberg <[email protected]> | 2013-10-01 22:08:14 +0200 |
|---|---|---|
| committer | Björn-Egil Dahlberg <[email protected]> | 2014-01-28 15:56:27 +0100 |
| commit | 226e1e5898058aa3459c4d562df13132c9bc0899 (patch) | |
| tree | eee22b111ec343689872e51448b9ba8349fe2767 /lib/stdlib/src/erl_scan.erl | |
| parent | 60e7d2695dcf8ac2484db87c649ca69f1d0b763c (diff) | |
| download | otp-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.erl | 3 |
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); |