--- a/modules/dict.tp	Mon Jul 16 01:22:48 2012 -0700
+++ b/modules/dict.tp	Sun Jul 22 15:10:07 2012 -0700
@@ -42,6 +42,12 @@
 					(els get: idx) val
 				}
 			}
+			
+			foreach <- :l {
+				foreach: els :idx el {
+					l: (el k) (el v)
+				}
+			}
 		}
 	}