view samples/osmod.tp @ 206:b4a9d4e405c5

Implemented a simple interpreter to be used for macro expansion and a driver for testing it
author Mike Pavone <pavone@retrodev.com>
date Wed, 23 Oct 2013 19:10:03 -0700
parents f2cda2e6f70e
children d1dc2d70bdfd
line wrap: on
line source

#{
	main <- {
		os write: 1 "hello stdout via POSIX write\n"
		name <- os read: 0 100
		os write: 2 "hello " . name . " via stderr\n"
		file <- os open: "output.txt" (os O_WRONLY) + (os O_CREAT) + (os O_TRUNC) 0b110110110
		os write: file "hello file!\n"
		os close: file
		0
	}
}