Mercurial > repos > tabletprog

view samples/private.tp @ 200:49bca6487178

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add a save instruction around calls if there are caller-saved registers live at call-time. Fix to2Op for skipIf and save instructions.
author Mike Pavone <pavone@retrodev.com>
date Tue, 27 Aug 2013 23:02:19 -0700
parents cd41f7c22fcd
children
line wrap: on
line source

#{
	makeobj <- {
		foo <- 40
		#{
			bar <- {
				foo
			}
			inc <- {
				foo <- foo + 1
				1
			}
		}
	}
	main <- {
		baz <- makeobj:
		inc: baz
		inc: baz
		bar: baz
	}
}