suzanne.soy/whalesong
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

oops

Browse Source
This commit is contained in:
Danny Yoo 2011-09-12 11:05:16 -04:00
parent bd169aea92
commit 4bd8d877af
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
js-assembler/assemble-helpers.rkt
View File

@ -140,7 +140,7 @@
(format "RT.makePath(~s)" (format "RT.makePath(~s)"
(path->string val))] (path->string val))]
[(vector? val) [(vector? val)
(format "RT.makeVector([~a,~a])" (format "RT.makeVector(~a,[~a])"
(vector-length val) (vector-length val)
(string-join (for/list ([elt (vector->list val)]) (string-join (for/list ([elt (vector->list val)])
(loop elt)) (loop elt))