nerf member_at to prepare for decision dependency and aperture work

[scpubgit/DX.git] / fragments / bind

diff --git a/fragments/bind b/fragments/bind
index d3d9d24..aa85303 100644 (file)
--- a/fragments/bind
+++ b/fragments/bind
@@ -1,7 +1,17 @@
+#trace +step +search
 ?
-is_dict ?X
+dict ?X
 eq ?Y X
 qact
 eq Y {{ foo 1 }}
 qact
 .
+?
+dict ?X {{ foo {{ bar 1 }} }}
+member_at X 'foo' ?Y
+member_at Y 'bar' ?Z
+eq Z 2
+member_at Y 'baz' ?U
+eq U 4
+qact
+.