diff options
author | Gabriel Dos Reis <gdr@axiomatics.org> | 2015-12-24 18:05:41 -0800 |
---|---|---|
committer | Gabriel Dos Reis <gdr@axiomatics.org> | 2015-12-24 18:05:41 -0800 |
commit | 4dcf3f97d30a2b892716923ed4e916805ec87436 (patch) | |
tree | 5b41b966349e3c4f9afacef3a2ad60a38d28a8c1 /src/interp/postpar.boot | |
parent | bb81c833c0ff2ff8df936a0cd0182cf255729a41 (diff) | |
download | open-axiom-4dcf3f97d30a2b892716923ed4e916805ec87436.tar.gz |
Replace FUNCALL with apply.
Diffstat (limited to 'src/interp/postpar.boot')
-rw-r--r-- | src/interp/postpar.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/postpar.boot b/src/interp/postpar.boot index e3d88016..db8cb474 100644 --- a/src/interp/postpar.boot +++ b/src/interp/postpar.boot @@ -80,7 +80,7 @@ postTran x == x isnt [.,:.] => postAtom x op := first x op is 'QUOTE => x - symbol? op and (f:= property(op,'postTran)) => FUNCALL(f,x) + symbol? op and (f:= property(op,'postTran)) => apply(f,[x]) op is ["elt",a,b] => u:= postTran [b,:rest x] [postTran op,:rest u] |