view samples/file.tp @ 366:810b6115c1d4

Add a pop method to array
author Michael Pavone <pavone@retrodev.com>
date Sat, 08 Aug 2015 21:13:26 -0700
parents abe3141caefe
children
line wrap: on
line source

#{
	import: [
		stdin
		stdout
	] from: file
	main <- {
		stdout write: "Hello from the file module!\nWhat's your name?\n"
		name <- (stdin nextLine) trim
		stdout write: "Nice to meet you " . name . ". Here's my source code:\n\n"
		f <- file open: "samples/file.tp"
		foreach: (f lines) :num text {
			print: (string: num+1) . ": " . text
		}
		print: "\n"
		f close
		0
	}
}