diff samples/reflect.tp @ 266:75dc7161c1ca

Added object module which provides some basic reflection capabilities
author Michael Pavone <pavone@retrodev.com>
date Thu, 17 Jul 2014 23:57:41 -0700
parents
children 123e9468d55e
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/samples/reflect.tp	Thu Jul 17 23:57:41 2014 -0700
@@ -0,0 +1,10 @@
+#{
+	main <- {
+		print: (string: (object does: 42 understand?: "+")) . "\n"
+		print: (string: (object does: 42 understand?: "foobar")) . "\n"
+		foreach: (object understoodBy: 42) :idx el{
+			print: el . "\n"
+		}
+		0
+	}
+}