diff -r 18652b9463f6 -r 4a2b666c8ade Autoload.st --- a/Autoload.st Thu Sep 23 14:58:57 2004 +0200 +++ b/Autoload.st Thu Sep 23 15:06:42 2004 +0200 @@ -849,74 +849,10 @@ ^ LoadedClasses includes:aClass ! ! -!Autoload methodsFor:'error handling'! - - -" -*** WARNING -*** -*** this method has been automatically created, -*** since all nil-subclasses should respond to some minimum required -*** protocol. -*** -*** Inspection and/or debugging of instances may not be possible, -*** if you remove/change this method. -" -! ! - -!Autoload methodsFor:'queries'! - -^ self basicSize * (ExternalBytes sizeofDouble) - ]. - self halt:'oops'. - ] - ]. - ^ 0 - - " - Point new byteSize - 'hello' byteSize - (ByteArray with:1 with:2) byteSize - (FloatArray with:1.5) byteSize - (DoubleArray with:1.5) byteSize - (WordArray with:1 with:2) byteSize - " - -" -*** WARNING -*** -*** this method has been automatically created, -*** since all nil-subclasses should respond to some minimum required -*** protocol. -*** -*** Inspection and/or debugging of instances may not be possible, -*** if you remove/change this method. -" -! ! - -!Autoload methodsFor:'testing'! - -"if the reciever is non-nil, return the value of aBlock, passing myself as argument. - Otherwise do nothing and return nil." - - ^ aBlock value:self - -" -*** WARNING -*** -*** this method has been automatically created, -*** since all nil-subclasses should respond to some minimum required -*** protocol. -*** -*** Inspection and/or debugging of instances may not be possible, -*** if you remove/change this method. -" -! ! - !Autoload class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.127 2004-09-23 12:57:49 stefan Exp $' + ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.128 2004-09-23 13:06:42 stefan Exp $' ! ! Autoload initialize!