compiler/tests/extras/PPCLRPParser.st
changeset 529 439c4057517f
parent 516 3b81c9e53352
equal deleted inserted replaced
528:ebfddc82b8bb 529:439c4057517f
    58     aDictionary associations do: [:asoc|
    58     aDictionary associations do: [:asoc|
    59         keys add: asoc key.
    59         keys add: asoc key.
    60     ].
    60     ].
    61 
    61 
    62     compiled := (self methodizeBlock: aBlockNode withArguments: keys) compiledMethod.
    62     compiled := (self methodizeBlock: aBlockNode withArguments: keys) compiledMethod.
    63     retval := compiled valueWithReceiver: Object new arguments: {aDictionary}.
    63     retval := compiled valueWithReceiver: Object new options: {aDictionary}.
    64 
    64 
    65     ^retval.
    65     ^retval.
    66 !
    66 !
    67 
    67 
    68 methodizeBlock: parsedBlock withArguments: anArray
    68 methodizeBlock: parsedBlock withArguments: anArray