carpentry/pond
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

carp checkers: add carp checker and make it work

Browse Source
This commit is contained in:
Veit Heller
2019-12-16 12:03:18 +01:00
parent 5763bfc040
commit 3254a9e81d
32 changed files with 145 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
Pond.package/CarpChecker.class/instance/check.st Normal file
View File

@@ -0,0 +1,9 @@
checking
check
| f |
f := FileReference newTempFilePrefix: 'checker' suffix: '.carp'.
f writeStreamDo: [:stream | stream nextPutAll: file].
proc arguments: {'--check' . f pathString }.
self run.
excepted ifNotNil: [ CarpError new messageText: excepted messageText ].
self died ifFalse: [ ^ CarpCheckParser new parse: proc stdoutStream ]