Changeset 12166


Ignore:
Timestamp:
Jun 1, 2009, 12:13:52 AM (10 years ago)
Author:
gb
Message:

Set *batch-flag* based on kernel global value early in startup process
(before initializing streams).

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/level-1/l1-boot-2.lisp

    r11980 r12166  
    6868
    6969
    70 (defloadvar *batch-flag* (not (eql (%get-kernel-global 'batch-flag) 0)))
     70(defvar *batch-flag* (not (eql (%get-kernel-global 'batch-flag) 0)))
    7171(defloadvar *quiet-flag* nil)
    7272(defvar *terminal-input* ())
Note: See TracChangeset for help on using the changeset viewer.