fix small typo in guilemod

parent 1b96d304
......@@ -3206,8 +3206,8 @@ empty list."
(set v x val))
((_ v (#:vecref n) val)
(pylist-set! v n val))
((_ v (#:array-ref n ...) val)
(pylist-set! v (list n ...) val))
((_ v (#:array-ref n) val)
(pylist-set! v n val))
((_ v (#:vecsub x ...) val)
(pylist-subset! v x ... val))))
......
......@@ -432,7 +432,7 @@ property alist) using the data in ARGS."
(pk "Compile File IA" it "to .go" go)
((@ (system base compile) compile-file)
it #:output-file go)))
(apply guile-load (get-go2 q)))
(apply guile-load (get-go2 it)))
(aif it (%search-load-path (string-append
p "." (car u)))
(begin
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment