diff --git a/repository/ViennaTalk-Transpiler-Core/String.extension.st b/repository/ViennaTalk-Transpiler-Core/String.extension.st index 282fdcd7..1ab794a5 100644 --- a/repository/ViennaTalk-Transpiler-Core/String.extension.st +++ b/repository/ViennaTalk-Transpiler-Core/String.extension.st @@ -2,9 +2,13 @@ Extension { #name : #String } { #category : #'*ViennaTalk-Transpiler-Core' } String >> , aString [ - ^ aString isViennaTracingString - ifTrue: [ self asViennaTracingString , aString ] - ifFalse: [ super , aString ] + + ^ [ + aString isViennaTracingString + ifTrue: [ self asViennaTracingString , aString ] + ifFalse: [ super , aString ] ] + on: Error + do: [ :ex | super , aString ] ] { #category : #'*ViennaTalk-Transpiler-Core' }