--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/compiler/tests/Dart__ScannerTests.st	Tue Nov 04 00:17:12 2014 +0000
@@ -0,0 +1,39 @@
+"{ Package: 'ctu:dart/compiler/tests' }"
+
+"{ NameSpace: Dart }"
+
+TestCase subclass:#ScannerTests
+	instanceVariableNames:''
+	classVariableNames:''
+	poolDictionaries:''
+	category:'Languages-Dart-Parser-Tests'
+!
+
+
+!ScannerTests methodsFor:'tests'!
+
+test_01
+
+    self assert:
+        (Dart::Scanner scan: 'import ''dart:html''; void main() { }') asArray
+            = #(#import #String $; #void #identifier $( $) ${ $} )
+
+    "Created: / 11-01-2013 / 12:53:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+test_02
+
+    self assert:
+        (Dart::Scanner scan: 'a |= 1') asArray
+            = #()
+
+    "Created: / 11-01-2013 / 15:46:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!ScannerTests class methodsFor:'documentation'!
+
+version_HG
+
+    ^ '$Changeset: <not expanded> $'
+! !
+