forked from rescript-lang/rescript
-
Notifications
You must be signed in to change notification settings - Fork 0
/
alias_test.ml
98 lines (50 loc) · 814 Bytes
/
alias_test.ml
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
let a0 = "hello "
let a1 = a0
let a2 = a1
let a3 = a2
let a4 = a3
let a5 = a4
let a6 = a5
let a7 = a6
let a8 = a7
let a9 = a8
let a10 = a9 ^ "world"
let a11 = a10
let a12 = a11
let a13 = a12
let a14 = a13
let a15 = a14
let a16 = a15
let a17 = a16
let a18 = a17
let a19 = a18
let a20 = a19 ^ "not"
let v = if a20.[0] = 'h' then 1 else 2
let a21 = a20 ^ a20
let a22 = "test " ^ a21 ^ "hello"
let ff () =
"cool " ^ a22
let a23 = ff ()
let b0 = 111
let b1 = b0
let b2 = b1
let b3 = b2
let b4 = b3
let b5 = b4
let b6 = b5
let b7 = b6
let b8 = b7
let b9 = b8
let f x =
b9 + x + b8
let b10 = b9
let b11 = b10
let b12 = b11
let b13 = b12
let b14 = b13
let b15 = b14
let b16 = b15
let b17 = b16
let b18 = b17
let b19 = b18
let b20 = b19 + 1