aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorArun Isaac2024-10-08 01:19:03 +0100
committerArun Isaac2024-10-08 01:19:03 +0100
commitb304a0949b6c77f4b2a58d0156284472dc2fc36f (patch)
tree3e07be553c72fceb4336f79e0860dbb2bc7d5121
parent4359685a37dcbe76abe65a8d8b703ed4622a7a13 (diff)
downloadravanan-b304a0949b6c77f4b2a58d0156284472dc2fc36f.tar.gz
ravanan-b304a0949b6c77f4b2a58d0156284472dc2fc36f.tar.lz
ravanan-b304a0949b6c77f4b2a58d0156284472dc2fc36f.zip
javascript: Reference inputs, self or runtime symbols; not strings.
* ravanan/javascript.scm (evaluate-parameter-reference-1): Reference inputs, self or runtime symbols; not strings.
-rw-r--r--ravanan/javascript.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/ravanan/javascript.scm b/ravanan/javascript.scm
index 47846df..5ee7cc8 100644
--- a/ravanan/javascript.scm
+++ b/ravanan/javascript.scm
@@ -111,7 +111,7 @@ keys @code{\"inputs\"}, @code{\"self\"} and @code{\"runtime\"}.
;; Evaluate immediately.
(apply json-ref context symbol segments)
;; Compile to a G-expression that evaluates expression.
- #~(json-ref #$symbol #$@segments))))
+ #~(json-ref #$(string->symbol symbol) #$@segments))))
;; Perhaps this is a more complex javascript expression.
(#f
(evaluate-using-node expression context expression-lib))))