[Openmcl-devel] More CLIM Issues

Craig Lanning craig.t.lanning at gmail.com
Thu Aug 4 12:19:01 PDT 2016


I'm making a little progress (I think).

When I compile the CLIM Silica system, I see complaints about undefined
functions.  Some of these are slot accessor functions that don't get
defined until CLIM Standalone is compiled.

Anyway, I compile and load CLIM Utils, CLIM Silica, and then CLIM
Standalone.

While compiling CLIM Standalone, it runs into the following error:

;; Compiling clim:clim;accept-values.lisp.newest
;Compiler warnings for "clim:clim;accept-values.lisp.newest" :
;   In (PROMPT-FOR-ACCEPT (ACCEPT-VALUES-STREAM T T)) inside an
anonymous lambda form: Unused lexical variable ACCEPT-ARGS
> Error: The value COMPILE-FILE is not of the expected type
CCL::LEXICAL-ENVIRONMENT.
> While executing: CCL::DEFINITION-ENVIRONMENT, in process listener(1).
> Type :POP to abort, :R for a list of available restarts.
> Type :? for other options.
1 > :b

Attached is the entire output from doing the compiles and the output of
the :b command.

The problem here is that I'm not even sure where to look for the real
problem.  In CLIM Utils, there were a few things that touched on the
environment.  I think I added the appropriate #+/#- things to that
code.

Can anyone tell me anything that might help me figure out what the real
problem is?

Craig
-------------- next part --------------
ccl64
;; Loaded /home/craig/.local/share/ccl/hacks
;; Loading System CLSM...
;; Loading /home/craig/.local/systems/clsm/package.lisp
;; Loading /home/craig/.local/systems/clsm/globals.lx64fsl
;; Loading /home/craig/.local/systems/clsm/generics.lx64fsl
;; Loading /home/craig/.local/systems/clsm/conditions.lx64fsl
;; Loading /home/craig/.local/systems/clsm/repos.lx64fsl
;; Loading /home/craig/.local/systems/clsm/system.lx64fsl
;; Loading /home/craig/.local/systems/clsm/functions.lx64fsl
;; Loading /home/craig/.local/systems/clsm/modules.lx64fsl
;; Loading /home/craig/.local/systems/clsm/system-module.lx64fsl
;; Loading /home/craig/.local/systems/clsm/lisp-modules.lx64fsl
;; Loading /home/craig/.local/systems/clsm/group-modules.lx64fsl
;; Loading /home/craig/.local/systems/clsm/plan.lx64fsl
;; Loading /home/craig/.local/systems/clsm/build-plan.lx64fsl
;; Loading /home/craig/.local/systems/clsm/find-component.lx64fsl
;; Loading /home/craig/.local/systems/clsm/add-module.lx64fsl
;; Loading /home/craig/.local/systems/clsm/compile-system.lx64fsl
;; Loading /home/craig/.local/systems/clsm/load-system.lx64fsl
;; Loading /home/craig/.local/systems/clsm/test-system.lx64fsl
;; Loading /home/craig/.local/systems/clsm/add-repo.lx64fsl
;; Loading /home/craig/.local/systems/clsm/update-repo.lx64fsl
;; Loading /home/craig/.local/systems/clsm/sysdcl-load.lx64fsl
;; Loading /home/craig/.local/systems/clsm/logical-host-load.lx64fsl
;; Loading /home/craig/.local/systems/clsm/repodef-load.lx64fsl
;; Loading /home/craig/.local/systems/clsm/macros.lx64fsl
;; Loading /home/craig/.local/systems/clsm/top-level.lx64fsl
;; System CLSM Loaded

;; Load /home/craig/.config/clsm/sys.translations
;; Defining Logical Host "sys"
Loading /home/craig/.config/clsm/user.translations
;; Defining Logical Host "user"
;; Loading /home/craig/.config/clsm/clozure-common-lisp.repo
;; Defining Repo :CLOZURE-COMMON-LISP
;; Load /home/craig/.config/clsm/user.repo
;; Defining Repo :USER
;; Loading repo defs from User Repo
;; Load Repo /home/craig/.local/site/clim.repo
;; Defining Repo :CLIM
;; Load Repo /home/craig/.local/site/games.repo
;; Defining Repo :GAMES
;; Load Repo /home/craig/.local/site/toybox-apps.repo
;; Defining Repo :TOYBOX-APPS
;; Load Repo /home/craig/.local/site/toybox-libs.repo
;; Defining Repo :TOYBOX-LIBS
;; Loading repo defs from the System Repo
;; CLSM Dev      => "/home/src/github/clim/clim2/"
;; CLSM Dev-Site => #P"/home/src/github/clim/clim2/site/"
;; CLSM Name     => :CLIM2

;; Create repo for current directory
;; CLSM Dev-Repo => #<DEVELOPMENT-REPO :clim2 "Clim2" #x3020006BFF3D>
;; Loading repo defs from the Developement Repo

;; Defining System :COMMON-LISP-SYSTEM-MANAGER
Welcome to Clozure Common Lisp Version 1.11-r16635  (LinuxX8664)!

CCL is developed and maintained by Clozure Associates. For more information
about CCL visit http://ccl.clozure.com.  To enquire about Clozure's Common Lisp
consulting services e-mail info at clozure.com or visit http://www.clozure.com.

? (clsm:compile-system :clim-utils)

;; Defining Logical Host "clim"
;; Defining Logical Host "clim"
;; Defining System :CLIM-UTILS
;; Compiling System CLIM Utils
;; Compiling clim:utils;packages.lisp.newest
;; Loading clim:utils;packages.lx64fsl.newest
;; Compiling clim:utils;defun-utilities.lisp.newest
;; Loading clim:utils;defun-utilities.lx64fsl.newest
;; Compiling clim:utils;reader.lisp.newest
;; Loading clim:utils;reader.lx64fsl.newest
;; Compiling clim:utils;clos-patches.lisp.newest
;; Loading clim:utils;clos-patches.lx64fsl.newest
;; Compiling clim:utils;clos.lisp.newest
;; Loading clim:utils;clos.lx64fsl.newest
;; Compiling clim:utils;utilities.lisp.newest
;; Loading clim:utils;utilities.lx64fsl.newest
;; Compiling clim:utils;lisp-utilities.lisp.newest
; Warning: You haven't defined FOLLOW-SYNONYM-STREAM for this implementation.  A stub has been provided.
; While executing: #<Anonymous Function #x3020007FBE8F>, in process listener(1).
;; Loading clim:utils;lisp-utilities.lx64fsl.newest
;; Compiling clim:utils;processes.lisp.newest
;; Loading clim:utils;processes.lx64fsl.newest
;; Compiling clim:utils;queue.lisp.newest
;; Loading clim:utils;queue.lx64fsl.newest
;; Compiling clim:utils;timers.lisp.newest
;; Loading clim:utils;timers.lx64fsl.newest
;; Compiling clim:utils;protocols.lisp.newest
;; Loading clim:utils;protocols.lx64fsl.newest
;; Compiling clim:utils;clim-streams.lisp.newest
;; Loading clim:utils;clim-streams.lx64fsl.newest
;; Compiling clim:utils;clim-macros.lisp.newest
;; Loading clim:utils;clim-macros.lx64fsl.newest
;; Compiling clim:utils;transformations.lisp.newest
;; Loading clim:utils;transformations.lx64fsl.newest
;; Compiling clim:utils;regions.lisp.newest
;; Loading clim:utils;regions.lx64fsl.newest
;; Compiling clim:utils;region-arithmetic.lisp.newest
;; Loading clim:utils;region-arithmetic.lx64fsl.newest
;; Compiling clim:utils;extended-regions.lisp.newest
;; Loading clim:utils;extended-regions.lx64fsl.newest
;; Compiling clim:utils;base-designs.lisp.newest
;; Loading clim:utils;base-designs.lx64fsl.newest
;; Compiling clim:utils;designs.lisp.newest
;; Loading clim:utils;designs.lx64fsl.newest
;; Compiled and Loaded System DEVELOPMENT CLIM Utils
#<SYSTEM Development CLIM-UTILS 0.0.0 (21 Components) #x3020004F26CD>
? (clsm:compile-system :clim-silica)

;; Defining System :CLIM-SILICA
;; Compiling System CLIM Silica
;; System DEVELOPMENT CLIM Utils already loaded
;; Compiling clim:silica;macros.lisp.newest
;; Loading clim:silica;macros.lx64fsl.newest
;; Compiling clim:silica;classes.lisp.newest
;; Loading clim:silica;classes.lx64fsl.newest
;; Compiling clim:silica;text-style.lisp.newest
;; Loading clim:silica;text-style.lx64fsl.newest
;; Compiling clim:silica;sheet.lisp.newest
;; Loading clim:silica;sheet.lx64fsl.newest
;; Compiling clim:silica;mirror.lisp.newest
;; Loading clim:silica;mirror.lx64fsl.newest
;; Compiling clim:silica;event.lisp.newest
;; Loading clim:silica;event.lx64fsl.newest
;; Compiling clim:silica;port.lisp.newest
;; Loading clim:silica;port.lx64fsl.newest
;; Compiling clim:silica;medium.lisp.newest
;; Loading clim:silica;medium.lx64fsl.newest
;; Compiling clim:silica;framem.lisp.newest
;; Loading clim:silica;framem.lx64fsl.newest
;; Compiling clim:silica;graphics.lisp.newest
;Compiler warnings for "clim:silica;graphics.lisp.newest" :
;   In DRAW-TEXT: IGNORE declaration for unknown variable TOWARDS-Y
;   In DRAW-TEXT: IGNORE declaration for unknown variable TOWARDS-X
;; Loading clim:silica;graphics.lx64fsl.newest
;; Compiling clim:silica;pixmaps.lisp.newest
;; Loading clim:silica;pixmaps.lx64fsl.newest
;; Compiling clim:silica;std-sheet.lisp.newest
;; Loading clim:silica;std-sheet.lx64fsl.newest
;; Compiling clim:silica;layout.lisp.newest
;; Loading clim:silica;layout.lx64fsl.newest
;; Compiling clim:silica;db-layout.lisp.newest
;; Loading clim:silica;db-layout.lx64fsl.newest
;; Compiling clim:silica;db-box.lisp.newest
;; Loading clim:silica;db-box.lx64fsl.newest
;; Compiling clim:silica;db-table.lisp.newest
;; Loading clim:silica;db-table.lx64fsl.newest
;; Compiling clim:silica;gadgets.lisp.newest
;; Loading clim:silica;gadgets.lx64fsl.newest
;; Compiling clim:silica;db-border.lisp.newest
;; Loading clim:silica;db-border.lx64fsl.newest
;; Compiling clim:silica;db-scroll.lisp.newest
;; Loading clim:silica;db-scroll.lx64fsl.newest
;Compiler warnings for "clim:silica;db-scroll.lisp.newest" :
;   In CLIM-SILICA::WITH-SHEET-MEDIUM-BODY inside (CLIM:SCROLL-EXTENT (CLIM:BASIC-SHEET T T)) inside an anonymous lambda form: Undefined function CLIM:REPLAY
;   In CLIM-SILICA::WITH-MEDIUM-CLIPPING-REGION-BODY inside CLIM-SILICA::WITH-SHEET-MEDIUM-BODY inside (CLIM:SCROLL-EXTENT (CLIM:BASIC-SHEET T T)) inside an anonymous lambda form: Undefined function CLIM:REPLAY
;Compiler warnings for "clim:silica;gadgets.lisp.newest" :
;   In (CLIM:ALLOCATE-SPACE (CLIM:VIEWPORT T T)) inside an anonymous lambda form: Undefined type CLIM:CLIM-STREAM-PANE (2 references)
;   In CLIM:MAKE-CLIM-STREAM-PANE inside (INITIALIZE-INSTANCE :AFTER (CLIM:CHECK-BOX)) inside an anonymous lambda form: Undefined function CLIM-INTERNALS::MAKE-CLIM-STREAM-PANE-1
;   In CLIM:MAKE-CLIM-STREAM-PANE inside (INITIALIZE-INSTANCE :AFTER (CLIM:RADIO-BOX)) inside an anonymous lambda form: Undefined function CLIM-INTERNALS::MAKE-CLIM-STREAM-PANE-1
;Compiler warnings for "clim:silica;db-layout.lisp.newest" :
;   In (CLIM:CHANGE-SPACE-REQUIREMENTS :AROUND (CLIM-SILICA:LAYOUT-MIXIN)) inside an anonymous lambda form: Undefined function CLIM:LAYOUT-FRAME
;   In CLIM-SILICA::INVOKE-WITH-CHANGING-SPACE-REQUIREMENTS: Undefined function CLIM:LAYOUT-FRAME
;   In an anonymous lambda form inside CLIM-SILICA::INVOKE-WITH-CHANGING-SPACE-REQUIREMENTS: Undefined function CLIM:APPLICATION-FRAME-P
;   In (CLIM:NOTE-SPACE-REQUIREMENTS-CHANGED (CLIM:TOP-LEVEL-SHEET T)) inside an anonymous lambda form: Undefined function CLIM:LAYOUT-FRAME
;Compiler warnings for "clim:silica;layout.lisp.newest" :
;   In (CLIM-SILICA:NOTE-LAYOUT-MIXIN-REGION-CHANGED (CLIM:TOP-LEVEL-SHEET)) inside an anonymous lambda form: Undefined function CLIM:FRAME-TOP-LEVEL-SHEET
;   In (CLIM-SILICA:NOTE-LAYOUT-MIXIN-REGION-CHANGED (CLIM:TOP-LEVEL-SHEET)) inside an anonymous lambda form: Undefined function CLIM:LAYOUT-FRAME
;   In (CLIM:WINDOW-STACK-ON-BOTTOM (CLIM:TOP-LEVEL-SHEET)) inside an anonymous lambda form: Undefined function CLIM:WINDOW-TOP-LEVEL-WINDOW
;   In (CLIM:WINDOW-STACK-ON-TOP (CLIM:TOP-LEVEL-SHEET)) inside an anonymous lambda form: Undefined function CLIM:WINDOW-TOP-LEVEL-WINDOW
;   In (CLIM:WINDOW-VISIBILITY (CLIM:TOP-LEVEL-SHEET)) inside an anonymous lambda form: Undefined function CLIM:FRAME-STATE
;   In ((SETF CLIM:WINDOW-VISIBILITY) (T CLIM:TOP-LEVEL-SHEET)) inside an anonymous lambda form: Undefined function CLIM:ENABLE-FRAME
;   In ((SETF CLIM:WINDOW-VISIBILITY) (T CLIM:TOP-LEVEL-SHEET)) inside an anonymous lambda form: Undefined function CLIM:DISABLE-FRAME
;Compiler warnings for "clim:silica;framem.lisp.newest" :
;   In (CLIM:NOTE-FRAME-DEICONIFIED :AFTER (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function (SETF CLIM:FRAME-STATE)
;   In (CLIM:NOTE-FRAME-ICONIFIED :AFTER (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function (SETF CLIM:FRAME-STATE)
;   In (CLIM:NOTE-FRAME-DISABLED :AFTER (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function CLIM:FRAME-TOP-LEVEL-SHEET
;   In (CLIM:NOTE-FRAME-ENABLED :AFTER (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function CLIM:FRAME-TOP-LEVEL-SHEET
;   In (CLIM:NOTE-FRAME-ENABLED :AFTER (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function CLIM:FRAME-TOP-LEVEL-SHEET
;   In (CLIM:DISOWN-FRAME :AFTER (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function (SETF CLIM-SILICA:FRAME-SHELL)
;   In (CLIM:DISOWN-FRAME :AFTER (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function (SETF CLIM:FRAME-PANES)
;   In (CLIM:DISOWN-FRAME (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function CLIM:FRAME-STATE
;   In (CLIM:DISOWN-FRAME (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function CLIM:DISABLE-FRAME
;   In (CLIM:DISOWN-FRAME (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function CLIM:FRAME-TOP-LEVEL-SHEET
;   In (CLIM:DISOWN-FRAME (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function (SETF CLIM:FRAME-TOP-LEVEL-SHEET)
;   In (CLIM:DISOWN-FRAME (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function (SETF CLIM:FRAME-STATE)
;   In (CLIM:ADOPT-FRAME :AFTER (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function CLIM-SILICA:PORT-NOTE-FRAME-ADOPTED
;   In (CLIM:ADOPT-FRAME :BEFORE (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function (SETF CLIM:FRAME-MANAGER)
;   In CLIM:MAKE-CLIM-STREAM-PANE inside (CLIM:ADOPT-FRAME (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function CLIM-INTERNALS::MAKE-CLIM-STREAM-PANE-1
;   In (CLIM:ADOPT-FRAME (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function CLIM:GENERATE-PANES
;   In (CLIM:ADOPT-FRAME (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function CLIM:FRAME-PANES
;   In (CLIM:ADOPT-FRAME (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function CLIM:FRAME-PANES
;   In (CLIM:ADOPT-FRAME (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function CLIM-SILICA:FRAME-INPUT-BUFFER
;   In (CLIM:ADOPT-FRAME (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function CLIM-SILICA:FRAME-USER-SPECIFIED-POSITION-P
;   In (CLIM:ADOPT-FRAME (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function CLIM-SILICA:FRAME-USER-SPECIFIED-SIZE-P
;   In (CLIM:ADOPT-FRAME (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function CLIM-SILICA:FRAME-BACKGROUND
;   In (CLIM:ADOPT-FRAME (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function CLIM-SILICA:FRAME-FOREGROUND
;   In (CLIM:ADOPT-FRAME (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function CLIM-SILICA:FRAME-TEXT-STYLE
;   In (CLIM:ADOPT-FRAME (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function (SETF CLIM:FRAME-TOP-LEVEL-SHEET)
;   In (CLIM:ADOPT-FRAME (CLIM:STANDARD-FRAME-MANAGER T)) inside an anonymous lambda form: Undefined function (SETF CLIM-SILICA:FRAME-SHELL)
;Compiler warnings for "clim:silica;medium.lisp.newest" :
;   In ((SETF CLIM:PANE-TEXT-STYLE) :AFTER (T CLIM-SILICA:SHEET-WITH-RESOURCES-MIXIN)) inside an anonymous lambda form: Undefined function CLIM-SILICA::PORT-SET-PANE-TEXT-STYLE
;   In ((SETF CLIM:PANE-BACKGROUND) :AFTER (T CLIM-SILICA:SHEET-WITH-RESOURCES-MIXIN)) inside an anonymous lambda form: Undefined function CLIM-SILICA::PORT-SET-PANE-BACKGROUND
;   In ((SETF CLIM:PANE-FOREGROUND) :AFTER (T CLIM-SILICA:SHEET-WITH-RESOURCES-MIXIN)) inside an anonymous lambda form: Undefined function CLIM-SILICA::PORT-SET-PANE-FOREGROUND
;   In (CLIM:NOTE-SHEET-GRAFTED :BEFORE (CLIM-SILICA:SHEET-WITH-RESOURCES-MIXIN)) inside an anonymous lambda form: Undefined function CLIM-UTILS:MAKE-DEVICE-COLOR
;   In (CLIM:NOTE-SHEET-GRAFTED :BEFORE (CLIM-SILICA:SHEET-WITH-RESOURCES-MIXIN)) inside an anonymous lambda form: Undefined function CLIM-UTILS:MAKE-DEVICE-COLOR
;Compiler warnings for "clim:silica;event.lisp.newest" :
;   In (CLIM-SILICA:PORT-EVENT-WAIT (T T)) inside an anonymous lambda form: In the call to CLIM:PROCESS-NEXT-EVENT with arguments (CLIM:PORT :TIMEOUT CLIM-SILICA::TIMEOUT :WAIT-FUNCTION CLIM-SILICA::WAITER :STATE CLIM-SILICA::WAIT-REASON),
;     the keyword argument :STATE is not recognized by the definition of CLIM:PROCESS-NEXT-EVENT visible in the current compilation unit.
;   In CLIM-SILICA::UPDATE-POINTER: Undefined function (SETF CLIM:POINTER-CURSOR)
;   In CLIM-SILICA::UPDATE-POINTER: Undefined function (SETF CLIM-SILICA:POINTER-NATIVE-Y-POSITION)
;   In CLIM-SILICA::UPDATE-POINTER: Undefined function (SETF CLIM-SILICA:POINTER-NATIVE-X-POSITION)
;   In CLIM-SILICA::UPDATE-POINTER: Undefined function (SETF CLIM-SILICA:POINTER-Y-POSITION)
;   In CLIM-SILICA::UPDATE-POINTER: Undefined function (SETF CLIM-SILICA:POINTER-X-POSITION)
;   In CLIM-SILICA::UPDATE-POINTER: Undefined function (SETF CLIM:POINTER-SHEET)
;   In CLIM-SILICA::UPDATE-POINTER: Undefined function (SETF CLIM-INTERNALS::POINTER-VALID-P)
;   In (CLIM:DISPATCH-EVENT :BEFORE (T CLIM:POINTER-EXIT-EVENT)) inside an anonymous lambda form: Undefined function (SETF CLIM-INTERNALS::POINTER-VALID-P)
;   In (CLIM:DISTRIBUTE-EVENT :BEFORE (CLIM:BASIC-PORT CLIM:POINTER-BUTTON-RELEASE-EVENT)) inside an anonymous lambda form: Undefined function (SETF CLIM:POINTER-BUTTON-STATE)
;   In (CLIM:DISTRIBUTE-EVENT :BEFORE (CLIM:BASIC-PORT CLIM:POINTER-BUTTON-RELEASE-EVENT)) inside an anonymous lambda form: Undefined function CLIM:POINTER-BUTTON-STATE
;   In (CLIM:DISTRIBUTE-EVENT :BEFORE (CLIM:BASIC-PORT CLIM:POINTER-BUTTON-PRESS-EVENT)) inside an anonymous lambda form: Undefined function (SETF CLIM:POINTER-BUTTON-STATE)
;   In (CLIM:DISTRIBUTE-EVENT :BEFORE (CLIM:BASIC-PORT CLIM:POINTER-BUTTON-PRESS-EVENT)) inside an anonymous lambda form: Undefined function CLIM:POINTER-BUTTON-STATE
;Compiler warnings for "clim:silica;classes.lisp.newest" :
;   In an anonymous lambda form inside an anonymous lambda form at position 1444: Undefined function CLIM-SILICA::MAPPING-CACHE-INITFORM
;   In an anonymous lambda form inside an anonymous lambda form at position 1444: Undefined function CLIM-SILICA::MAPPING-TABLE-INITFORM
;   In an anonymous lambda form inside an anonymous lambda form at position 1839: Undefined function CLIM:MAKE-MODIFIER-STATE
;; Compiled and Loaded System DEVELOPMENT CLIM Silica
#<SYSTEM Development CLIM-SILICA 0.0.0 (21 Components) #x302000878B4D>
? (clsm:compile-system :clim-standalone)

;; Defining System :CLIM-STANDALONE
;; Compiling System CLIM Standalone
;; System DEVELOPMENT CLIM Silica already loaded
;; Compiling clim:clim;gestures.lisp.newest
;; Loading clim:clim;gestures.lx64fsl.newest
;; Compiling clim:clim;defprotocol.lisp.newest
;; Loading clim:clim;defprotocol.lx64fsl.newest
;; Compiling clim:clim;stream-defprotocols.lisp.newest
;; Loading clim:clim;stream-defprotocols.lx64fsl.newest
;; Compiling clim:clim;defresource.lisp.newest
;; Loading clim:clim;defresource.lx64fsl.newest
;; Compiling clim:clim;temp-strings.lisp.newest
;; Loading clim:clim;temp-strings.lx64fsl.newest
;; Compiling clim:clim;clim-defs.lisp.newest
;; Loading clim:clim;clim-defs.lx64fsl.newest
;; Compiling clim:clim;stream-class-defs.lisp.newest
;; Loading clim:clim;stream-class-defs.lx64fsl.newest
;; Compiling clim:clim;interactive-defs.lisp.newest
;; Loading clim:clim;interactive-defs.lx64fsl.newest
;; Compiling clim:clim;cursor.lisp.newest
;; Loading clim:clim;cursor.lx64fsl.newest
;; Compiling clim:clim;view-defs.lisp.newest
;; Loading clim:clim;view-defs.lx64fsl.newest
;; Compiling clim:clim;input-defs.lisp.newest
;; Loading clim:clim;input-defs.lx64fsl.newest
;; Compiling clim:clim;input-protocol.lisp.newest
;; Loading clim:clim;input-protocol.lx64fsl.newest
;; Compiling clim:clim;output-protocol.lisp.newest
;; Loading clim:clim;output-protocol.lx64fsl.newest
;; Compiling clim:clim;recording-defs.lisp.newest
;; Loading clim:clim;recording-defs.lx64fsl.newest
;; Compiling clim:clim;formatted-output-defs.lisp.newest
;; Loading clim:clim;formatted-output-defs.lx64fsl.newest
;; Compiling clim:clim;recording-protocol.lisp.newest
;; Loading clim:clim;recording-protocol.lx64fsl.newest
;; Compiling clim:clim;text-recording.lisp.newest
;; Loading clim:clim;text-recording.lx64fsl.newest
;; Compiling clim:clim;graphics-recording.lisp.newest
;; Loading clim:clim;graphics-recording.lx64fsl.newest
;; Compiling clim:clim;design-recording.lisp.newest
;; Loading clim:clim;design-recording.lx64fsl.newest
;; Compiling clim:clim;interactive-protocol.lisp.newest
;; Loading clim:clim;interactive-protocol.lx64fsl.newest
;; Compiling clim:clim;input-editor-commands.lisp.newest
;; Loading clim:clim;input-editor-commands.lx64fsl.newest
;; Compiling clim:clim;incremental-redisplay.lisp.newest
;; Loading clim:clim;incremental-redisplay.lx64fsl.newest
;; Compiling clim:clim;coordinate-sorted-set.lisp.newest
;; Loading clim:clim;coordinate-sorted-set.lx64fsl.newest
;; Compiling clim:clim;r-tree.lisp.newest
;Compiler warnings for "clim:clim;r-tree.lisp.newest" :
;   In MAYBE-ADD: Unused lexical variable ENV
;; Loading clim:clim;r-tree.lx64fsl.newest
;; Compiling clim:clim;window-stream.lisp.newest
;; Loading clim:clim;window-stream.lx64fsl.newest
;; Compiling clim:clim;pixmap-streams.lisp.newest
;; Loading clim:clim;pixmap-streams.lx64fsl.newest
;; Compiling clim:clim;ptypes1.lisp.newest
;; Loading clim:clim;ptypes1.lx64fsl.newest
;; Compiling clim:clim;completer.lisp.newest
;Compiler warnings for "clim:clim;completer.lisp.newest" :
;   In an anonymous lambda form at position 1941: Unused lexical variable LOCATION
;   In an anonymous lambda form at position 1941: Unused lexical variable PREFIX
;   In an anonymous lambda form at position 1941: Unused lexical variable POSSIBILITY-PRINTER
;   In an anonymous lambda form at position 1941: Unused lexical variable FUNCTION
;   In an anonymous lambda form at position 1941: Unused lexical variable STREAM
;   In CHUNKWISE-COMPLETE-STRING: Variable I not ignored.
;; Loading clim:clim;completer.lx64fsl.newest
;; Compiling clim:clim;presentations.lisp.newest
;Compiler warnings for "clim:clim;presentations.lisp.newest" :
;   In STANDARD-NONSENSITIVE-PRESENTATION-CONSTRUCTOR: Unused lexical variable SINGLE-BOX
;   In STANDARD-NONSENSITIVE-PRESENTATION-CONSTRUCTOR: Unused lexical variable MODIFIER
;   In STANDARD-NONSENSITIVE-PRESENTATION-CONSTRUCTOR: Unused lexical variable TYPE
;   In STANDARD-NONSENSITIVE-PRESENTATION-CONSTRUCTOR: Unused lexical variable OBJECT
;; Loading clim:clim;presentations.lx64fsl.newest
;; Compiling clim:clim;translators.lisp.newest
;; Loading clim:clim;translators.lx64fsl.newest
;; Compiling clim:clim;histories.lisp.newest
;Compiler warnings for "clim:clim;histories.lisp.newest" :
;   In an anonymous lambda form at position 23201: Unused lexical variable STREAM
;; Loading clim:clim;histories.lx64fsl.newest
;; Compiling clim:clim;ptypes2.lisp.newest
;; Loading clim:clim;ptypes2.lx64fsl.newest
;; Compiling clim:clim;standard-types.lisp.newest
;Compiler warnings for "clim:clim;standard-types.lisp.newest" :
;   In an anonymous lambda form at position 5431: Unused lexical variable TYPE
;   In an anonymous lambda form at position 6476: Unused lexical variable HIGH
;   In an anonymous lambda form at position 6476: Unused lexical variable LOW
;   In an anonymous lambda form at position 6476: Unused lexical variable RADIX
;   In an anonymous lambda form at position 6476: Unused lexical variable BASE
;   In an anonymous lambda form at position 14124: Unused lexical variable LENGTH
;   In an anonymous lambda form at position 15982: Unused lexical variable MERGE-DEFAULT
;   In an anonymous lambda form at position 15982: Unused lexical variable DEFAULT-VERSION
;   In an anonymous lambda form at position 15982: Unused lexical variable DEFAULT-TYPE
;   In an anonymous lambda form at position 23702: Unused lexical variable VALUE-KEY
;   In an anonymous lambda form at position 23702: Unused lexical variable TEST
;   In an anonymous lambda form at position 23702: Unused lexical variable SEQUENCE
;   In an anonymous lambda form at position 23702: Unused lexical variable HIGHLIGHTER
;   In an anonymous lambda form at position 23702: Unused lexical variable PRINTER
;   In an anonymous lambda form at position 23702: Unused lexical variable PARTIAL-COMPLETERS
;   In an anonymous lambda form at position 23702: Unused lexical variable DOCUMENTATION-KEY
;   In an anonymous lambda form at position 23702: Unused lexical variable NAME-KEY
;   In an anonymous lambda form at position 32816: Unused lexical variable VALUE-KEY
;   In an anonymous lambda form at position 32816: Unused lexical variable TEST
;   In an anonymous lambda form at position 32816: Unused lexical variable SEQUENCE
;   In an anonymous lambda form at position 32816: Unused lexical variable HIGHLIGHTER
;   In an anonymous lambda form at position 32816: Unused lexical variable PRINTER
;   In an anonymous lambda form at position 32816: Unused lexical variable ECHO-SPACE
;   In an anonymous lambda form at position 32816: Unused lexical variable SEPARATOR
;   In an anonymous lambda form at position 32816: Unused lexical variable PARTIAL-COMPLETERS
;   In an anonymous lambda form at position 32816: Unused lexical variable DOCUMENTATION-KEY
;   In an anonymous lambda form at position 32816: Unused lexical variable NAME-KEY
;   In an anonymous lambda form at position 43700: Unused lexical variable ELEMENT-TYPE
;   In an anonymous lambda form at position 43700: Unused lexical variable ECHO-SPACE
;   In an anonymous lambda form at position 43700: Unused lexical variable SEPARATOR
;   In an anonymous lambda form at position 51403: Unused lexical variable ELEMENT-TYPES
;   In an anonymous lambda form at position 51403: Unused lexical variable ECHO-SPACE
;   In an anonymous lambda form at position 51403: Unused lexical variable SEPARATOR
;   In an anonymous lambda form at position 57608: Unused lexical variable TYPES
;   In an anonymous lambda form at position 62454: Unused lexical variable TYPES
;   In an anonymous lambda form at position 68854: Unused lexical variable BOOLEAN
;   In an anonymous lambda form at position 68854: Unused lexical variable AUTO-ACTIVATE
;   In an anonymous lambda form at position 70538: Unused lexical variable BOOLEAN
;; Loading clim:clim;standard-types.lx64fsl.newest
;; Compiling clim:clim;table-formatting.lisp.newest
;; Loading clim:clim;table-formatting.lx64fsl.newest
;; Compiling clim:clim;graph-formatting.lisp.newest
;Compiler warnings for "clim:clim;graph-formatting.lisp.newest" :
;   In STANDARD-GRAPH-NODE-OUTPUT-RECORD-CONSTRUCTOR: Unused lexical variable DUPLICATE-TEST
;   In STANDARD-GRAPH-NODE-OUTPUT-RECORD-CONSTRUCTOR: Unused lexical variable DUPLICATE-KEY
;; Loading clim:clim;graph-formatting.lx64fsl.newest
;; Compiling clim:clim;surround-output.lisp.newest
;; Loading clim:clim;surround-output.lx64fsl.newest
;; Compiling clim:clim;text-formatting.lisp.newest
;; Loading clim:clim;text-formatting.lx64fsl.newest
;; Compiling clim:clim;tracking-pointer.lisp.newest
;; Loading clim:clim;tracking-pointer.lx64fsl.newest
;; Compiling clim:clim;dragging-output.lisp.newest
;; Loading clim:clim;dragging-output.lx64fsl.newest
;; Compiling clim:clim;db-stream.lisp.newest
;; Loading clim:clim;db-stream.lx64fsl.newest
;; Compiling clim:clim;gadget-output.lisp.newest
;; Loading clim:clim;gadget-output.lx64fsl.newest
;; Compiling clim:clim;accept.lisp.newest
;; Loading clim:clim;accept.lx64fsl.newest
;; Compiling clim:clim;present.lisp.newest
;; Loading clim:clim;present.lx64fsl.newest
;; Compiling clim:clim;command.lisp.newest
;; Loading clim:clim;command.lx64fsl.newest
;; Compiling clim:clim;command-processor.lisp.newest
;Compiler warnings for "clim:clim;command-processor.lisp.newest" :
;   In an anonymous lambda form at position 7465: Unused lexical variable KEYWORD-DEFAULTS
;   In an anonymous lambda form at position 7465: Unused lexical variable KEYWORD-DOCUMENTATION
;   In an anonymous lambda form at position 7465: Unused lexical variable KEYWORDS
;   In an anonymous lambda form at position 29952: Unused lexical variable COMMAND-TABLE
;   In an anonymous lambda form at position 33693: Unused lexical variable COMMAND-TABLE
;   In an anonymous lambda form at position 37430: Unused lexical variable COMMAND-TABLE
;   In an anonymous lambda form at position 37430: Unused lexical variable BOOLEAN
;   In an anonymous lambda form at position 37430: Unused lexical variable AUTO-ACTIVATE
;; Loading clim:clim;command-processor.lx64fsl.newest
;; Compiling clim:clim;basic-translators.lisp.newest
;; Loading clim:clim;basic-translators.lx64fsl.newest
;; Compiling clim:clim;frames.lisp.newest
;Compiler warnings for "clim:clim;frames.lisp.newest" :
;   In CLIM-SILICA::CHANGING-SPACE-REQUIREMENTS-BODY inside ADJUST-LAYOUT-REQUIREMENTS: DYNAMIC-EXTENT declaration for unknown function ADJUST-LAYOUT
;   In MAKE-APPLICATION-FRAME: Too many format arguments in format string:
;   "Cannot specify ~S and ~S, S, ~S, ~S, ~S, or ~S at the same time"
;    ^
;   
;; Loading clim:clim;frames.lx64fsl.newest
;; Compiling clim:clim;panes.lisp.newest
;; Loading clim:clim;panes.lx64fsl.newest
;; Compiling clim:clim;default-frame.lisp.newest
;; Loading clim:clim;default-frame.lx64fsl.newest
;; Compiling clim:clim;activities.lisp.newest
;; Loading clim:clim;activities.lx64fsl.newest
;; Compiling clim:clim;db-menu.lisp.newest
;; Loading clim:clim;db-menu.lx64fsl.newest
;; Compiling clim:clim;noting-progress.lisp.newest
;; Loading clim:clim;noting-progress.lx64fsl.newest
;; Compiling clim:clim;menus.lisp.newest
;; Loading clim:clim;menus.lx64fsl.newest
;; Compiling clim:clim;accept-values.lisp.newest
;Compiler warnings for "clim:clim;accept-values.lisp.newest" :
;   In (PROMPT-FOR-ACCEPT (ACCEPT-VALUES-STREAM T T)) inside an anonymous lambda form: Unused lexical variable ACCEPT-ARGS
> Error: The value COMPILE-FILE is not of the expected type CCL::LEXICAL-ENVIRONMENT.
> While executing: CCL::DEFINITION-ENVIRONMENT, in process listener(1).
> Type :POP to abort, :R for a list of available restarts.
> Type :? for other options.
1 > :b
 (7FDFDDDB8B68) : 0 (DEFINITION-ENVIRONMENT COMPILE-FILE NIL) 141
 (7FDFDDDB8B90) : 1 (FIND-CLASS ACCEPT-VALUES-COMMAND-BUTTON NIL COMPILE-FILE) 205
 (7FDFDDDB8BF0) : 2 (FIND-PRESENTATION-TYPE-CLASS ACCEPT-VALUES-COMMAND-BUTTON NIL COMPILE-FILE) 453
 (7FDFDDDB8C50) : 3 (ENSURE-PRESENTATION-TYPE ACCEPT-VALUES-COMMAND-BUTTON NIL NIL STANDARD-OBJECT "accept values command button" NIL NIL NIL NIL COMPILE-FILE) 821
 (7FDFDDDB8CF0) : 4 (%COMPILE-TIME-EVAL (ENSURE-PRESENTATION-TYPE 'ACCEPT-VALUES-COMMAND-BUTTON 'NIL 'NIL 'NIL ...) #<CCL::LEXICAL-ENVIRONMENT #x30200198EE8D>) 637
 (7FDFDDDB8D78) : 5 (FCOMP-FORM-1 (ENSURE-PRESENTATION-TYPE 'ACCEPT-VALUES-COMMAND-BUTTON 'NIL 'NIL 'NIL ...) #<CCL::LEXICAL-ENVIRONMENT #x30200198EE8D> :COMPILE-TIME) 1021
 (7FDFDDDB8DB8) : 6 (FCOMP-FORM (ENSURE-PRESENTATION-TYPE 'ACCEPT-VALUES-COMMAND-BUTTON 'NIL 'NIL 'NIL ...) #<CCL::LEXICAL-ENVIRONMENT #x30200198EE8D> :COMPILE-TIME) 1981
 (7FDFDDDB8E48) : 7 (FCOMP-FORM-LIST ((ENSURE-PRESENTATION-TYPE # # # # ...)) #<CCL::LEXICAL-ENVIRONMENT #x30200198EE8D> :COMPILE-TIME) 173
 (7FDFDDDB8E90) : 8 (FCOMP-EVAL-WHEN (EVAL-WHEN (COMPILE) (ENSURE-PRESENTATION-TYPE # # # # ...)) #<CCL::LEXICAL-ENVIRONMENT #x30200198EE8D> :NOT-COMPILE-TIME) 533
 (7FDFDDDB8F00) : 9 (FCOMP-FORM (EVAL-WHEN (COMPILE) (ENSURE-PRESENTATION-TYPE # # # # ...)) #<CCL::LEXICAL-ENVIRONMENT #x30200198EE8D> :NOT-COMPILE-TIME) 1981
 (7FDFDDDB8F90) : 10 (FCOMP-FORM-LIST ((EVAL-WHEN # #) (DEFINE-GROUP ACCEPT-VALUES-COMMAND-BUTTON DEFINE-PRESENTATION-TYPE # #)) #<CCL::LEXICAL-ENVIRONMENT #x30200198EE8D> :NOT-COMPILE-TIME) 173
 (7FDFDDDB8FD8) : 11 (FCOMP-FORM (PROGN (EVAL-WHEN # #) (DEFINE-GROUP ACCEPT-VALUES-COMMAND-BUTTON DEFINE-PRESENTATION-TYPE # #)) #<CCL::LEXICAL-ENVIRONMENT #x30200198EE8D> :NOT-COMPILE-TIME) 1981
 (7FDFDDDB9068) : 12 (FCOMP-FORM (DEFINE-PRESENTATION-TYPE ACCEPT-VALUES-COMMAND-BUTTON NIL) #<CCL::LEXICAL-ENVIRONMENT #x30200198EE8D> :NOT-COMPILE-TIME) 1981
 (7FDFDDDB90F8) : 13 (FCOMP-READ-LOOP "/home/src/github/clim/clim2/clim/accept-values.lisp" "clim:clim;accept-values.lisp.newest" 0 #<CCL::LEXICAL-ENVIRONMENT #x30200198EE8D> :NOT-COMPILE-TIME) 2381
 (7FDFDDDB9298) : 14 (FCOMP-FILE "/home/src/github/clim/clim2/clim/accept-values.lisp" "clim:clim;accept-values.lisp.newest" 0 #<CCL::LEXICAL-ENVIRONMENT #x30200198EE8D>) 821
 (7FDFDDDB9438) : 15 (%COMPILE-FILE "/home/src/github/clim/clim2/clim/accept-values.lisp" "/home/src/github/clim/clim2/clim/accept-values.lx64fsl" NIL NIL T T NIL T :DEFER NIL #<BACKEND LINUXX8664 #x3020001C372D> :DEFAULT NIL 0) 2333
 (7FDFDDDB9720) : 16 (COMPILE-FILE #P"clim:clim;accept-values.lisp.newest" :OUTPUT-FILE #P"clim:clim;accept-values.lx64fsl.newest" :VERBOSE NIL :PRINT NIL :LOAD NIL :FEATURES NIL :TARGET :LINUXX8664 :SAVE-LOCAL-SYMBOLS T :SAVE-DOC-STRINGS T :SAVE-DEFINITIONS NIL :SAVE-SOURCE-LOCATIONS T :EXTERNAL-FORMAT :DEFAULT :FORCE NIL :COMPILE-FILE-ORIGINAL-TRUENAME NIL :COMPILE-FILE-ORIGINAL-BUFFER-OFFSET 0 :BREAK-ON-PROGRAM-ERRORS :DEFER :LOAD-PRESERVES-OPTIMIZATION-SETTINGS NIL) 1997
 (7FDFDDDB98A8) : 17 (FUNCALL #'#<#<STANDARD-METHOD CLSM:COMPILE-SYSTEM (CLSM:LISP-MODULE)>> #<LISP-MODULE ACCEPT-VALUES> :PATHNAME #P"clim:clim;" :FORCE NIL) 1365
 (7FDFDDDB9920) : 18 (FUNCALL #'#<#<STANDARD-METHOD CLSM:COMPILE-SYSTEM (CLSM:SERIAL-MODULE)>> #<SERIAL-MODULE NIL (58 Components)> :PATHNAME #P"clim:clim;" :SYSTEM #<SYSTEM Not-Loaded CLIM-STANDALONE 0.0.0 (59 Components) #x302000BCC41D> :FORCE NIL) 221
 (7FDFDDDB9990) : 19 (CALL-WITH-COMPILATION-UNIT #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL CCL::WITH-COMPILATION-UNIT-BODY #) #x7FDFFEEF50BF> :OVERRIDE NIL) 197
 (7FDFDDDB99D8) : 20 (FUNCALL #'#<#<STANDARD-METHOD CLSM:COMPILE-SYSTEM (CLSM:SYSTEM)>> #<SYSTEM Not-Loaded CLIM-STANDALONE 0.0.0 (59 Components) #x302000BCC41D> :FORCE NIL) 549
 (7FDFDDDB9A30) : 21 (CALL-CHECK-REGS CLSM:COMPILE-SYSTEM :CLIM-STANDALONE) 221
 (7FDFDDDB9A68) : 22 (TOPLEVEL-EVAL (CLSM:COMPILE-SYSTEM :CLIM-STANDALONE) NIL) 701
 (7FDFDDDB9AF8) : 23 (READ-LOOP :INPUT-STREAM #<SYNONYM-STREAM to *TERMINAL-IO* #x302000467D8D> :OUTPUT-STREAM #<SYNONYM-STREAM to *TERMINAL-IO* #x302000467C2D> :BREAK-LEVEL 0 :PROMPT-FUNCTION #<Compiled-function (:INTERNAL CCL::READ-LOOP) (Non-Global)  #x300000536D8F>) 2317
 (7FDFDDDB9D58) : 24 (RUN-READ-LOOP :BREAK-LEVEL 0) 157
 (7FDFDDDB9D80) : 25 (TOPLEVEL-LOOP) 101
 (7FDFDDDB9DA8) : 26 (FUNCALL #'#<(:INTERNAL (CCL:TOPLEVEL-FUNCTION (CCL::LISP-DEVELOPMENT-SYSTEM T)))>) 101
 (7FDFDDDB9DC8) : 27 (FUNCALL #'#<(:INTERNAL CCL::MAKE-MCL-LISTENER-PROCESS)>) 661
 (7FDFDDDB9E60) : 28 (RUN-PROCESS-INITIAL-FORM #<TTY-LISTENER listener(1) [Active] #x302000466C5D> (#<CCL:COMPILED-LEXICAL-CLOSURE # #x30200046678F>)) 709
 (7FDFDDDB9EF0) : 29 (FUNCALL #'#<(:INTERNAL (CCL::%PROCESS-PRESET-INTERNAL (CCL:PROCESS)))> #<TTY-LISTENER listener(1) [Active] #x302000466C5D> (#<CCL:COMPILED-LEXICAL-CLOSURE # #x30200046678F>)) 573
 (7FDFDDDB9F98) : 30 (FUNCALL #'#<(:INTERNAL CCL::THREAD-MAKE-STARTUP-FUNCTION)>) 277
1 > 


More information about the Openmcl-devel mailing list