author | Jan Vrany <jan.vrany@fit.cvut.cz> |
Fri, 11 Jan 2013 15:53:03 +0000 | |
changeset 6 | 06efdfe62106 |
parent 3 | 46c322c66a29 |
permissions | -rw-r--r-- |
3 | 1 |
"{ Package: 'jv:dart/compiler' }" |
2 |
||
3 |
"{ NameSpace: Dart }" |
|
4 |
||
5 |
TestCase subclass:#ScannerTests |
|
6 |
instanceVariableNames:'' |
|
7 |
classVariableNames:'' |
|
8 |
poolDictionaries:'' |
|
9 |
category:'Languages-Dart-Parser-Tests' |
|
10 |
! |
|
11 |
||
12 |
||
13 |
!ScannerTests methodsFor:'tests'! |
|
14 |
||
15 |
test_01 |
|
16 |
||
17 |
self assert: |
|
18 |
(Dart::Scanner scan: 'import ''dart:html''; void main() { }') asArray |
|
19 |
= #(#import #String $; #void #identifier $( $) ${ $} ) |
|
20 |
||
21 |
"Created: / 11-01-2013 / 12:53:30 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
6
06efdfe62106
More tests and fixes for Dart parser
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3
diff
changeset
|
22 |
! |
06efdfe62106
More tests and fixes for Dart parser
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3
diff
changeset
|
23 |
|
06efdfe62106
More tests and fixes for Dart parser
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3
diff
changeset
|
24 |
test_02 |
06efdfe62106
More tests and fixes for Dart parser
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3
diff
changeset
|
25 |
|
06efdfe62106
More tests and fixes for Dart parser
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3
diff
changeset
|
26 |
self assert: |
06efdfe62106
More tests and fixes for Dart parser
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3
diff
changeset
|
27 |
(Dart::Scanner scan: 'a |= 1') asArray |
06efdfe62106
More tests and fixes for Dart parser
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3
diff
changeset
|
28 |
= #() |
06efdfe62106
More tests and fixes for Dart parser
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3
diff
changeset
|
29 |
|
06efdfe62106
More tests and fixes for Dart parser
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3
diff
changeset
|
30 |
"Created: / 11-01-2013 / 15:46:48 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
3 | 31 |
! ! |
32 |
||
33 |
!ScannerTests class methodsFor:'documentation'! |
|
34 |
||
35 |
version_HG |
|
36 |
||
37 |
^ '$Changeset: <not expanded> $' |
|
38 |
! ! |