diff options
Diffstat (limited to 'src/interp/i-eval.boot')
| -rw-r--r-- | src/interp/i-eval.boot | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/interp/i-eval.boot b/src/interp/i-eval.boot index 7850f956..91499994 100644 --- a/src/interp/i-eval.boot +++ b/src/interp/i-eval.boot @@ -133,9 +133,7 @@ evaluateType form == form = "$" => form $expandSegments : local := nil form is ['typeOf,.] => - form' := mkAtree form - bottomUp form' - objVal getValue(form') + objVal getValue elaborateForm form form is [op,:argl] => op='CATEGORY => argl is [x,:sigs] => [op,x,:[evaluateSignature(s) for s in sigs]] |