Mercurial > repos > tabletprog

view samples/private.tp @ 78:abc6f3d644a4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use Boehm-GC for garbage collection. Also make no_impl print on stderr rather than standard in and return a non-zero error code.
author Mike Pavone <pavone@retrodev.com>
date Sun, 15 Jul 2012 18:11:00 -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
	}
}