changeset 94:6735db9b44ba

Fixed my foreach on dict. Added test for it.
author William Morgan <bill@mrgn.org>
date Tue, 24 Jul 2012 01:01:00 -0700
parents 46504d34cb44
children 094227f2f64e
files modules/dict.tp samples/testdict.tp
diffstat 2 files changed, 13 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/modules/dict.tp	Tue Jul 24 00:35:24 2012 -0700
+++ b/modules/dict.tp	Tue Jul 24 01:01:00 2012 -0700
@@ -45,9 +45,10 @@
 			
 			foreach <- :l {
 				foreach: els :idx el {
-					l: (el k) (el v)
+					l: (el key) (el val)
 				}
 			}
+
 		}
 	}
 
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/samples/testdict.tp	Tue Jul 24 01:01:00 2012 -0700
@@ -0,0 +1,11 @@
+#{
+	main <- {
+		foo <- dict linear:
+		foo set: "key1" "val1"
+		foo set: "key2" "val2"
+		foreach: foo :k :v {
+			print: k . ", " . v . "\n"
+		}
+
+	}
+}