summaryrefslogtreecommitdiff
path: root/examples/forever.nl
blob: 4216950118f65c2116325ae8923437933f7fa002 (plain)
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
m : int32;
n : int32;
; (m = 21);
(n = 35);
{
    while ((m != 0))
    {
	print 1232341;
	print m;
	
	{
	t : int32; ;
	    (t = m);

	    print 1000;
	    print t;
	    print 1000;
	    print n;

	    
	    (m = (n % m));
	    (n = t);
	}
    }
}

print n;