diff options
| author | Arun Isaac | 2024-10-08 01:19:03 +0100 |
|---|---|---|
| committer | Arun Isaac | 2024-10-08 01:19:03 +0100 |
| commit | b304a0949b6c77f4b2a58d0156284472dc2fc36f (patch) | |
| tree | 3e07be553c72fceb4336f79e0860dbb2bc7d5121 | |
| parent | 4359685a37dcbe76abe65a8d8b703ed4622a7a13 (diff) | |
| download | ravanan-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.scm | 2 |
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)))) |