Skip to content
Browse files

JS backend, in interpreter removal of trailing commas, which does not…

… parse in Explorer
  • Loading branch information...
1 parent e8db0db commit 6ad09c67c17f47a4156b0d36f41c9fe76ed65254 atze committed Feb 4, 2012
Showing with 18 additions and 18 deletions.
  1. +18 −18 EHC/src/javascript/core/interpreter.cjs
View
36 EHC/src/javascript/core/interpreter.cjs
@@ -100,15 +100,15 @@ _A_undersat_.prototype = {
return fun.__aN__( args.slice( needs ) ) ;
} } ;
}
- } ,
- needsNrArgs : function() {
+ }
+, needsNrArgs : function() {
return this.fun.needsNrArgs() - this.args.length ;
- } ,
+ }
%%[[8
- getName : function () {
+, getName : function () {
return "A-" + this.needsNrArgs() + "#" + this.nodeId + "'" ;
- } ,
- toString : function () {
+ }
+, toString : function () {
return "(" + this.getName() + "=" + this.fun + "@" + this.args + ")" ;
}
%%][100
@@ -132,15 +132,15 @@ _A_.prototype = {
__eOrV__ : function() {
return fun.__aN__( args ) ;
} } ;
- } ,
+ }
%%[[8
- getName : function () {
+, getName : function () {
return "A" + this.args.length + "#" + this.nodeId + "'" + this.fun.getName() ;
- } ,
- getVal : function () {
+ }
+, getVal : function () {
return "V#" + this.nodeId + "'" + this.__eOrV__ ;
- } ,
- toString : function () {
+ }
+, toString : function () {
if ( typeof this.__eOrV__ == 'function' ) {
return "(" + this.getName() + "@args#" + this.args.length + "=(|" + this.args + "|))" ;
} else {
@@ -206,15 +206,15 @@ _F_.prototype = {
return fun.__aN__( remargs ) ;
} } ;
}
- } ,
- needsNrArgs : function() {
+ }
+, needsNrArgs : function() {
return this.needs ;
- } ,
+ }
%%[[8
- getName : function () {
+, getName : function () {
return "F" + this.needs + "#" + this.nodeId + "'" + this.name ;
- } ,
- toString : function () {
+ }
+, toString : function () {
return "(" + this.getName() + ")" ;
}
%%][100

0 comments on commit 6ad09c6

Please sign in to comment.
Something went wrong with that request. Please try again.