summary refs log tree commit diff
path: root/lisc/test/eucl.ssa
blob: fdbca570f6d03e80691bbf3be5b994f77de23133 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
# euclide's algorithm in ssa
# it is a fairly interesting
# ssa program because of the
# swap of b and a

@start

@loop
	%a =w phi @start 380, @loop %r
	%b =w phi @start 747, @loop %a
	%r =w rem %b, %a
	jez %r, @end, @loop

@end
	ret