compiler/PPCConfiguration.st
changeset 502 1e45d3c96ec5
parent 464 f6d77fee9811
child 515 b5316ef15274
equal deleted inserted replaced
464:f6d77fee9811 502:1e45d3c96ec5
    30 ! !
    30 ! !
    31 
    31 
    32 !PPCConfiguration methodsFor:'accessing'!
    32 !PPCConfiguration methodsFor:'accessing'!
    33 
    33 
    34 arguments
    34 arguments
    35  	arguments isNil ifTrue: [ arguments := self defaultArguments ].
    35  		arguments isNil ifTrue: [ arguments := self defaultArguments ].
    36 	^ arguments
    36 		^ arguments
    37 !
    37 !
    38 
    38 
    39 arguments: args
    39 arguments: args
    40     arguments := args
    40     arguments := args
    41 !
    41 !
    42 
    42 
    43 defaultArguments
    43 defaultArguments
    44  	^ PPCArguments default
    44  		^ PPCArguments default
    45 !
    45 !
    46 
    46 
    47 input: whatever
    47 input: whatever
    48     ir := whatever.
    48     ir := whatever.
    49     self remember: #input.
    49     self remember: #input.