(FILECREATED " 2-Feb-86 18:40:37" {DSK}<LISPFILES2>LINK.LSP;2 5261   

      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.LSP COPYRIGHT ("Quintus Computer Systems, Inc" 1986))
(DECLARE: DONTCOPY
  (FILEMAP (NIL (5117 5170 (QP.DUMMY.LINK.FUNC 5127 . 5168)))))
STOP