[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#10623: [PATCH] Fixed unbound variables and unbound values
From: |
Sjoerd van Leent |
Subject: |
bug#10623: [PATCH] Fixed unbound variables and unbound values |
Date: |
Tue, 15 May 2012 20:48:40 +0200 |
---
module/language/ecmascript/base.scm | 6 +++---
1 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/module/language/ecmascript/base.scm
b/module/language/ecmascript/base.scm
index b244bec..6f5c65b 100644
--- a/module/language/ecmascript/base.scm
+++ b/module/language/ecmascript/base.scm
@@ -92,7 +92,7 @@
(pdel o (string->symbol p)))
(define-method (has-property? (o <js-object>) p)
- (if (hashq-get-handle (js-props o) v)
+ (if (hashq-get-handle (js-props o) p)
#t
(let ((proto (js-prototype o)))
(if proto
@@ -176,9 +176,9 @@
((boolean? x) (if x 1 0))
((null? x) 0)
((eq? x *undefined*) +nan.0)
- ((is-a? x <js-object>) (object->number x))
+ ((is-a? x <js-object>) (object->number x #t))
((string? x) (string->number x))
- (else (throw 'TypeError o '->number))))
+ (else (throw 'TypeError x '->number))))
(define (->integer x)
(let ((n (->number x)))
--
1.7.5.4
- bug#10623: [PATCH] Fixed unbound variables and unbound values,
Sjoerd van Leent <=