git @ Cat's Eye Technologies Bhuna / 63b21c2
Fix some of the example programs. Cat's Eye Technologies 10 years ago
7 changed file(s) with 9 addition(s) and 9 deletion(s). Raw diff Collapse all Expand all
77
88 Ack = ^ M, N {
99 if M = Zero
10 Return N + One
10 return N + One
1111 else if N = Zero
12 Return Ack(M - One, One)
12 return Ack(M - One, One)
1313 else
14 Return Ack(M - One, Ack(M, (N - One)))
14 return Ack(M - One, Ack(M, (N - One)))
1515 }
1616
1717 Num = 7
33 if I > 30
44 Print "*"
55 else
6 Print "."
6 Print "/"
77 I = I + 1
88 }
99 }
00 F = ^ M,N {
1 Print "Hello from F", EoL, M, EoL, N, Eol, "Goodbye from F", EoL
1 Print "Hello from F", EoL, M, EoL, N, EoL, "Goodbye from F", EoL
22 return M + N
33 }
44
00 F = ^{
11 T = 123
2 Return ^{ Return 17 }
2 return ^{ return 17 }
33 }
44
55 Print F, EoL
33 Print "Q is ", Q, EoL
44 }
55 G;
6 Return G
6 return G
77 }
88
99 G = F()
55 G;
66 Q = 23;
77 G;
8 Return G
8 return G
99 }
1010
1111 G = F()
00 F = ^{
11 Q = 17
2 Return ^{ T = 0 Print Q, EoL }
2 return ^{ T = 0 Print Q, EoL }
33 }
44
55 X = 10