From b90269e836b72e1ceeacbbac697cd16aa529cd31 Mon Sep 17 00:00:00 2001
From: Hans Bolinder <hasse@erlang.org>
Date: Thu, 28 Mar 2013 10:07:13 +0100
Subject: Fix a bug in the Erlang scanner

The scanner did not crash when a floating point number was encountered
in the input string.
---
 lib/stdlib/src/erl_scan.erl | 1 +
 1 file changed, 1 insertion(+)

(limited to 'lib/stdlib/src/erl_scan.erl')

diff --git a/lib/stdlib/src/erl_scan.erl b/lib/stdlib/src/erl_scan.erl
index 3651f608bc..d988a4d8c7 100644
--- a/lib/stdlib/src/erl_scan.erl
+++ b/lib/stdlib/src/erl_scan.erl
@@ -338,6 +338,7 @@ string_thing(_) -> "string".
 -define(DIGIT(C), C >= $0, C =< $9).
 -define(CHAR(C), is_integer(C), C >= 0).
 -define(UNICODE(C),
+        is_integer(C) andalso
          (C >= 0 andalso C < 16#D800 orelse
           C > 16#DFFF andalso C < 16#FFFE orelse
           C > 16#FFFF andalso C =< 16#10FFFF)).
-- 
cgit v1.2.3