diff options
author | Andy Wingo <wingo@pobox.com> | 2009-02-19 16:40:22 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2009-02-19 16:40:22 +0100 |
commit | 7fb4230060462f5169706b42abdc6c48cd6049da (patch) | |
tree | 21e525e08d5389b0905722bf3f45ba49f37847d8 /module/language/ecmascript/parse.scm | |
parent | 10e1bd278fca5d65fba7fc977a14e4a37a572cc7 (diff) | |
download | guile-7fb4230060462f5169706b42abdc6c48cd6049da.tar.gz |
property gets and puts implemented, yays
* module/language/ecmascript/compile-ghil.scm (@impl): Ok, don't recurse
on args here.
(comp): Implement property gets and puts and lexical assignment.
(comp-body): Fix scanning of var forms.
* module/language/ecmascript/impl.scm (prop-attrs): Allow for the prop
attr array to be #f.
* module/language/ecmascript/parse.scm (parse-ecmascript): Fix assignment
parsing.
Diffstat (limited to 'module/language/ecmascript/parse.scm')
-rw-r--r-- | module/language/ecmascript/parse.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/module/language/ecmascript/parse.scm b/module/language/ecmascript/parse.scm index 82e9f770a..d034f7f4f 100644 --- a/module/language/ecmascript/parse.scm +++ b/module/language/ecmascript/parse.scm @@ -102,8 +102,8 @@ (Identifier Initialiser) -> `(,$1 ,$2)) (VariableDeclarationNoIn (Identifier) -> `(,$1) (Identifier Initialiser) -> `(,$1 ,$2)) - (Initialiser (= AssignmentExpression) -> $1) - (InitialiserNoIn (= AssignmentExpressionNoIn) -> $1) + (Initialiser (= AssignmentExpression) -> $2) + (InitialiserNoIn (= AssignmentExpressionNoIn) -> $2) (EmptyStatement (semicolon) -> '(begin)) |