Offray/Grafoscopio
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Not all outputs are stored by default.

Browse Source
This commit is contained in:
Offray Vladimir Luna Cárdenas 2017-04-16 16:49:29 +00:00
parent ebeb8acfcb
commit 40a8a58e70
2 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
repository/Grafoscopio/GrafoscopioNode.class.st
View File

@ -702,6 +702,12 @@ GrafoscopioNode >> preorderTraversal [
^ nodesInPreorder. ^ nodesInPreorder.
] ]
{ #category : #'as yet unclassified' }
GrafoscopioNode >> processOutput [
(self headerStartsWith: '%output')
ifTrue: [ self output: (Compiler evaluate: self body) ]
]
{ #category : #movement } { #category : #movement }
GrafoscopioNode >> promote [ GrafoscopioNode >> promote [
"Moves the current node up in the hierachy, making it a slibing of its current parent" "Moves the current node up in the hierachy, making it a slibing of its current parent"

2
repository/Grafoscopio/GrafoscopioNotebook.class.st
View File

@ -66,7 +66,7 @@ GrafoscopioNotebook >> autoSaveBodyOf: aNode [
onChangeOfPort: #text onChangeOfPort: #text
act: [ :x | aNode body: x entity value content ]; act: [ :x | aNode body: x entity value content ];
onChangeOfPort: #activePresentation onChangeOfPort: #activePresentation
act: [ aNode output: (Compiler evaluate: aNode body) ] act: [ aNode output: aNode processOutput ]
] ]
{ #category : #accessing } { #category : #accessing }