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/i-funsel.boot | |
| parent | bb81c833c0ff2ff8df936a0cd0182cf255729a41 (diff) | |
| download | open-axiom-4dcf3f97d30a2b892716923ed4e916805ec87436.tar.gz | |
Replace FUNCALL with apply.
Diffstat (limited to 'src/interp/i-funsel.boot')
| -rw-r--r-- | src/interp/i-funsel.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-funsel.boot b/src/interp/i-funsel.boot index 1deb25cb..066fbc46 100644 --- a/src/interp/i-funsel.boot +++ b/src/interp/i-funsel.boot @@ -876,7 +876,7 @@ findFunctionInCategory(op,dc,tar,args1,args2,$Coerce,$SubDom) == -- cat := constructorCategory dc makeFunc := property(dcName,"makeFunctionList") or systemErrorHere ["findFunctionInCategory",dcName] - [funlist,.] := FUNCALL(makeFunc,"$",dc,$CategoryFrame) + [funlist,.] := apply(makeFunc,["$",dc,$CategoryFrame]) -- get list of implementations and remove sharps maxargs := -1 impls := nil |