Typo
[packages/base.git] / tests / lex001.stdout
1 "0x3y"
2 [("0x3","y")]
3 [(Number (MkNumber 16 [3]),"y")]
4
5 "0X3abx"
6 [("0X3ab","x")]
7 [(Number (MkNumber 16 [3,10,11]),"x")]
8
9 "0o39y"
10 [("0o3","9y")]
11 [(Number (MkNumber 8 [3]),"9y")]
12
13 "0O334z"
14 [("0O334","z")]
15 [(Number (MkNumber 8 [3,3,4]),"z")]
16
17 "NaN"
18 [("NaN","")]
19 [(Ident "NaN","")]
20
21 "NaNx"
22 [("NaNx","")]
23 [(Ident "NaNx","")]
24
25 "Infinity"
26 [("Infinity","")]
27 [(Ident "Infinity","")]
28
29 "Infinityx"
30 [("Infinityx","")]
31 [(Ident "Infinityx","")]
32
33 "Wibble Foo"
34 [("Wibble"," Foo")]
35 [(Ident "Wibble"," Foo")]
36
37 "Wibble8_+"
38 [("Wibble8_","+")]
39 [(Ident "Wibble8_","+")]
40
41 "34yy"
42 [("34","yy")]
43 [(Number (MkDecimal [3,4] Nothing Nothing),"yy")]
44
45 "34.4x"
46 [("34.4","x")]
47 [(Number (MkDecimal [3,4] (Just [4]) Nothing),"x")]
48
49 "034.4x"
50 [("034.4","x")]
51 [(Number (MkDecimal [0,3,4] (Just [4]) Nothing),"x")]
52
53 "31.45e-6y"
54 [("31.45e-6","y")]
55 [(Number (MkDecimal [3,1] (Just [4,5]) (Just (-6))),"y")]
56
57 "49.2v"
58 [("49.2","v")]
59 [(Number (MkDecimal [4,9] (Just [2]) Nothing),"v")]
60
61 "049.2v"
62 [("049.2","v")]
63 [(Number (MkDecimal [0,4,9] (Just [2]) Nothing),"v")]
64
65 "35e-3x"
66 [("35e-3","x")]
67 [(Number (MkDecimal [3,5] Nothing (Just (-3))),"x")]
68
69 "035e-3x"
70 [("035e-3","x")]
71 [(Number (MkDecimal [0,3,5] Nothing (Just (-3))),"x")]
72
73 "35e+3y"
74 [("35e+3","y")]
75 [(Number (MkDecimal [3,5] Nothing (Just 3)),"y")]
76
77 "83.3e-22"
78 [("83.3e-22","")]
79 [(Number (MkDecimal [8,3] (Just [3]) (Just (-22))),"")]
80
81 "083.3e-22"
82 [("083.3e-22","")]
83 [(Number (MkDecimal [0,8,3] (Just [3]) (Just (-22))),"")]
84