- live browsing of Self object memory -

lobby traitscallCount

CopyDowns: vector

CreatorPath: traits callCount

Module: profiling

parent* = traits clonable
+ =
( 
    copyNormal:    normal + other normal
     Access:       access + other access
     Blocks:       blocks + other blocks
     Di:           di + other di
     Poly:         polymorphic + other polymorphic
     Misses:       misses + other misses
     DiMisses:     diMisses + other diMisses)
- =
( 
    copyNormal:    normal - other normal
     Access:       access - other access
     Blocks:       blocks - other blocks
     Di:           di - other di
     Poly:         polymorphic - other polymorphic
     Misses:       misses - other misses
     DiMisses:     diMisses - other diMisses)
callPrintString =
( 
    ((normal printString, ' method calls\n') &
     (blocks printString, ' block method calls\n') &
     (access printString, ' access method calls\n') &
     (di     printString, ' di method calls\n') &
     (total  printString, ' total method calls\n')) flatString)
copyCurrent =
( 
    "try to not disturb the results - call primitives directly"
     copyNormal:     _NumberOfMethodCalls
       Access:       _NumberOfAccessMethodCalls
       Blocks:       _NumberOfBlockMethodCalls
       Di:           _NumberOfDIMethodCalls
       Poly:         _NumberOfPICSends
       Misses:       _NumberOfICMisses
       DiMisses:     _NumberOfDIMisses)
copyNormal:Access:Blocks:Di:Poly:Misses:DiMisses: =
( | r |
    r: copy.
    r normal: n.
    r access: a.
    r blocks: b.
    r di: d.
    r polymorphic: p.
    r misses: m.
    r diMisses: dm.
    r)
missPrintString =
( 
    "PIC counting doesn't work right now -- Urs 8/93"
    ("(polymorphic printString, ' calls from polymorphic call sites\n') &"
     (misses      printString, ' inline cache misses\n') &
     (diMisses    printString, ' DI misses\n')) flatString)
monomorphic = ( total - polymorphic)number of sends from monomorphic call sites
total = ( normal + access + blocks + di)total number of sends