Skip to content

Commit 6552593

Browse files
Merge pull request #41 from oliveiraallex/Fix-Pharo-8-Remote-Playground-and-Browser
Fix Pharo 8 Remote Playground and Browser (Telepharo issue #33)
2 parents cc476b5 + 692dd62 commit 6552593

File tree

1 file changed

+5
-1
lines changed

1 file changed

+5
-1
lines changed

Seamless-GTSupport/SeamlessRemoteClassCompiler.class.st

+5-1
Original file line numberDiff line numberDiff line change
@@ -33,8 +33,12 @@ SeamlessRemoteClassCompiler >> evaluate [
3333
ifTrue: [ itsSelectionString ]
3434
ifFalse: [ source ].
3535
self source: selectedSource.
36-
doItMethod := self parse methodNode generateWithSource.
3736

37+
"Keeping compability with Pharo 7"
38+
(OpalCompiler canUnderstand: #transformDoit)
39+
ifTrue: [ self parse. doItMethod := self transformDoit methodNode generateWithSource ]
40+
ifFalse: [ doItMethod := self parse methodNode generateWithSource ].
41+
3842
value := receiver withArgs: (context ifNil: [ #() ] ifNotNil: [ {context} ]) executeMethod: doItMethod.
3943
self compilationContext logged
4044
ifTrue: [ Smalltalk globals

0 commit comments

Comments
 (0)