carp checkers: add carp checker and make it work
This commit is contained in:
7
Pond.package/CarpCheckParser.class/instance/parse..st
Normal file
7
Pond.package/CarpCheckParser.class/instance/parse..st
Normal file
@@ -0,0 +1,7 @@
|
||||
parsing
|
||||
parse: aStream
|
||||
| split contents |
|
||||
contents := aStream upToEnd.
|
||||
contents ifEmpty: [ ^ OrderedCollection new ].
|
||||
split := contents splitOn: '\n'.
|
||||
^ split collect: [ :s | self parseLine: s ]
|
Reference in New Issue
Block a user