1077 !Scanner::Token methodsFor:'printing & storing'!

  1078 

  1079 printOn:aStream

  1080     "append a printed representation if the receiver to the argument, aStream"

  1081 

  1082     aStream nextPut: ${.

  1083     type printOn:aStream.

  1084     aStream nextPutAll:' - '.

  1085     value printOn:aStream.

  1086     aStream nextPutAll:' <'.

  1087     startPosition printOn:aStream.

  1088     aStream nextPutAll:'-'.

  1089     endPosition printOn:aStream.

  1090     aStream nextPutAll:' >}'.

  1091 

  1092     "Modified: / 11-01-2013 / 12:32:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"

  1093 ! !