diff --git a/src/BaselineOfCarp/BaselineOfCarp.class.st b/src/BaselineOfCarp/BaselineOfCarp.class.st index 1070734..6467cb9 100644 --- a/src/BaselineOfCarp/BaselineOfCarp.class.st +++ b/src/BaselineOfCarp/BaselineOfCarp.class.st @@ -6,11 +6,13 @@ Class { { #category : #baseline } BaselineOfCarp >> baseline: spec [ - - spec for: #common do: [ - spec - baseline: 'GToolkit4SmaCC' - with: [ spec repository: 'github://feenkcom/gt4smacc:main/src' ]. - spec package: 'Carp' with: [ spec requires: #( 'GToolkit4SmaCC' ) ] ] + spec + for: #common + do: [ spec + baseline: 'GToolkit4SmaCC' + with: [ spec repository: 'github://feenkcom/gt4smacc:main/src' ]. + spec package: 'Carp' with: [ spec requires: #('GToolkit4SmaCC') ]. + spec package: 'Carp-Parser' with: [ spec requires: #('GToolkit4SmaCC') ]. + spec package: 'Carp-AST' with: [ spec requires: #('GToolkit4SmaCC') ] ] ] diff --git a/src/Carp/CarpProcess.class.st b/src/Carp/CarpProcess.class.st index fb1ca26..279dc7e 100644 --- a/src/Carp/CarpProcess.class.st +++ b/src/Carp/CarpProcess.class.st @@ -67,16 +67,17 @@ CarpProcess >> isRunning [ ifNotNil: [ process isRunning ] ] -{ #category : #accessing } -CarpProcess >> newProcess| newProcess [ | +{ #category : #'start-stop' } +CarpProcess >> newProcess [ + | newProcess | newProcess := GtSubprocessWithInMemoryOutput new - command: self serverPath fullName; - arguments: self processArguments; - workingDirectory: self workingDirectory resolve fullName; - terminateOnShutdown; - yourself. - environmentVariables associationsDo: [ :assoc | - newProcess environmentAt: assoc key put: assoc value ]. + command: self serverPath fullName; + arguments: self processArguments; + workingDirectory: self workingDirectory resolve fullName; + terminateOnShutdown; + yourself. + environmentVariables + associationsDo: [ :assoc | newProcess environmentAt: assoc key put: assoc value ]. ^ newProcess ]