carp checkers: add carp checker and make it work

2019-12-16 12:03:18 +01:00
parent 5763bfc040
commit 3254a9e81d
32 changed files with 145 additions and 11 deletions
--- a/Pond.package/CarpProcess.class/class/carp..st
+++ b/Pond.package/CarpProcess.class/class/carp..st
@@ -1,3 +1,3 @@
 as yet unclassified
 carp: aString
-  ^ self new setCarp: aString
+  ^ self new carp: aString
--- a/Pond.package/CarpProcess.class/instance/carp..st
+++ b/Pond.package/CarpProcess.class/instance/carp..st
@@ -0,0 +1,3 @@
+accessing
+carp: aString
+	proc command: aString
--- a/Pond.package/CarpProcess.class/instance/dir..st
+++ b/Pond.package/CarpProcess.class/instance/dir..st
@@ -0,0 +1,3 @@
+accessing
+dir: aString
+	proc environmentAt: 'CARP_DIR' put: aString
--- a/Pond.package/CarpProcess.class/instance/setCarp..st
+++ b/Pond.package/CarpProcess.class/instance/setCarp..st
@@ -1,3 +0,0 @@
-accessing
-setCarp: aString
-	proc command: aString
--- a/Pond.package/CarpProcess.class/instance/setDir..st
+++ b/Pond.package/CarpProcess.class/instance/setDir..st
@@ -1,3 +0,0 @@
-accessing
-setDir: aString
-	proc environmentAt: 'CARP_DIR' put: aString
--- a/Pond.package/CarpProcess.class/properties.json
+++ b/Pond.package/CarpProcess.class/properties.json
@@ -7,8 +7,6 @@
 	"classvars" : [ ],
 	"instvars" : [
 		"proc",
-		"out",
-		"in",
 		"excepted"
 	],
 	"name" : "CarpProcess",