'$Revision: 30.7 $'
 '
Copyright 1992-2006 Sun Microsystems, Inc. 
See the LICENSE file for license information.
'


 '-- Module body'

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'modules' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         pep_runtime = bootstrap define: bootstrap stub -> 'globals' -> 'modules' -> 'pep_runtime' -> () ToBe: bootstrap addSlotsTo: (
             bootstrap remove: 'comment' From:
             bootstrap remove: 'directory' From:
             bootstrap remove: 'fileInTimeString' From:
             bootstrap remove: 'postFileIn' From:
             bootstrap remove: 'revision' From:
             bootstrap remove: 'subpartNames' From:
             globals modules init copy ) From: bootstrap setObjectAnnotationOf: bootstrap stub -> 'globals' -> 'modules' -> 'pep_runtime' -> () From: ( |
             {} = 'ModuleInfo: Creator: globals modules pep_runtime.

CopyDowns:
globals modules init. copy 
SlotsToOmit: comment directory fileInTimeString myComment postFileIn revision subpartNames.

\x7fIsComplete: '.
            | ) .
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'modules' -> 'pep_runtime' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: private'
        
         myComment <- ''.
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'modules' -> 'pep_runtime' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: public'
        
         directory <- 'applications/pep'.
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'modules' -> 'pep_runtime' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: InitializeToExpression: (_CurrentTimeString)\x7fVisibility: public'
        
         fileInTimeString <- _CurrentTimeString.
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'modules' -> 'pep_runtime' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         postFileIn = ( |
            | 
            transporter moduleDictionary resetFillingSemaphore.
            snapshotAction addSchedulerInitialMessage:  
              message copy receiver: transporter moduleDictionary
                           Selector: 'resetFillingSemaphore'.
            resend.postFileIn).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'modules' -> 'pep_runtime' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: InitializeToExpression: (\'$Revision: 30.7 $\')\x7fVisibility: public'
        
         revision <- '$Revision: 30.7 $'.
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'modules' -> 'pep_runtime' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: public'
        
         subpartNames <- ''.
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'booleanArray' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: private'
        
         my_class* = bootstrap setObjectAnnotationOf: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'booleanArray' -> 'my_class' -> () From: ( |
             {} = 'ModuleInfo: Creator: globals pep arrayBuildMixin array_masters booleanArray my_class.
'.
            | ) .
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'byteArray' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: private'
        
         my_class* = bootstrap setObjectAnnotationOf: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'byteArray' -> 'my_class' -> () From: ( |
             {} = 'ModuleInfo: Creator: globals pep arrayBuildMixin array_masters byteArray my_class.
'.
            | ) .
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'charArray' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: private'
        
         my_class* = bootstrap setObjectAnnotationOf: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'charArray' -> 'my_class' -> () From: ( |
             {} = 'ModuleInfo: Creator: globals pep arrayBuildMixin array_masters charArray my_class.
'.
            | ) .
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'doubleArray' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: private'
        
         my_class* = bootstrap setObjectAnnotationOf: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'doubleArray' -> 'my_class' -> () From: ( |
             {} = 'ModuleInfo: Creator: globals pep arrayBuildMixin array_masters doubleArray my_class.
'.
            | ) .
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'floatArray' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: private'
        
         my_class* = bootstrap setObjectAnnotationOf: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'floatArray' -> 'my_class' -> () From: ( |
             {} = 'ModuleInfo: Creator: globals pep arrayBuildMixin array_masters floatArray my_class.
'.
            | ) .
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'intArray' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: private'
        
         my_class* = bootstrap setObjectAnnotationOf: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'intArray' -> 'my_class' -> () From: ( |
             {} = 'ModuleInfo: Creator: globals pep arrayBuildMixin array_masters intArray my_class.
'.
            | ) .
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'longArray' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: private'
        
         my_class* = bootstrap setObjectAnnotationOf: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'longArray' -> 'my_class' -> () From: ( |
             {} = 'ModuleInfo: Creator: globals pep arrayBuildMixin array_masters longArray my_class.
'.
            | ) .
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'objectArray' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: private'
        
         my_class* = bootstrap setObjectAnnotationOf: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'objectArray' -> 'my_class' -> () From: ( |
             {} = 'Comment: For the arrays of the built-in types (int, short, byte, etc.) it is alright to
have methods in the parent of the array objects. For arrays of \"class instances\"
it is best not to add too much state to this array parent, since it will be cloned
as specialized to lots of classes (e.g., array of point, array of colorPoint, etc.).
Instead, we have added an extra parent-indirection and placed the methods up there.\x7fModuleInfo: Creator: globals pep arrayBuildMixin array_masters objectArray my_class.
'.
            | ) .
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'shortArray' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: private'
        
         my_class* = bootstrap setObjectAnnotationOf: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'shortArray' -> 'my_class' -> () From: ( |
             {} = 'ModuleInfo: Creator: globals pep arrayBuildMixin array_masters shortArray my_class.
'.
            | ) .
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'traits_allArrays' -> () From: ( | {
         'Category: array instantiation\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: public'
        
         java_inst_newArraySize: n = ( |
            | 
            0 pep ifTraceMutator: [
                ^ 0 pep mutatorTracer newarray: (basic_newArraySize: n).
            ].
            basic_newArraySize: n).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'traits_byteVectorBasedArray' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: private'
        
         array_parent* = bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'traits_allArrays' -> ().
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'traits_byteVectorBasedArray' -> () From: ( | {
         'Comment: Needed for IO etc. which calls into Self
code.\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: public'
        
         asVMByteVector = ( |
            | self).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'traits_byteVectorBasedArray' -> () From: ( | {
         'Category: primitive wrappers\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: public'
        
         basic_newArraySize: n = ( |
            | 
            _CloneBytes: n Filler: java_inst_filler IfFail: [|:e|
                0 > n ifTrue: [java_inst_athrow: class_java_lang_NegativeArraySizeException].
                'outOfMemoryError' != e ifFalse: [java_error: e].
                0 memory allocationFailedBytes: n.
                _CloneBytes: n Filler: java_inst_filler.
            ]).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'traits_byteVectorBasedArray' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: public'
        
         java_inst_arraylength = ( |
            | 
            _ByteSize).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'traits_byteVectorBasedArray' -> () From: ( | {
         'Category: primitive wrappers\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: private'
        
         java_inst_at: index = ( |
            | 
            _ByteAt: index IfFail: [|:e|
                java_inst_handlePrimError: e.
            ]).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'traits_byteVectorBasedArray' -> () From: ( | {
         'Category: primitive wrappers\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: private'
        
         java_inst_at: index Put: v = ( |
            | 
            _ByteAt: index Put: v IfFail: [|:e|
                java_inst_handlePrimError: e.
            ]).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'traits_byteVectorBasedArray' -> () From: ( | {
         'Category: primitive wrappers\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: private'
        
         java_inst_copyRangeDstPos: dstPos SrcArray: srcArray SrcPos: srcPos Len: len IfFail: errBlk = ( |
            | 
            _CopyByteRangeDstPos: dstPos Src: srcArray SrcPos: srcPos Length: len IfFail: errBlk).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'traits_vectorBasedArray' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: private'
        
         array_parent* = bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'traits_allArrays' -> ().
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'traits_vectorBasedArray' -> () From: ( | {
         'Category: primitive wrappers\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: private'
        
         basic_newArraySize: n = ( |
            | 
            _Clone: n Filler: java_inst_filler IfFail: [|:e|
                0 > n ifTrue: [java_inst_athrow: class_java_lang_NegativeArraySizeException].
                'outOfMemoryError' != e ifFalse: [java_error: e].
                0 memory allocationFailedBytes: n.
                _Clone: n Filler: java_inst_filler.
            ]).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'traits_vectorBasedArray' -> () From: ( | {
         'ModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: public'
        
         java_inst_arraylength = ( |
            | _Size).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'traits_vectorBasedArray' -> () From: ( | {
         'Category: primitive wrappers\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: private'
        
         java_inst_at: index = ( |
            | 
            _At: index IfFail: [|:e|
                java_inst_handlePrimError: e.
            ]).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'traits_vectorBasedArray' -> () From: ( | {
         'Category: primitive wrappers\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: private'
        
         java_inst_at: index Put: v = ( |
            | 
            _At: index Put: v IfFail: [|:e|
                java_inst_handlePrimError: e.
            ].
            0 pep ifTraceMutator: [ 
                obj_flags = 'T_CLASS' ifTrue: [  "Array of references."
                    0 pep mutatorTracer putarray: self Idx: index StoredObj: v.
                ].
            ].
            self).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'traits_vectorBasedArray' -> () From: ( | {
         'Category: primitive wrappers\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: private'
        
         java_inst_copyRangeDstPos: dstPos SrcArray: srcArray SrcPos: srcPos Len: len IfFail: errBlk = ( |
            | 
            _CopyRangeDstPos: dstPos Src: srcArray SrcPos: srcPos Length: len IfFail: errBlk).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'arrayBuildMixin' -> 'array_masters' -> 'traits_vectorBasedArray' -> () From: ( | {
         'Comment: Better implement this method if you are a vector, or the UI will crash.\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot\x7fVisibility: public'
        
         methodPointerIfFail: b = ( |
            | _MethodPointerIfFail: b).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: FileDescriptor\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_FileDescriptor_initSystemFD_Ljava_io_FileDescriptor: fdObj I: fd0 = ( |
            | 
            fdObj java_inst_setFileNumber: fd0.   
            fdObj).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: FileDescriptor\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_FileDescriptor_valid = ( |
            | 
            "Note: getFileNumber already subtracts 1, so 
             compare using '<=' not '<'."
            0 <= java_inst_getFileNumber ifTrue: [java_true]
                                          False: [java_false]).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: FileInputStream\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_FileInputStream_available = ( |
             cur <- 0.
             end <- 0.
             selfFile.
             statObj.
            | 
            java_io_FileInputStream_fd_ java_inst_athrowIfNullMessage: 'null FileDescriptor'.
            selfFile: (java_io_FileInputStream_fd_ java_inst_getSelfFileIfFail: [
                java_inst_IOException.
            ]).
            statObj: (selfFile fstatIfFail: [java_inst_IOException]).
            statObj s_ischr || [statObj s_isfifo] || [statObj s_issock] ifTrue: [
                0 error: 'special devices currently not supported'. "%%%"
            ].
            java_inst_tripleSeek: selfFile Cur: [|:c| cur: c] End: [|:e| end: e].
            end - cur).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: FileInputStream\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_FileInputStream_close = ( |
            | 
            java_io_FileInputStream_fd_ java_inst_closeFileDescriptor).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: FileInputStream\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_FileInputStream_open_Ljava_lang_String: name = ( |
            | 
            java_inst_openFileName: name
                             Flags: 0 os_file flags read
                              Mode: 0
                       FileDescObj: java_io_FileInputStream_fd_).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: FileInputStream\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_FileInputStream_read = ( |
             selfFile.
            | 
            java_io_FileInputStream_fd_ java_inst_athrowIfNullMessage: 'null FileDescriptor'.
            selfFile: (java_io_FileInputStream_fd_ java_inst_getSelfFileIfFail: [
                java_inst_IOException: 'read error'.
            ]).
            (selfFile readOneCharIfFail: [
                selfFile atEOF ifTrue: [^ -1].
                java_inst_IOException: 'read error'.
            ]) asByte).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: FileInputStream\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_FileInputStream_readBytes_Array_B: byteArray I: off I: len = ( |
             bytesRead <- 0.
            | 
            bytesRead: (java_inst_readFromFileDescObj: java_io_FileInputStream_fd_
                                                 Into: byteArray
                                               Offset: off
                                               Length: len
                                             MinBytes: 1).
            0 = bytesRead ifTrue: [-1] False: [bytesRead]).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: FileInputStream\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_FileInputStream_skip_J: n = ( |
             cur <- 0.
             end <- 0.
             selfFile.
            | 
            java_io_FileInputStream_fd_ java_inst_athrowIfNullMessage: 'null FileDescriptor'.
            selfFile: (java_io_FileInputStream_fd_ java_inst_getSelfFileIfFail: [
                java_inst_IOException.
            ]).
            cur: (selfFile lseekOffset: 0 Whence: selfFile seek_cur IfFail: [
                java_inst_IOException.
            ]).
            end: (selfFile lseekOffset: n Whence: selfFile seek_cur IfFail: [
                java_inst_IOException.
            ]).
            end java_inst_lsub: cur).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: FileOutputStream\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_FileOutputStream_close = ( |
            | 
            java_io_FileOutputStream_fd_ java_inst_closeFileDescriptor).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: FileOutputStream\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_FileOutputStream_open_Ljava_lang_String: name = ( |
             flags.
            | 
            flags: 0 os_file flags.
            java_inst_openFileName: name
                             Flags: flags write || flags create || flags truncate
                              Mode: 8r664
                       FileDescObj: java_io_FileOutputStream_fd_).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: FileOutputStream\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_FileOutputStream_writeBytes_Array_B: byteArray I: off I: len = ( |
            | 
            java_inst_writeToFileDescObj: java_io_FileOutputStream_fd_ 
                                    From: byteArray
                                  Offset: off
                                  Length: len).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: FileOutputStream\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_FileOutputStream_write_I: byte = ( |
             selfFile.
            | 
            java_io_FileOutputStream_fd_ java_inst_athrowIfNullMessage: 'null FileDescriptor'.
            selfFile: (java_io_FileOutputStream_fd_ java_inst_getSelfFileIfFail: [
                java_inst_IOException: 'write error'.
            ]).
            selfFile write: (0 byteVector copySize: 1 FillingWith: byte)
                    IfFail: [java_inst_IOException: 'write error'].
            self).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: File\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_File_canRead0 = ( |
            | 
            java_inst_sysAccessMode: 0 os accessModes r_ok).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: File\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_File_canWrite0 = ( |
            | 
            java_inst_sysAccessMode: 0 os accessModes w_ok).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: File\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_File_exists0 = ( |
            | 
            java_inst_sysAccessMode: 0 os accessModes f_ok).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: File\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_File_isAbsolute = ( |
             selfStrPath <- ''.
            | 
            java_io_File_path_ java_inst_athrowIfNull.
            selfStrPath: java_io_File_path_ o_javaStrToSelfStr.
            (0 os_file isAbsolutePath: selfStrPath) ifTrue: [java_true]
                                                      False: [java_false]).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: File\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_File_isDirectory0 = ( |
            | 
            java_inst_statOp: [|:statObj| 
                (statObj s_isdirIfFail: [^ java_false]) ifTrue: [java_true]
                                                         False: [java_false].
            ] IfFail: [java_false]).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: File\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_File_isFile0 = ( |
            | 
            java_inst_statOp: [|:statObj| 
                (statObj s_isregIfFail: [^ java_false]) ifTrue: [java_true]
                                                         False: [java_false].
            ] IfFail: [java_false]).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: File\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_File_lastModified0 = ( |
            | 
            java_inst_statOp: [|:statObj. v|
                v: (statObj st_mtimeIfFail: [^ java_zero_long]).
                (0 time msecPerDay java_inst_lmul: (v at: 0)) java_inst_ladd: (v at: 1).
            ] IfFail: [java_zero_long]).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: File\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_File_length0 = ( |
            | 
            java_inst_statOp: [|:statObj|
                statObj st_sizeIfFail: [^ java_zero_long].
            ] IfFail: [java_zero_long]).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: File\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_File_mkdir0 = ( |
             path.
            | 
            path: java_io_File_path_.
            path java_inst_athrowIfNull.
            0 os mkdir: path o_javaStrToSelfStr
                    Mode: 8r771
                  IfFail: [^ java_false].
            java_true.  "Indicate success.").
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: RandomAccessFile\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_RandomAccessFile_close = ( |
            | 
            java_io_FileInputStream_fd_ java_inst_closeFileDescriptor).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: RandomAccessFile\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_RandomAccessFile_length = ( |
             end <- 0.
             selfFile.
            | 
            java_io_RandomAccessFile_fd_ java_inst_athrowIfNullMessage: 'null FileDescriptor'.
            selfFile: (java_io_RandomAccessFile_fd_ java_inst_getSelfFileIfFail: [
                java_inst_IOException.
            ]).
            java_inst_tripleSeek: selfFile Cur: [] End: [|:e| end: e].
            end).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: RandomAccessFile\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_RandomAccessFile_open_Ljava_lang_String: name Z: writable = ( |
             f <- 0.
             flags.
             m <- 0.
            | 
            flags: 0 os_file flags.
            (o_javaBoolToSelfBool: writable) ifTrue: [
                m: 8r664.
                f: flags readWrite || flags create.
            ] False: [
                m: 0.
                f: flags read.
            ].
            java_inst_openFileName: name
                             Flags: f
                              Mode: m
                       FileDescObj: java_io_RandomAccessFile_fd_).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: RandomAccessFile\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_RandomAccessFile_readBytes_Array_B: byteArray I: off I: len = ( |
            | 
            java_inst_readFromFileDescObj: java_io_RandomAccessFile_fd_
                                     Into: byteArray
                                   Offset: off
                                   Length: len
                                 MinBytes: 1).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: io\x7fCategory: RandomAccessFile\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_io_RandomAccessFile_seek_J: pos = ( |
             selfFile.
            | 
            java_io_RandomAccessFile_fd_ java_inst_athrowIfNullMessage: 'null FileDescriptor'.
            selfFile: (java_io_RandomAccessFile_fd_ java_inst_getSelfFileIfFail: [
                java_inst_IOException.
            ]).
            selfFile lseekOffset: pos Whence: selfFile seek_set IfFail: [
                java_inst_IOException.
            ].
            self).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: ClassLoader\x7fComment: Corresponding native method defined in ...share/java/lang/class.c.\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_ClassLoader_defineClass0_Array_B: data I: offset I: length = ( |
             bytes.
             cl.
             dlen <- 0.
            | 
            data java_inst_athrowIfNull.
            dlen: data java_inst_arraylength.
            offset java_inst_iflt   ||
            [length java_inst_iflt] ||
            [(offset java_inst_iadd: length) java_inst_if_icmpgt: dlen] ifTrue: [
                java_inst_athrow: java_classes
                    class_java_lang_ArrayIndexOutOfBoundsException.
            ].
            "Transfer the 'data' to a self bytevector."
            bytes: (0 byteVector copySize: length).
            bytes copyRangeDstPos: 0 SrcArray: data SrcPos: offset Len: length.
            cl: (0 pep loader defineClassFromBytes: bytes IfFail: [|:e|
                java_inst_athrow: java_classes class_java_lang_ClassFormatError
                         Message: e. "Supplying the message is my addition. Ole, July 1996."
            ]).
            cl proto_instance java_lang_Object_getClass).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: ClassLoader\x7fComment: Corresponding native method defined in ...share/java/lang/class.c.
How is this method different from the method
java_lang_Class_forName_Ljava_lang_String:?
They seem to do the same!\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_ClassLoader_findSystemClass0_Ljava_lang_String: className = ( |
             cl.
             name <- ''.
            | 
            name: className o_javaStrToSelfStr.
            cl: (0 pep loader getClassNamed: name IfFail: [
                java_inst_athrow: java_classes class_java_lang_ClassNotFoundException Message: name.
            ]).
            cl proto_instance java_lang_Object_getClass).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: ClassLoader\x7fComment: Corresponding native method defined in ...share/java/lang/class.c.\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_ClassLoader_init = ( |
            | 
            self).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: ClassLoader\x7fComment: Corresponding native method defined in ...share/java/lang/class.c.\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_ClassLoader_resolveClass0_Ljava_lang_Class: c = ( |
            | 
            self).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Class\x7fComment: Corresponding native method defined in .../class.c.
How is this method different from the method
java_lang_ClassLoader_findSystemClass_Ljava_lang_String:?
They seem to do the same!\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Class_forName_Ljava_lang_String: className = ( |
             cl.
             name <- ''.
            | 
            name: className o_javaStrToSelfStr.
            cl: (0 pep loader getClassNamed: name IfFail: [
                java_inst_athrow: java_classes class_java_lang_ClassNotFoundException Message: name.
            ]).
            cl proto_instance java_lang_Object_getClass).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Class\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Class_getInterfaces = ( |
             intfs.
             res.
            | 
            intfs: the_class interface_names.
            res: (java_classes class_java_lang_Class array_1 java_inst_newArraySize: intfs size).
            intfs do: [|:className. :idx. cl|
                cl: (0 pep loader getClassNamed: className IfFail: [
                    java_inst_athrow: java_classes class_java_lang_ClassNotFoundException Message: name.
                ]).
                res java_inst_aastore: idx With: cl proto_instance java_lang_Object_getClass.
            ].
            res).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Class\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Class_getName = ( |
            | 
            o_selfStrToJavaStr: the_class class_name).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Class\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Class_getSuperclass = ( |
            | 
            (the_class _Eq: java_classes class_java_lang_Object) ifTrue: [^ java_null].
            the_class super_class proto_instance java_lang_Object_getClass).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Class\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Class_isInterface = ( |
            | 
            the_class class_is_interface ifTrue: [java_true]
                                          False: [java_false]).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Class\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Class_newInstance = ( |
            | 
            the_class class_is_interface || [the_class class_is_abstract] ifTrue: [
                java_inst_athrow: java_classes class_java_lang_InstantiationException.
            ].
            "Also should check for illegal access (how?). %%%"
            0 pep mutatorTracer keepAlive: the_class java_inst_new
                                       Do: [|:inst| inst init_obj]).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Double\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Double_doubleToLongBits_D: val = ( |
             bv.
            | 
            bv: (0 byteVector copySize: 8).
            bv javaAt: 0 PutDouble: val.
            bv javaLongAt: 0).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Double\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Double_longBitsToDouble_J: bits = ( |
             bv.
            | 
            bv: (0 byteVector copySize: 8).
            bv javaAt: 0 PutLong: bits.
            bv javaDoubleAt: 0).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Double\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Double_toString_D: double = ( |
            | 
            o_selfStrToJavaStr: double _FloatPrintString).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Double\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Double_valueOf_Ljava_lang_String: str = ( |
            | 
            0 pep mutatorTracer keepAlive: java_classes class_java_lang_Double
                                             java_inst_new
                                       Do: [|:inst|
                inst init_obj_D: (java_inst_javaStringToSelfFloat: str).
            ]).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Float\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Float_floatToIntBits_F: val = ( |
             bv.
            | 
            bv: (0 byteVector copySize: 4).
            bv javaAt: 0 PutFloat: val.
            bv javaIntAt: 0).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Float\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Float_intBitsToFloat_I: bits = ( |
             bv.
            | 
            bv: (0 byteVector copySize: 4).
            bv javaAt: 0 PutInt: bits.
            bv javaFloatAt: 0).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Float\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Float_toString_F: float = ( |
            | 
            o_selfStrToJavaStr: float _FloatPrintString).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Float\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Float_valueOf_Ljava_lang_String: str = ( |
            | 
            0 pep mutatorTracer keepAlive: java_classes class_java_lang_Float
                                           java_inst_new
                                       Do: [|:inst|
                inst init_obj_F: (java_inst_javaStringToSelfFloat: str).
            ]).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Math\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Math_acos_D: d = ( |
            | d arcCos).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Math\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Math_asin_D: d = ( |
            | d arcSin).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Math\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Math_atan_D: d = ( |
            | d arcTan).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Math\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Math_ceil_D: d = ( |
            | d ceil).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Math\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Math_cos_D: d = ( |
            | d cos).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Math\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Math_floor_D: d = ( |
            | d floor).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Math\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Math_log_D: d = ( |
            | d naturalLog).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Math\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Math_sin_D: d = ( |
            | d sin).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Math\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Math_sqrt_D: d = ( |
            | d squareRoot).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Math\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Math_tan_D: d = ( |
            | d tan).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Object\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Object_clone = ( |
            | 
            'T_NORMAL_OBJECT' = obj_flags ifTrue: [
                is_java_lang_Cloneable ifFalse: [
                    java_inst_athrow: java_classes class_java_lang_CloneNotSupportedException
                             Message: class_name.
                ].
            ].
            _Clone).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Object\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Object_getClass = ( |
            | 
            java_inst_athrowIfNull.
            0 pep mutatorTracer keepAlive: java_classes class_java_lang_Class
                                             java_inst_new
                                       Do: [|:res|
                res init_obj.
                res the_class: my_class.
                res.
            ]).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Object\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Object_hashCode = ( |
            | 
            _IdentityHash).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Object\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Object_notify = ( |
            | 
            check_holds_monitor.
            my_waitQ isEmpty ifFalse: [my_waitQ signal].
            self).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Object\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Object_notifyAll = ( |
            | 
            check_holds_monitor.
            [my_waitQ isEmpty] whileFalse: [my_waitQ signal].
            self).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Object\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Object_wait_J: millis = ( |
             ms <- 0.
            | 
            check_holds_monitor.
            my_waitQ allocateIn: self.  "Lazy allocation."
            ms: millis asInteger.
            "'waiting on: ' print. my_waitQ objectID printLine."
            0 = ms ifTrue: [   "In Java, a wait of 0 ms is forever."
                my_lock forceUnlockForWaitOn: my_waitQ.
            ] False: [
                my_lock forceUnlockForWaitOn: my_waitQ TimeOut: ms.
            ].
            self).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Runtime\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Runtime_buildLibName_Ljava_lang_String: path Ljava_lang_String: filename = ( |
             sname <- ''.
             spath <- ''.
             sres <- ''.
            | 
            path     java_inst_athrowIfNull.
            filename java_inst_athrowIfNull.
            spath: path     o_javaStrToSelfStr.
            sname: filename o_javaStrToSelfStr.
            sres: spath, '/lib', sname, '.so'.   "Gwak! Why did they have to do
                                                  that in a native method?"
            o_selfStrToJavaStr: sres).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Runtime\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Runtime_exitInternal_I: int = ( |
             str <- ''.
            | 
            str: 'exitInternal called with arg: ', int printString.
            str printLine.
            "this_process abort: str.").
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Runtime\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Runtime_initializeLinkerInternal = ( |
            | 
            sync_do: [
                "Should also initialize linker, but for now just return LD_LIBRARY_PATH
                 (as is required). %%%"
                o_selfStrToJavaStr: (0 os environmentAt: 'LD_LIBRARY_PATH'
                                                   IfFail: [^ java_null]).
            ]).
        } | ) 

 bootstrap addSlotsTo: bootstrap stub -> 'globals' -> 'pep' -> 'nativeMethods' -> () From: ( | {
         'Category: java\x7fCategory: lang\x7fCategory: Runtime\x7fModuleInfo: Module: pep_runtime InitialContents: FollowSlot'
        
         java_lang_Runtime_loadFileInternal_Ljava_lang_String: filename = ( |…