Re: [Axiom-developer] $traceflag

[Gabriel Dos Reis]

Gabriel Dos Reis <address@hidden> writes:

| Tim --
| 
|   I believe the use of  $TRACEFLAG in the routine S-PROCESS (spad.lisp)
| is a typo for |$TraceFlag|.

Fixed with this.
Applied to Axiom.silver.

-- Gaby

2007-08-11  Gabriel Dos Reis  <address@hidden>

        * src/interp/spad.lisp.pamphlet (S-PROCESS): Fix typo.

*** src/interp/spad.lisp.pamphlet       (revision 21590)
--- src/interp/spad.lisp.pamphlet       (local)
***************
*** 422,428 ****
        (|$LocalFrame| '((NIL))))
    (prog ((CURSTRM CUROUTSTREAM) |$s| |$x| |$m| u)
       (declare (special CURSTRM |$s| |$x| |$m| CUROUTSTREAM))
!       (SETQ $TRACEFLAG T)
        (if (NOT X) (RETURN NIL))
        (setq X (if $BOOT (DEF-RENAME (|new2OldLisp| X))
                  (|parseTransform| (|postTransform| X))))
--- 422,428 ----
        (|$LocalFrame| '((NIL))))
    (prog ((CURSTRM CUROUTSTREAM) |$s| |$x| |$m| u)
       (declare (special CURSTRM |$s| |$x| |$m| CUROUTSTREAM))
!       (SETQ |$TraceFlag| T)
        (if (NOT X) (RETURN NIL))
        (setq X (if $BOOT (DEF-RENAME (|new2OldLisp| X))
                  (|parseTransform| (|postTransform| X))))