equal
deleted
inserted
replaced
708 |
708 |
709 tokens := OrderedCollection new. |
709 tokens := OrderedCollection new. |
710 self nextToken. |
710 self nextToken. |
711 |
711 |
712 [token notNil] whileTrue:[ |
712 [token notNil] whileTrue:[ |
713 token == $( ifTrue:[ |
713 token == $( ifTrue:[ |
714 self nextToken. |
714 self nextToken. |
715 tokens add:(readArray value) |
715 tokens add:(readArray value) |
716 ] ifFalse:[ |
716 ] ifFalse:[ |
717 tokens add:token |
717 tokens add:token |
718 ]. |
718 ]. |
719 self nextToken |
719 self nextToken |
720 ]. |
720 ]. |
721 ^ tokens |
721 ^ tokens |
722 |
722 |
723 " |
723 " |
724 Scanner new scanTokens:'name ident #sym ''string'' 8r12' |
724 Scanner new scanTokens:'name ident #sym ''string'' 8r12' |
725 |
725 |
726 Scanner new scanTokens:'translate (200px 100px)' |
726 Scanner new scanTokens:'translate (200px 100px)' |
727 |
727 |
728 Scanner new |
728 Scanner new |
729 scanTokens:'Boolean subclass:#True |
729 scanTokens:'Boolean subclass:#True |
730 instanceVariableNames:'''' |
730 instanceVariableNames:'''' |
731 classVariableNames:'''' |
731 classVariableNames:'''' |
732 poolDictionaries:'''' |
732 poolDictionaries:'''' |
733 category:''Kernel-Objects'' |
733 category:''Kernel-Objects'' |
734 ' |
734 ' |
735 " |
735 " |
736 |
736 |
737 "Modified: / 23-08-2017 / 23:58:03 / cg" |
737 "Modified: / 23-08-2017 / 23:58:03 / cg" |
738 ! ! |
738 ! ! |
739 |
739 |