SnapShotImage.st
changeset 1470 7b20694c92e7
parent 1448 42ec8770d09f
child 1476 b6b941f16e63
equal deleted inserted replaced
1469:b726d8a4b801 1470:7b20694c92e7
    20         SystemBrowser openOnSnapShotImage:'/export/home/cg/work/stx/projects/smalltalk/st.img'
    20         SystemBrowser openOnSnapShotImage:'/export/home/cg/work/stx/projects/smalltalk/st.img'
    21 
    21 
    22     [author:]
    22     [author:]
    23         Claus Gittinger
    23         Claus Gittinger
    24 "
    24 "
       
    25 !
       
    26 
       
    27 examples
       
    28 "
       
    29     |i m|
       
    30 
       
    31     i := self for:'st.img'.
       
    32     m := i memory.
       
    33     m  fetchObjectAt:16r38000000
       
    34 "
    25 ! !
    35 ! !
    26 
    36 
    27 !SnapShotImage class methodsFor:'instance creation'!
    37 !SnapShotImage class methodsFor:'instance creation'!
    28 
    38 
    29 for:aFilename
    39 for:aFilename
    30     ^ self new for:aFilename
    40     ^ self new for:aFilename
       
    41 ! !
       
    42 
       
    43 !SnapShotImage methodsFor:'accessing'!
       
    44 
       
    45 memory
       
    46     ^ memory
    31 ! !
    47 ! !
    32 
    48 
    33 !SnapShotImage methodsFor:'private'!
    49 !SnapShotImage methodsFor:'private'!
    34 
    50 
    35 fetchGlobals
    51 fetchGlobals