From fa967247daae4fec8c42efe73fd16c615b4fb7d5 Mon Sep 17 00:00:00 2001
From: Bruce Hill <bruce@bruce-hill.com>
Date: Wed, 21 Nov 2018 13:56:25 -0800
Subject: Fixed tests to work better with different syntax versions.

---
 core/metaprogramming.nom | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'core/metaprogramming.nom')

diff --git a/core/metaprogramming.nom b/core/metaprogramming.nom
index 67219ac..0223e17 100644
--- a/core/metaprogramming.nom
+++ b/core/metaprogramming.nom
@@ -370,9 +370,10 @@ externally (type of %) means:
 
 test:
     assume ((run "return (2 + 99)") == 101)
-    external %passed = (no)
-    run "external %passed = (yes)"
-    assume %passed
+    %x = 0
+    externally (set to %) means: external %x = %
+    run "set to 1"
+    assume %x == 1
     assume (run \(return \(\(5) + \(5)))) == 10
 (run %nomsu_code) compiles to "run_1_in(\(%nomsu_code as lua expr), _ENV)"
 [compile %block, compiled %block, %block compiled] all compile to "\
-- 
cgit v1.2.3