Less semicolons.

zaoqi-unsafe · Mar 20, 2017 · 2753914 · 2753914
1 parent 0336603
commit 2753914
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/environment/transpiler/targets/javascript/core/hash.lisp b/environment/transpiler/targets/javascript/core/hash.lisp
@@ -77,7 +77,7 @@
     (%= nil (%%native
                 "for (var k in " b ") "
                     "if (k != \"" '__tre-object-id "\" && k != \"" '__tre-test "\" && k != \"" '__tre-keys "\") "
-                        a "[k] = " b "[k];"))
+                        a "[k] = " b "[k]"))
     a))
 
 (fn copy-hash-table (x)

diff --git a/environment/transpiler/targets/javascript/core/property-list.lisp b/environment/transpiler/targets/javascript/core/property-list.lisp
@@ -1,4 +1,4 @@
-(defvar *%property-list-tmp* nil)
+(var *%property-list-tmp* nil)
 
 (defnative %property-list-0 (key val)
   (acons! key val *%property-list-tmp*))
@@ -8,5 +8,5 @@
   (%= nil (%%native
               "for (var k in " hash ") "
                   "if (k != \"" ,(obfuscated-identifier '__tre-object-id) "\" && k != \"" ,(obfuscated-identifier '__tre-test) "\" && k != \"" ,(obfuscated-identifier '__tre-keys) "\") "
-                      ,(compiled-function-name-string '%property-list-0) " (typeof k == \"string\" && typeof " hash "." ,(obfuscated-identifier '__tre-keys) " != \"undefined\" ? (" hash "." ,(obfuscated-identifier '__tre-keys) "[k] || k) : k, " hash "[k]);"))
+                      ,(compiled-function-name-string '%property-list-0) " (typeof k == \"string\" && typeof " hash "." ,(obfuscated-identifier '__tre-keys) " != \"undefined\" ? (" hash "." ,(obfuscated-identifier '__tre-keys) "[k] || k) : k, " hash "[k])"))
   (reverse *%property-list-tmp*))