OpalCompiler fallback

estebanlm · Nov 3, 2019 · b553d69 · b553d69
1 parent 0860660
commit b553d69
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/src/System-Support/SmalltalkImage.class.st b/src/System-Support/SmalltalkImage.class.st
@@ -60,7 +60,10 @@ SmalltalkImage class >> cleanUp [
 
 { #category : #settings }
 SmalltalkImage class >> compilerClass [
-	^CompilerClass
+
+	^CompilerClass ifNil: [ 
+		"use OpalCompiler as the fallback compiler if installed"
+		self class environment at: #OpalCompiler ifAbsent: [ nil ] ]
 ]
 
 { #category : #settings }