From 938adbfe446e7f4a4e45b9dd27b5cf2e7ee4070c Mon Sep 17 00:00:00 2001
From: Bruce Hill <bruce@bruce-hill.com>
Date: Wed, 20 Mar 2019 16:16:41 -0700
Subject: Switching more verbose ("Action" tree with "foo" $x) syntax to `(foo
 `$x) when possible

---
 lib/shell/init.nom | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

(limited to 'lib/shell')

diff --git a/lib/shell/init.nom b/lib/shell/init.nom
index 13dc675..be72c9f 100644
--- a/lib/shell/init.nom
+++ b/lib/shell/init.nom
@@ -28,8 +28,5 @@ external:
                     "Command failure: Command `\($cmd)` was terminated by signal \$return"
     
     ### Attach callsite information for better error reporting
-    (=sh $cmd) compiles to
-        ("Action" tree with "at" ("Text" tree with "\($cmd.source)") "=" "sh" $cmd) as lua
-    
-    (sh> $cmd) compiles to
-        ("Action" tree with "at" ("Text" tree with "\($cmd.source)") "sh" ">" $cmd) as lua
\ No newline at end of file
+    (=sh $cmd) compiles to `(at `("Text" tree with "\($cmd.source)") =sh `$cmd)
+    (sh> $cmd) compiles to `(at `("Text" tree with "\($cmd.source)") sh> `$cmd)
-- 
cgit v1.2.3