(FILECREATED " 8-Feb-86 15:25:13" {DSK}<LISPFILES2>IMPROVEDDCOMS>LINK.;1
 4889   

      changes to:  (VARS LINKCOMS))


(* Copyright (c) 1986 by Quintus Computer Systems, Inc. All rights reserved.)

(PRETTYCOMPRINT LINKCOMS)

(RPAQQ LINKCOMS
 ((VARS (QP.GC.MINIMUM 0) (QP.CHARACTER.ESCAPES 0) (QP.PROMPT.ATOM 0) (
QP.EDITOR.STATE 0) (QP.MAXDEPTH 0) (QP.UNKNOWN 0) (QP.SYSTEM.SOLIDIFIED 0) (QP.SYSTEM.TYPE 0) (
QP.SAVE.FLAG 0) (QP.STREAM.COUNTER 0) (QP.STYLE.MULTIPLE 0) (QP.STYLE.DISCONTIGUOUS 0) (
QP.STYLE.SINGLE 0) (QP.STACK.SHIFT.FLAG 0) (QP.SKIP.INVOCATION 0) (QP.INTERNAL.MODE.CHANGE 0) (
QP.INSIDE.DEBUGGER 0) (QP.INVOCATION.COUNT 0) (QP.FILE.ERRORS 0) (QP.FILE.INDEX 0) (QP.FIRST.TRAP 0) (
QP.BREAK.LEVEL 0) (QP.BACKUP.MODE 0) (QP.TMP.COUNT 0) (QP.TOP.TRACE.STATE 0) (QP.TRACE.STATE 0) (
QP.LURCH 0) (QP.LEASH.SPY 0) (QP.LEASH 0) (QP.LOAD.PROC 0) (QP.LOAD.COUNT 0) (QP.LOAD.LEVEL 0) (
QP.WRITE.PORTRAY 0) (QP.WRITE.QUOTE 0) (QP.DEBUG.PRINT.DEPTH 0) (QP.DEFINED.MODULE 0)) (ADDVARS (
GLOBALVARS QP.GC.MINIMUM) (GLOBALVARS QP.CHARACTER.ESCAPES) (GLOBALVARS QP.PROMPT.ATOM) (GLOBALVARS 
QP.EDITOR.STATE) (GLOBALVARS QP.MAXDEPTH) (GLOBALVARS QP.UNKNOWN) (GLOBALVARS QP.SYSTEM.SOLIDIFIED) (
GLOBALVARS QP.SYSTEM.TYPE) (GLOBALVARS QP.SAVE.FLAG) (GLOBALVARS QP.STREAM.COUNTER) (GLOBALVARS 
QP.STYLE.MULTIPLE) (GLOBALVARS QP.STYLE.DISCONTIGUOUS) (GLOBALVARS QP.STYLE.SINGLE) (GLOBALVARS 
QP.STACK.SHIFT.FLAG) (GLOBALVARS QP.SKIP.INVOCATION) (GLOBALVARS QP.INTERNAL.MODE.CHANGE) (GLOBALVARS 
QP.INSIDE.DEBUGGER) (GLOBALVARS QP.INVOCATION.COUNT) (GLOBALVARS QP.FILE.ERRORS) (GLOBALVARS 
QP.FILE.INDEX) (GLOBALVARS QP.FIRST.TRAP) (GLOBALVARS QP.BREAK.LEVEL) (GLOBALVARS QP.BACKUP.MODE) (
GLOBALVARS QP.TMP.COUNT) (GLOBALVARS QP.TOP.TRACE.STATE) (GLOBALVARS QP.TRACE.STATE) (GLOBALVARS 
QP.LURCH) (GLOBALVARS QP.LEASH.SPY) (GLOBALVARS QP.LEASH) (GLOBALVARS QP.LOAD.PROC) (GLOBALVARS 
QP.LOAD.COUNT) (GLOBALVARS QP.LOAD.LEVEL) (GLOBALVARS QP.WRITE.PORTRAY) (GLOBALVARS QP.WRITE.QUOTE) (
GLOBALVARS QP.DEBUG.PRINT.DEPTH) (GLOBALVARS QP.DEFINED.MODULE)) (FNS QP.DUMMY.LINK.FUNC)))

(RPAQQ QP.GC.MINIMUM
 0)

(RPAQQ QP.CHARACTER.ESCAPES
 0)

(RPAQQ QP.PROMPT.ATOM
 0)

(RPAQQ QP.EDITOR.STATE
 0)

(RPAQQ QP.MAXDEPTH
 0)

(RPAQQ QP.UNKNOWN
 0)

(RPAQQ QP.SYSTEM.SOLIDIFIED
 0)

(RPAQQ QP.SYSTEM.TYPE
 0)

(RPAQQ QP.SAVE.FLAG
 0)

(RPAQQ QP.STREAM.COUNTER
 0)

(RPAQQ QP.STYLE.MULTIPLE
 0)

(RPAQQ QP.STYLE.DISCONTIGUOUS
 0)

(RPAQQ QP.STYLE.SINGLE
 0)

(RPAQQ QP.STACK.SHIFT.FLAG
 0)

(RPAQQ QP.SKIP.INVOCATION
 0)

(RPAQQ QP.INTERNAL.MODE.CHANGE
 0)

(RPAQQ QP.INSIDE.DEBUGGER
 0)

(RPAQQ QP.INVOCATION.COUNT
 0)

(RPAQQ QP.FILE.ERRORS
 0)

(RPAQQ QP.FILE.INDEX
 0)

(RPAQQ QP.FIRST.TRAP
 0)

(RPAQQ QP.BREAK.LEVEL
 0)

(RPAQQ QP.BACKUP.MODE
 0)

(RPAQQ QP.TMP.COUNT
 0)

(RPAQQ QP.TOP.TRACE.STATE
 0)

(RPAQQ QP.TRACE.STATE
 0)

(RPAQQ QP.LURCH
 0)

(RPAQQ QP.LEASH.SPY
 0)

(RPAQQ QP.LEASH
 0)

(RPAQQ QP.LOAD.PROC
 0)

(RPAQQ QP.LOAD.COUNT
 0)

(RPAQQ QP.LOAD.LEVEL
 0)

(RPAQQ QP.WRITE.PORTRAY
 0)

(RPAQQ QP.WRITE.QUOTE
 0)

(RPAQQ QP.DEBUG.PRINT.DEPTH
 0)

(RPAQQ QP.DEFINED.MODULE
 0)

(ADDTOVAR GLOBALVARS
 QP.GC.MINIMUM)

(ADDTOVAR GLOBALVARS
 QP.CHARACTER.ESCAPES)

(ADDTOVAR GLOBALVARS
 QP.PROMPT.ATOM)

(ADDTOVAR GLOBALVARS
 QP.EDITOR.STATE)

(ADDTOVAR GLOBALVARS
 QP.MAXDEPTH)

(ADDTOVAR GLOBALVARS
 QP.UNKNOWN)

(ADDTOVAR GLOBALVARS
 QP.SYSTEM.SOLIDIFIED)

(ADDTOVAR GLOBALVARS
 QP.SYSTEM.TYPE)

(ADDTOVAR GLOBALVARS
 QP.SAVE.FLAG)

(ADDTOVAR GLOBALVARS
 QP.STREAM.COUNTER)

(ADDTOVAR GLOBALVARS
 QP.STYLE.MULTIPLE)

(ADDTOVAR GLOBALVARS
 QP.STYLE.DISCONTIGUOUS)

(ADDTOVAR GLOBALVARS
 QP.STYLE.SINGLE)

(ADDTOVAR GLOBALVARS
 QP.STACK.SHIFT.FLAG)

(ADDTOVAR GLOBALVARS
 QP.SKIP.INVOCATION)

(ADDTOVAR GLOBALVARS
 QP.INTERNAL.MODE.CHANGE)

(ADDTOVAR GLOBALVARS
 QP.INSIDE.DEBUGGER)

(ADDTOVAR GLOBALVARS
 QP.INVOCATION.COUNT)

(ADDTOVAR GLOBALVARS
 QP.FILE.ERRORS)

(ADDTOVAR GLOBALVARS
 QP.FILE.INDEX)

(ADDTOVAR GLOBALVARS
 QP.FIRST.TRAP)

(ADDTOVAR GLOBALVARS
 QP.BREAK.LEVEL)

(ADDTOVAR GLOBALVARS
 QP.BACKUP.MODE)

(ADDTOVAR GLOBALVARS
 QP.TMP.COUNT)

(ADDTOVAR GLOBALVARS
 QP.TOP.TRACE.STATE)

(ADDTOVAR GLOBALVARS
 QP.TRACE.STATE)

(ADDTOVAR GLOBALVARS
 QP.LURCH)

(ADDTOVAR GLOBALVARS
 QP.LEASH.SPY)

(ADDTOVAR GLOBALVARS
 QP.LEASH)

(ADDTOVAR GLOBALVARS
 QP.LOAD.PROC)

(ADDTOVAR GLOBALVARS
 QP.LOAD.COUNT)

(ADDTOVAR GLOBALVARS
 QP.LOAD.LEVEL)

(ADDTOVAR GLOBALVARS
 QP.WRITE.PORTRAY)

(ADDTOVAR GLOBALVARS
 QP.WRITE.QUOTE)

(ADDTOVAR GLOBALVARS
 QP.DEBUG.PRINT.DEPTH)

(ADDTOVAR GLOBALVARS
 QP.DEFINED.MODULE)
(DEFINEQ

(QP.DUMMY.LINK.FUNC

(LAMBDA NIL T))
)
(PUTPROPS LINK COPYRIGHT ("Quintus Computer Systems, Inc" 1986))
(DECLARE: DONTCOPY
  (FILEMAP (NIL (4751 4802 (QP.DUMMY.LINK.FUNC 4761 . 4800)))))
STOP