From 1a18d7b2e1b3796f6dc360e3bae0a57616aa497c Mon Sep 17 00:00:00 2001 From: dos-reis Date: Mon, 4 Jul 2011 16:40:44 +0000 Subject: * interp/setvars.boot: Remove support for script formula. * interp/setvart.boot: Likewise. * interp/diagnostics.boot (sayBrightlyNT1): Move from macros.lisp. (sayBrightly1): Likewise. (sayBrightlyNT): Likewise. (sayBrightly): Likewise. (sayBrightlyI): Likewise. (sayMSG): Likewise. (sayTeX): Likewise. (sayMSG2File): Likewise. * interp/i-output.boot (formulaFormat): Remove. (output): Adjust. * interp/macros.lisp (sayMSGNT): Remove. (sayFORTRAN): Likewise. (sayFORMULA): Likewise. ($formulaOutputstream): Likewise. * interp/sys-globals.boot ($formulaOutputstream): Remove. * interp/spad.lisp ($formulaFormat): Remove. * algebra/exposed.lsp.pamphlet: Do not expose ScriptFormulaFormat and ScriptFormulaFormat1. * algebra/exposed.lsp.pamphlet: Remove. --- src/interp/c-doc.boot | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/interp/c-doc.boot') diff --git a/src/interp/c-doc.boot b/src/interp/c-doc.boot index 19ab4bd4..cfcd96a9 100644 --- a/src/interp/c-doc.boot +++ b/src/interp/c-doc.boot @@ -1272,11 +1272,11 @@ checkDocError u == $constructorName => checkDocMessage u u if $exposeFlag and $exposeFlagHeading then - SAYBRIGHTLY1($exposeFlagHeading,$outStream) + sayBrightly1($exposeFlagHeading,$outStream) sayBrightly $exposeFlagHeading $exposeFlagHeading := nil sayBrightly msg - if $exposeFlag then SAYBRIGHTLY1(msg,$outStream) + if $exposeFlag then sayBrightly1(msg,$outStream) --if called by checkDocFile (see file checkdoc.boot) ++ Augment `u' with information about the owner of the source file -- cgit v1.2.3