RegressionTests__JavaScriptTests.st
changeset 557 c4d3715477f8
parent 556 f36d96371557
child 575 da1c4295fe4f
--- a/RegressionTests__JavaScriptTests.st	Thu Mar 18 15:49:24 2010 +0100
+++ b/RegressionTests__JavaScriptTests.st	Thu Mar 18 15:50:36 2010 +0100
@@ -1094,6 +1094,23 @@
     "
 !
 
+testLiterals02
+    |t|
+
+    t := JavaScriptParser 
+        evaluate:'
+            [ 1, 2, 3, 4, 5, 6, 7, 8 ];
+        '.
+    self assert:(t isArray).
+    self assert:(t size == 8).
+    self assert:(t = #(1 2 3 4 5 6 7 8)).
+
+    "
+     self run:#testLiterals02
+     self new testLiterals02
+    "
+!
+
 testLocalFunction01
     self 
         execute:'test(arg) {