diff -r 2aa626e8e404 -r fc73718968f5 CompiledCode.st --- a/CompiledCode.st Wed Apr 14 11:07:50 2004 +0200 +++ b/CompiledCode.st Thu Apr 15 10:45:50 2004 +0200 @@ -1448,15 +1448,14 @@ |decompiler| decompiler := self decompilerClass. - decompiler notNil ifTrue:[ - Autoload autoloadFailedSignal handle:[:ex | - ex return - ] do:[ - decompiler autoload. - ]. + decompiler isNil ifTrue:[ + ^ false ]. - (decompiler isNil or:[decompiler isLoaded not]) ifTrue:[ - ^ false + + Autoload autoloadFailedSignal handle:[:ex | + ^ false. + ] do:[ + decompiler autoload. ]. decompiler decompile:self to:aStream. @@ -1649,5 +1648,5 @@ !CompiledCode class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.95 2004-03-17 16:15:16 cg Exp $' + ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.96 2004-04-15 08:45:50 stefan Exp $' ! !