Mercurial Mercurial > hg > stx-libcomp / comparison
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Scanner.st
changeset 3994 d59ebb2f6bec
parent 3954 fb1ef4e45dff
child 4016 c288a77d5952
equal deleted inserted replaced
3993:7f4f996a4d6c 3994:d59ebb2f6bec 
  1112 parseDirectiveStringArg:firstCharacterCheckBlock rest:restCharacterCheckBlock
 
  1112 parseDirectiveStringArg:firstCharacterCheckBlock rest:restCharacterCheckBlock
 
  1113     "helper for parsing a directive"
 
  1113     "helper for parsing a directive"
 
  1114 
  1114 
  1115     |strBuffer|
 
  1115     |strBuffer|
 
  1116 
  1116 
  1117     strBuffer := WriteStream on:(String new).
 
  1117     strBuffer := WriteStream on:''.
 
  1118 
  1118 
  1119     hereChar == $' ifTrue:[
 
  1119     hereChar == $' ifTrue:[
 
  1120         hereChar := source nextPeek.
 
  1120         hereChar := source nextPeek.
 
  1121         [hereChar ~~ $'] whileTrue:[
 
  1121         [hereChar ~~ $'] whileTrue:[
 
  1122             strBuffer nextPut:hereChar.
 
  1122             strBuffer nextPut:hereChar.
hg/stx-libcomp