(
	(
		(call :foo)
	)
	(
		:foo
		;;(esp -= 8)
		;;((mem ebp -8) <- edi)
		(ebx <- 9)
		:start
		(eax <- (print 1))
		(goto :label)
		:label
		(ebx -= 2)
		(cjump 1 < ebx :start :end)
		:end
		;;(edi <- (mem ebp -8))
		;;(esp += 8)
		(return)
	)
) 
