diff options
| author | dos-reis <gdr@axiomatics.org> | 2011-05-19 01:22:11 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2011-05-19 01:22:11 +0000 |
| commit | af7a143e3a13e932e243165814fa40424507dae0 (patch) | |
| tree | b0b22dedd5754449a9565049f3b4552f4ae2c71f /src/interp/i-toplev.boot | |
| parent | 43e465553496af8449014857fdd95386b6e8fd66 (diff) | |
| download | open-axiom-af7a143e3a13e932e243165814fa40424507dae0.tar.gz | |
* interp/buildom.boot (lookupInDomainVector): Establish a new
binding for $lookupDefaults.
Diffstat (limited to 'src/interp/i-toplev.boot')
| -rw-r--r-- | src/interp/i-toplev.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/i-toplev.boot b/src/interp/i-toplev.boot index 50b372ce..fc7d4cf2 100644 --- a/src/interp/i-toplev.boot +++ b/src/interp/i-toplev.boot @@ -154,7 +154,7 @@ processInteractive(form, posnForm) == object := processInteractive1(form, posnForm) --object := ERRORSET(['processInteractive1,LIST('QUOTE,form),['QUOTE,posnForm]],'t,'t) if not($ProcessInteractiveValue) then - if $reportInstantiations = true then + if $reportInstantiations then reportInstantiations() CLRHASH $instantRecord writeHistModesAndValues() @@ -203,7 +203,7 @@ recordAndPrint(x,md) == if $printStorageIfTrue then printStorage() if $printStatisticsSummaryIfTrue then printStatisticsSummary() if integer? $HTCompanionWindowID then mkCompanionPage md - $mkTestFlag = true => recordAndPrintTest md + $mkTestFlag => recordAndPrintTest md $runTestFlag => $mkTestOutputType := md 'done |