X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fcompiler.lisp;h=644ac6a18825815b51d469d95aefe7bb82fab701;hb=95984c591c75b8085adde1d478b224c2ed29eaa5;hp=4427cdda9dcece6c6b33e681edad10e9551aca7a;hpb=5b6da2fb81d3a9e059b6d92f091558536745cda7;p=jscl.git diff --git a/src/compiler/compiler.lisp b/src/compiler/compiler.lisp index 4427cdd..644ac6a 100644 --- a/src/compiler/compiler.lisp +++ b/src/compiler/compiler.lisp @@ -1241,7 +1241,7 @@ ,@(mapcar (lambda (key) `(progn (= obj (property obj (call |xstring| ,(convert key)))) - (if (=== object undefined) + (if (=== obj undefined) (throw "Impossible to set object property.")))) (butlast keys)) (var (tmp