fix object literals with null value #264

jcubic · Jan 14, 2024 · 5447d14 · 5447d14
1 parent e8bb82a
commit 5447d14
Show file tree

Hide file tree

Showing 5 changed files with 4 additions and 3 deletions.
diff --git a/CHANGELOG.md b/CHANGELOG.md
@@ -13,6 +13,7 @@
 * fix resolving promises inside quoted promise realm
 * fix undocumented symbol syntax extensions
 * fix odd? even? on non integers
+* fix object literals with null value [#264](https://github.com/jcubic/lips/issues/264)
 
 ## 1.0.0-beta.17
 ### Breaking

diff --git a/dist/std.min.scm b/dist/std.min.scm
diff --git a/dist/std.scm b/dist/std.scm
diff --git a/dist/std.xcb b/dist/std.xcb
diff --git a/lib/bootstrap.scm b/lib/bootstrap.scm
@@ -306,7 +306,7 @@
                                                    " is not a symbol!")))
                            (throw msg))
                          (let ((prop (key->string first)))
-                           (if (or (key? second) (null? second))
+                           (if (key? second)
                                (let ((code `(set-obj! ,name ,prop undefined)))
                                  (loop (cdr lst) (cons code result)))
                                (let ((code (if readonly