Skip to content

Commit

Permalink
Issue #4: remove the halts, convert result to String, and looks like …
Browse files Browse the repository at this point in the history
…result is a fair accounting of the the command return value (printString of the object) ... the client forwarder calls may offer access to the actual objects ... worth chasing a bit more
  • Loading branch information
dalehenrich committed Jul 30, 2023
1 parent 28cd31e commit a6c0384
Show file tree
Hide file tree
Showing 4 changed files with 4 additions and 7 deletions.
2 changes: 1 addition & 1 deletion bin/todeIt.solo
Original file line number Diff line number Diff line change
Expand Up @@ -125,5 +125,5 @@ doit
^ result := ((self globalNamed: 'TDShell')
sessionDescription: sessionDescription
evaluate: commands
debugMode: self debugGem).
debugMode: self debugGem) asString.
%
Original file line number Diff line number Diff line change
Expand Up @@ -14,9 +14,7 @@ _serverExecuteString: executeString debugMode: debugMode
[ self session nbExecute: doitString ]
on: GsErrorNotification
do: [ :ex | self error: 'Unable to execute #executeString: on tODE server' ].
[ | x |
x := self session nbResult.
self halt. " never get here"]
[self session nbResult]
on: GciError
do: [ :ex |
ex gsNumber = 2336
Expand All @@ -28,6 +26,5 @@ self halt. " never get here"]
session: self;
tag: ex gciErrSType;
signal ].
self halt.
ex continue. "after this continue, lastResult is the string we are looking for, however, the continue is necessary and we end up returning something different"
] ]
Original file line number Diff line number Diff line change
Expand Up @@ -6,6 +6,5 @@ evaluateCommand: command batchMode: aBool
ifTrue: [ ^ '' ].
(self builtInCommands includes: command command)
ifTrue: [ ^ self executeBuiltIn: command ].
self halt.
^ (self topezClient evaluateCommand: command batchMode: aBool debugMode: self debugMode)
convertTDEvaluateTokenResponseToText: self objectSerializer
3 changes: 2 additions & 1 deletion tode/example4
Original file line number Diff line number Diff line change
@@ -1,4 +1,5 @@
#
# todeIt.solo --file=example4
#
man --all
limit chars 5000
man abort

0 comments on commit a6c0384

Please sign in to comment.