view samples/oper_impl.tp @ 338:1458c069c715

Added "value" method to option value and option none. It behaves similarly to value:none, except the none case just propagates the none value and the value case wraps the result in an option value
author Michael Pavone <pavone@retrodev.com>
date Sat, 04 Apr 2015 11:54:46 -0700
parents 9820ecd4eed4
children
line wrap: on
line source

#{
	pair <- :a b {
		#{
			first <- a
			second <- b
			+ <- :other {
				pair: first + (other first) second + (other second)
			}
		}
	}

	main <- {
		foo <- pair: 5 7
		bar <- pair: 9 23
		baz <- foo + bar
		print: ((baz first) string) . "\n"
		print: ((baz second) string) . "\n"
		0
	}
}