compiler/PPCInlinedMethod.st
changeset 505 19d830b74322
parent 503 ff58cd9f1f3c
child 516 3b81c9e53352
equal deleted inserted replaced
504:0fb1f0799fc1 505:19d830b74322
    11 
    11 
    12 
    12 
    13 !PPCInlinedMethod methodsFor:'as yet unclassified'!
    13 !PPCInlinedMethod methodsFor:'as yet unclassified'!
    14 
    14 
    15 call
    15 call
    16     ^ self code
    16     ^ self source
    17 !
       
    18 
    17 
    19 code
    18     "Modified: / 24-07-2015 / 19:45:13 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    20     ^ (String streamContents:[:s | buffer codeOn:s ]) trimRight
       
    21 
       
    22     "Modified (format): / 01-06-2015 / 21:44:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
       
    23 !
    19 !
    24 
    20 
    25 isInline
    21 isInline
    26     ^ true
    22     ^ true
       
    23 !
       
    24 
       
    25 source
       
    26     ^ source isString ifTrue:[ 
       
    27         source
       
    28     ] ifFalse:[ 
       
    29         (String streamContents:[:s | source sourceOn:s ]) trimRight
       
    30     ].
       
    31 
       
    32     "Created: / 24-07-2015 / 19:46:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    27 ! !
    33 ! !
    28 
    34 
    29 !PPCInlinedMethod methodsFor:'code generation - variables'!
    35 !PPCInlinedMethod methodsFor:'code generation - variables'!
    30 
    36 
    31 allocateReturnVariableNamed: name
    37 allocateReturnVariableNamed: name