Commit e84c7e5a authored by Dave Cooper's avatar Dave Cooper

did a build

parent 2869259c
;;;; -*- coding: utf-8 -*- ;;;; -*- coding: utf-8 -*-
(asdf:defsystem #:dom :description (asdf:defsystem #:dom :description
"The Gendl\" dom Subsystem" :author "John McCarthy" :license "The Gendl\" dom Subsystem" :author "John McCarthy" :license
"Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t "Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t
:version "20160125" :depends-on (:cl-who :yadd) :version "20160204" :depends-on (:cl-who :yadd)
#-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings) #-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings)
#+asdf-encodings :encoding #+asdf-encodings :utf-8 #+asdf-encodings :encoding #+asdf-encodings :utf-8
:components :components
((:file "base/source/package") (:file "base/source/assembly") ((:file "base/source/package") (:file "base/source/assembly")
(:file "writers/source/package") (:file "writers/source/package")
(:file "writers/source/dom-writer") (:file "writers/source/html") (:file "writers/source/dom-writer") (:file "writers/source/html")
(:file "writers/source/latex") (:file "writers/source/plain-text") (:file "writers/source/latex") (:file "writers/source/plain-text")
(:file "html/source/package") (:file "html/source/lenses") (:file "html/source/package") (:file "html/source/lenses")
(:file "latex/source/package") (:file "latex/source/lenses") (:file "latex/source/package") (:file "latex/source/lenses")
(:file "latex/source/utilities") (:file "latex/source/utilities")
(:file "test-parts/source/assembly"))) (:file "test-parts/source/assembly")))
;;;; -*- coding: utf-8 -*- ;;;; -*- coding: utf-8 -*-
(asdf:defsystem #:ta2 :description (asdf:defsystem #:ta2 :description
"The Gendl\" (legacy) Testing and Tracking Utility, version 2 (using Ajax but pre-gdlAjax, and no JQuery or CSS)" "The Gendl\" (legacy) Testing and Tracking Utility, version 2 (using Ajax but pre-gdlAjax, and no JQuery or CSS)"
:author "John McCarthy" :license :author "John McCarthy" :license
"Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t "Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t
:version "20160125" :depends-on (:gwl-graphics) :version "20160204" :depends-on (:gwl-graphics)
#-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings) #-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings)
#+asdf-encodings :encoding #+asdf-encodings :utf-8 #+asdf-encodings :encoding #+asdf-encodings :utf-8
:components :components
((:file "source/package") (:file "source/parameters") ((:file "source/package") (:file "source/parameters")
(:file "source/javascript") (:file "source/action-object") (:file "source/javascript") (:file "source/action-object")
(:file "source/ajax") (:file "source/assembly") (:file "source/ajax") (:file "source/assembly")
(:file "source/click-mode") (:file "source/inspector") (:file "source/click-mode") (:file "source/inspector")
(:file "source/object-tree") (:file "source/part-type-form") (:file "source/object-tree") (:file "source/part-type-form")
(:file "source/publish") (:file "source/viewport"))) (:file "source/publish") (:file "source/viewport")))
;;;; -*- coding: utf-8 -*- ;;;; -*- coding: utf-8 -*-
(asdf:defsystem #:tasty :description (asdf:defsystem #:tasty :description
"The Gendl\" Web-based Development Environment (tasty)" :author "The Gendl\" Web-based Development Environment (tasty)" :author
"John McCarthy" :license "John McCarthy" :license
"Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t "Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t
:version "20160125" :depends-on (:tree :gwl-graphics) :version "20160204" :depends-on (:tree :gwl-graphics)
#-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings) #-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings)
#+asdf-encodings :encoding #+asdf-encodings :utf-8 #+asdf-encodings :encoding #+asdf-encodings :utf-8
:components :components
((:file "source/package") (:file "source/parameters") ((:file "source/package") (:file "source/parameters")
(:file "source/assembly") (:file "source/initialize") (:file "source/assembly") (:file "source/initialize")
(:file "source/inspector") (:file "source/menu") (:file "source/inspector") (:file "source/menu")
(:file "source/new-inspector") (:file "source/newer-inspector") (:file "source/new-inspector") (:file "source/newer-inspector")
(:file "source/part-type-form") (:file "source/publish") (:file "source/part-type-form") (:file "source/publish")
(:file "source/status-object") (:file "source/test-part") (:file "source/status-object") (:file "source/test-part")
(:file "source/test-part2") (:file "source/two-viewports") (:file "source/test-part2") (:file "source/two-viewports")
(:file "source/viewport") (:file "source/zzinit"))) (:file "source/viewport") (:file "source/zzinit")))
;;;; -*- coding: utf-8 -*- ;;;; -*- coding: utf-8 -*-
(asdf:defsystem #:translators :description (asdf:defsystem #:translators :description
"The Gendl\" Translators to/from XML and potentially other high-level KBE and Knowledge formats" "The Gendl\" Translators to/from XML and potentially other high-level KBE and Knowledge formats"
:author "John McCarthy" :license :author "John McCarthy" :license
"Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t "Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t
:version "20160125" :depends-on (:gwl) :version "20160204" :depends-on (:gwl)
#-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings) #-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings)
#+asdf-encodings :encoding #+asdf-encodings :utf-8 #+asdf-encodings :encoding #+asdf-encodings :utf-8
:components :components
((:file "xml/source/package") (:file "xml/source/genworks") ((:file "xml/source/package") (:file "xml/source/genworks")
(:file "xml/source/definition-tree") (:file "xml/source/gdl2xml") (:file "xml/source/definition-tree") (:file "xml/source/gdl2xml")
(:file "xml/source/xml2gdl"))) (:file "xml/source/xml2gdl")))
;;;; -*- coding: utf-8 -*- ;;;; -*- coding: utf-8 -*-
(asdf:defsystem #:tree :description (asdf:defsystem #:tree :description
"The Gendl\" Tree component used by Tasty and potentially as a UI component on its own" "The Gendl\" Tree component used by Tasty and potentially as a UI component on its own"
:author "John McCarthy" :license :author "John McCarthy" :license
"Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t "Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t
:version "20160125" :depends-on (:gwl-graphics) :version "20160204" :depends-on (:gwl-graphics)
#-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings) #-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings)
#+asdf-encodings :encoding #+asdf-encodings :utf-8 #+asdf-encodings :encoding #+asdf-encodings :utf-8
:components :components
((:file "source/package") (:file "source/parameters") ((:file "source/package") (:file "source/parameters")
(:file "source/ajax") (:file "source/assembly") (:file "source/ajax") (:file "source/assembly")
(:file "source/newertree"))) (:file "source/newertree")))
;;;; -*- coding: utf-8 -*- ;;;; -*- coding: utf-8 -*-
(asdf:defsystem #:yadd :description (asdf:defsystem #:yadd :description
"The Gendl\" Yet Another Definition Documenter (yadd)" :author "The Gendl\" Yet Another Definition Documenter (yadd)" :author
"John McCarthy" :license "John McCarthy" :license
"Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t "Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t
:version "20160125" :depends-on :version "20160204" :depends-on
(:gwl-graphics #-allegro :cl-html-parse) (:gwl-graphics #-allegro :cl-html-parse)
#-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings) #-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings)
#+asdf-encodings :encoding #+asdf-encodings :utf-8 #+asdf-encodings :encoding #+asdf-encodings :utf-8
:components :components
((:file "source/package") (:file "source/genworks") ((:file "source/package") (:file "source/genworks")
(:file "source/parameters") (:file "source/mixins") (:file "source/parameters") (:file "source/mixins")
(:file "source/define-object-documentation") (:file "source/define-object-documentation")
(:file "source/assembly") (:file "source/ass") (:file "source/assembly") (:file "source/ass")
(:file "source/format-documentation") (:file "source/format-documentation")
(:file "source/function-documentation") (:file "source/initialize") (:file "source/function-documentation") (:file "source/initialize")
(:file "source/publish") (:file "source/test-part") (:file "source/publish") (:file "source/test-part")
(:file "source/variable-documentation") (:file "source/zzinit"))) (:file "source/variable-documentation") (:file "source/zzinit")))
;;;; -*- coding: utf-8 -*- ;;;; -*- coding: utf-8 -*-
(asdf:defsystem #:base :description (asdf:defsystem #:base :description
"The Gendl\" Base Core Kernel Engine" :author "John McCarthy" "The Gendl\" Base Core Kernel Engine" :author "John McCarthy"
:license "Affero Gnu Public License (http://www.gnu.org/licenses/)" :license "Affero Gnu Public License (http://www.gnu.org/licenses/)"
:serial t :version "20160125" :depends-on (:bordeaux-threads) :serial t :version "20160204" :depends-on (:bordeaux-threads)
#-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings) #-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings)
#+asdf-encodings :encoding #+asdf-encodings :utf-8 #+asdf-encodings :encoding #+asdf-encodings :utf-8
:components :components
((:file "source/package") (:file "source/genworks") ((:file "source/package") (:file "source/genworks")
(:file "source/presets") (:file "source/parameters") (:file "source/presets") (:file "source/parameters")
(:file "source/metaclasses") (:file "source/utilities") (:file "source/metaclasses") (:file "source/utilities")
(:file "source/start") (:file "source/syntax-checker") (:file "source/start") (:file "source/syntax-checker")
(:file "expanders/source/inputs") (:file "expanders/source/inputs")
(:file "expanders/source/computed-slots") (:file "expanders/source/computed-slots")
(:file "expanders/source/functions") (:file "expanders/source/functions")
(:file "expanders/source/methods") (:file "expanders/source/methods")
(:file "expanders/source/objects") (:file "expanders/source/objects")
(:file "macros/source/reference") (:file "macros/source/reference")
(:file "macros/source/message-utils") (:file "macros/source/message-utils")
(:file "macros/source/define-object") (:file "macros/source/define-object")
(:file "macros/source/defaulting") (:file "macros/source/defaulting")
(:file "macros/source/define-format") (:file "macros/source/define-format")
(:file "rest/source/parameters") (:file "rest/source/parameters")
(:file "rest/source/quantification") (:file "rest/source/quantification")
(:file "rest/source/aggregate") (:file "rest/source/utilities") (:file "rest/source/aggregate") (:file "rest/source/utilities")
(:file "rest/source/null-part") (:file "rest/source/vanilla-mixin") (:file "rest/source/null-part") (:file "rest/source/vanilla-mixin")
(:file "rest/source/base-rule-object") (:file "rest/source/bodies") (:file "rest/source/base-rule-object") (:file "rest/source/bodies")
(:file "rest/source/ignore-errors-with-backtrace") (:file "rest/source/ignore-errors-with-backtrace")
(:file "rest/source/init") (:file "rest/source/make-part") (:file "rest/source/init") (:file "rest/source/make-part")
(:file "rest/source/sequence") (:file "zzinit/source/initialize") (:file "rest/source/sequence") (:file "zzinit/source/initialize")
(:file "zzinit/source/zzinit"))) (:file "zzinit/source/zzinit")))
...@@ -90,12 +90,19 @@ ...@@ -90,12 +90,19 @@
(the-object ,self-arg (send (:apply (cons ,(make-keyword (symbol-name attr-sym)) (the-object ,self-arg (send (:apply (cons ,(make-keyword (symbol-name attr-sym))
,args-arg))))))) ,args-arg)))))))
`(unless (find-method (symbol-function ',(glisp:intern (symbol-name attr-sym) :gdl-slots))
;;
;; FLAG unwind the changes here and hunt down where the actual lookup-parameters is coming from
;;
`(unless nil #+nil (find-method (symbol-function ',(glisp:intern (symbol-name attr-sym) :gdl-slots))
nil (list (find-class 'gdl-basis)) nil) nil (list (find-class 'gdl-basis)) nil)
(defmethod ,(glisp:intern (symbol-name attr-sym) :gdl-slots) ((,self-arg gdl-basis) &rest ,args-arg) (defmethod ,(glisp:intern (symbol-name attr-sym) :gdl-slots) ((,self-arg gdl-basis) &rest ,args-arg)
;;(declare (ignore ,args-arg)) ;;(declare (ignore ,args-arg))
(let ((,parent-arg (the-object ,self-arg %parent%))) (let ((,parent-arg (the-object ,self-arg %parent%)))
(if (null ,parent-arg) (not-handled ,self-arg ,(make-keyword attr-sym) ,args-arg)
(print-variables ,args-arg)
(if (or (null ,parent-arg) ,args-arg) (not-handled ,self-arg ,(make-keyword attr-sym) ,args-arg)
(let ((,val-arg (let (*error-on-not-handled?*) (let ((,val-arg (let (*error-on-not-handled?*)
(,(glisp:intern (symbol-name attr-sym) :gdl-inputs) (,(glisp:intern (symbol-name attr-sym) :gdl-inputs)
,parent-arg (the-object ,self-arg :%name%) ,self-arg)))) ,parent-arg (the-object ,self-arg :%name%) ,self-arg))))
......
...@@ -23,7 +23,7 @@ ...@@ -23,7 +23,7 @@
(defparameter *gendl-version* "1590pre003") (defparameter *gendl-version* "1590pre004")
(defparameter *gendl-patch-level* nil) (defparameter *gendl-patch-level* nil)
......
;;;; -*- coding: utf-8 -*- ;;;; -*- coding: utf-8 -*-
(asdf:defsystem #:cl-lite :description (asdf:defsystem #:cl-lite :description
"The Gendl\" Compile-and-Load Lite Utility" :author "John McCarthy" "The Gendl\" Compile-and-Load Lite Utility" :author "John McCarthy"
:license "Affero Gnu Public License (http://www.gnu.org/licenses/)" :license "Affero Gnu Public License (http://www.gnu.org/licenses/)"
:serial t :version "20160125" :depends-on (:glisp) :serial t :version "20160204" :depends-on (:glisp)
#-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings) #-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings)
#+asdf-encodings :encoding #+asdf-encodings :utf-8 #+asdf-encodings :encoding #+asdf-encodings :utf-8
:components :components
((:file "source/package") (:file "source/parameters") ((:file "source/package") (:file "source/parameters")
(:file "source/cl-lite") (:file "source/initialize") (:file "source/cl-lite") (:file "source/initialize")
(:file "source/zzinit"))) (:file "source/zzinit")))
;;;; -*- coding: utf-8 -*- ;;;; -*- coding: utf-8 -*-
(asdf:defsystem #:bus :description (asdf:defsystem #:bus :description
"The Gendl\" Wireframe School Bus Demo" :author "John McCarthy" "The Gendl\" Wireframe School Bus Demo" :author "John McCarthy"
:license "Affero Gnu Public License (http://www.gnu.org/licenses/)" :license "Affero Gnu Public License (http://www.gnu.org/licenses/)"
:serial t :version "20160125" :depends-on (:gwl-graphics) :serial t :version "20160204" :depends-on (:gwl-graphics)
#-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings) #-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings)
#+asdf-encodings :encoding #+asdf-encodings :utf-8 #+asdf-encodings :encoding #+asdf-encodings :utf-8
:components :components
((:file "source/package") (:file "source/assembly") ((:file "source/package") (:file "source/assembly")
(:file "source/body") (:file "source/chassis") (:file "source/body") (:file "source/chassis")
(:file "source/interior") (:file "source/rule-ackermann") (:file "source/interior") (:file "source/rule-ackermann")
(:file "source/axle") (:file "source/fleet") (:file "source/axle") (:file "source/fleet")
(:file "source/frame-rail") (:file "source/frame") (:file "source/frame-rail") (:file "source/frame")
(:file "source/html-writer-assembly") (:file "source/html-writer-assembly")
(:file "source/html-writer-body") (:file "source/html-writer-body")
(:file "source/html-writer-chassis") (:file "source/html-writer-chassis")
(:file "source/html-writer-interior") (:file "source/html-writer-interior")
(:file "source/html-writer-rule-ackermann") (:file "source/html-writer-rule-ackermann")
(:file "source/inter-seat-clearance-check") (:file "source/inter-seat-clearance-check")
(:file "source/inter-seat-spacing") (:file "source/knuckle") (:file "source/inter-seat-spacing") (:file "source/knuckle")
(:file "source/parameters") (:file "source/publish") (:file "source/parameters") (:file "source/publish")
(:file "source/rear-axle") (:file "source/seat") (:file "source/rear-axle") (:file "source/seat")
(:file "source/seating-section") (:file "source/seating-side") (:file "source/seating-section") (:file "source/seating-side")
(:file "source/wheel"))) (:file "source/wheel")))
;;;; -*- coding: utf-8 -*- ;;;; -*- coding: utf-8 -*-
(asdf:defsystem #:ledger :description (asdf:defsystem #:ledger :description
"The Gendl\" Ledger Bookkeeping Demo" :author "John McCarthy" "The Gendl\" Ledger Bookkeeping Demo" :author "John McCarthy"
:license "Affero Gnu Public License (http://www.gnu.org/licenses/)" :license "Affero Gnu Public License (http://www.gnu.org/licenses/)"
:serial t :version "20160125" :depends-on :serial t :version "20160204" :depends-on
(#-gwl :gwl) (#-gwl :gwl)
#-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings) #-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings)
#+asdf-encodings :encoding #+asdf-encodings :utf-8 #+asdf-encodings :encoding #+asdf-encodings :utf-8
:components :components
((:file "source/package") (:file "source/assembly") ((:file "source/package") (:file "source/assembly")
(:file "source/html") (:file "source/zzinit"))) (:file "source/html") (:file "source/zzinit")))
;;;; -*- coding: utf-8 -*- ;;;; -*- coding: utf-8 -*-
(asdf:defsystem #:robot :description (asdf:defsystem #:robot :description
"The Gendl\" Simplified Android Robot example " :author "The Gendl\" Simplified Android Robot example " :author
"John McCarthy" :license "John McCarthy" :license
"Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t "Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t
:version "20160125" :depends-on (:gwl-graphics) :version "20160204" :depends-on (:gwl-graphics)
#-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings) #-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings)
#+asdf-encodings :encoding #+asdf-encodings :utf-8 #+asdf-encodings :encoding #+asdf-encodings :utf-8
:components :components
((:file "source/package") (:file "source/assembly") ((:file "source/package") (:file "source/assembly")
(:file "source/initialize") (:file "source/parameters") (:file "source/initialize") (:file "source/parameters")
(:file "source/zzinit"))) (:file "source/zzinit")))
;;;; -*- coding: utf-8 -*- ;;;; -*- coding: utf-8 -*-
(asdf:defsystem #:wire-world :description (asdf:defsystem #:wire-world :description
"The Gendl\" Wire-World demo and test-case for wireframe tessellation and X3D output" "The Gendl\" Wire-World demo and test-case for wireframe tessellation and X3D output"
:author "John McCarthy" :license :author "John McCarthy" :license
"Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t "Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t
:version "20160125" :depends-on :version "20160204" :depends-on
(#-gwl-graphics :gwl-graphics) (#-gwl-graphics :gwl-graphics)
#-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings) #-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings)
#+asdf-encodings :encoding #+asdf-encodings :utf-8 #+asdf-encodings :encoding #+asdf-encodings :utf-8
:components ((:file "source/package") (:file "source/assembly"))) :components ((:file "source/package") (:file "source/assembly")))
;;;; -*- coding: utf-8 -*- ;;;; -*- coding: utf-8 -*-
(asdf:defsystem #:examples :description (asdf:defsystem #:examples :description
"The Gendl\" examples Subsystem" :author "John McCarthy" :license "The Gendl\" examples Subsystem" :author "John McCarthy" :license
"Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t "Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t
:version "20160125" :depends-on (:gwl-graphics :surf) :version "20160204" :depends-on (:gwl-graphics :surf)
#-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings) #-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings)
#+asdf-encodings :encoding #+asdf-encodings :utf-8 #+asdf-encodings :encoding #+asdf-encodings :utf-8
:components :components
((:file "source/ch2-examples") (:file "source/ch3-examples") ((:file "source/ch2-examples") (:file "source/ch3-examples")
(:gdl "source/primi-plane") (:gdl "source/ui-primi-plane"))) (:gdl "source/primi-plane") (:gdl "source/ui-primi-plane")))
;;;; -*- coding: utf-8 -*- ;;;; -*- coding: utf-8 -*-
(asdf:defsystem #:geom-base :description (asdf:defsystem #:geom-base :description
"The Gendl\" Wireframe Geometry" :author "John McCarthy" :license "The Gendl\" Wireframe Geometry" :author "John McCarthy" :license
"Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t "Affero Gnu Public License (http://www.gnu.org/licenses/)" :serial t
:version "20160125" :depends-on (:glisp) :version "20160204" :depends-on (:glisp)
#-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings) #-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings)
#+asdf-encodings :encoding #+asdf-encodings :utf-8 #+asdf-encodings :encoding #+asdf-encodings :utf-8
:components :components
((:file "prereqs/source/presets") ((:file "prereqs/source/presets")
(:file "prereqs/source/cl-pdf-patches") (:file "prereqs/source/cl-pdf-patches")
(:file "prereqs/source/matrix") (:file "prereqs/source/parameters") (:file "prereqs/source/matrix") (:file "prereqs/source/parameters")
(:file "prereqs/source/utilities") (:file "prereqs/source/utilities")
(:file "formats/source/2d-output") (:file "formats/source/dxf") (:file "formats/source/2d-output") (:file "formats/source/dxf")
(:file "formats/source/macro-redefs") (:file "formats/source/obj") (:file "formats/source/macro-redefs") (:file "formats/source/obj")
(:file "formats/source/pdf-multipage") (:file "formats/source/pdf-multipage")
(:file "formats/source/pdf-raw") (:file "formats/source/pdf") (:file "formats/source/pdf-raw") (:file "formats/source/pdf")
(:file "formats/source/raster") (:file "formats/source/raster")
(:file "formats/source/vector-graphics") (:file "formats/source/vector-graphics")
(:file "wire/source/base-object") (:file "wire/source/arc") (:file "wire/source/base-object") (:file "wire/source/arc")
(:file "wire/source/l-line") (:file "wire/source/circle") (:file "wire/source/l-line") (:file "wire/source/circle")
(:file "wire/source/bezier-curve") (:file "wire/source/cylinder") (:file "wire/source/bezier-curve") (:file "wire/source/cylinder")
(:file "wire/source/global-polyline") (:file "wire/source/global-polyline")
(:file "wire/source/global-filleted-polyline") (:file "wire/source/global-filleted-polyline")
(:file "wire/source/global-polygon-projection") (:file "wire/source/global-polygon-projection")
(:file "wire/source/sphere") (:file "wire/source/arcoid-mixin") (:file "wire/source/sphere") (:file "wire/source/arcoid-mixin")
(:file "wire/source/bounding-box") (:file "wire/source/box") (:file "wire/source/bounding-box") (:file "wire/source/box")
(:file "wire/source/c-cylinder") (:file "wire/source/cone") (:file "wire/source/c-cylinder") (:file "wire/source/cone")
(:file "wire/source/directional-light") (:file "wire/source/directional-light")
(:file "wire/source/ellipse") (:file "wire/source/fillet") (:file "wire/source/ellipse") (:file "wire/source/fillet")
(:file "wire/source/global-filleted-polygon-projection") (:file "wire/source/global-filleted-polygon-projection")
(:file "wire/source/line-and-arc-constraints") (:file "wire/source/line-and-arc-constraints")
(:file "wire/source/null-geometric-object") (:file "wire/source/null-geometric-object")
(:file "wire/source/outline-specialization-mixin") (:file "wire/source/outline-specialization-mixin")
(:file "wire/source/point-light") (:file "wire/source/point") (:file "wire/source/point-light") (:file "wire/source/point")
(:file "wire/source/points-display") (:file "wire/source/points-display")
(:file "wire/source/primitives") (:file "wire/source/route-pipe") (:file "wire/source/primitives") (:file "wire/source/route-pipe")
(:file "wire/source/spherical-cap") (:file "wire/source/spherical-cap")
(:file "wire/source/spot-light") (:file "wire/source/torus") (:file "wire/source/spot-light") (:file "wire/source/torus")
(:file "wire/source/utilities") (:file "wire/source/views") (:file "wire/source/utilities") (:file "wire/source/views")
(:file "annotations/source/angular-dimension") (:file "annotations/source/angular-dimension")
(:file "annotations/source/arrowhead") (:file "annotations/source/arrowhead")
(:file "annotations/source/center-line") (:file "annotations/source/center-line")
(:file "annotations/source/horizontal-dimension") (:file "annotations/source/horizontal-dimension")
(:file "annotations/source/label") (:file "annotations/source/label")
(:file "annotations/source/leader-arc") (:file "annotations/source/leader-arc")
(:file "annotations/source/leader-line") (:file "annotations/source/leader-line")
(:file "annotations/source/linear-dimension") (:file "annotations/source/linear-dimension")
(:file "annotations/source/parallel-dimension") (:file "annotations/source/parallel-dimension")
(:file "annotations/source/sample-drawing") (:file "annotations/source/sample-drawing")
(:file "annotations/source/vertical-dimension") (:file "annotations/source/vertical-dimension")
(:file "drawing/source/base-view") (:file "drawing/source/base-view")
(:file "drawing/source/document") (:file "drawing/source/lenses") (:file "drawing/source/document") (:file "drawing/source/lenses")
(:file "drawing/source/renderer-mixin") (:file "drawing/source/renderer-mixin")
(:file "text/source/general-note") (:file "text/source/general-note")
(:file "text/source/typeset-block") (:file "graphs/source/graph") (:file "text/source/typeset-block") (:file "graphs/source/graph")
(:file "graphs/source/legend") (:file "graphs/source/pie-chart") (:file "graphs/source/legend") (:file "graphs/source/pie-chart")
(:file "lenses/source/scad") (:file "lenses/source/vrml") (:file "lenses/source/scad") (:file "lenses/source/vrml")
(:file "lenses/source/x3d") (:file "math/source/polynomial") (:file "lenses/source/x3d") (:file "math/source/polynomial")
(:file "zzinit/source/initialize") (:file "zzinit/source/zzinit"))) (:file "zzinit/source/initialize") (:file "zzinit/source/zzinit")))
;;;; -*- coding: utf-8 -*- ;;;; -*- coding: utf-8 -*-
(asdf:defsystem #:glisp :description (asdf:defsystem #:glisp :description
"The Gendl\" Common Lisp Portability" :author "John McCarthy" "The Gendl\" Common Lisp Portability" :author "John McCarthy"
:license "Affero Gnu Public License (http://www.gnu.org/licenses/)" :license "Affero Gnu Public License (http://www.gnu.org/licenses/)"
:serial t :version "20160125" :depends-on :serial t :version "20160204" :depends-on
(:base :uiop :cl-typesetting :cl-ppcre :cl-who #-allegro :cl-base64 #-allegro :babel #-allegro :acl-compat) (:base :uiop :cl-typesetting :cl-ppcre :cl-who #-allegro :cl-base64 #-allegro :babel #-allegro :acl-compat)
#-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings) #-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings)
#+asdf-encodings :encoding #+asdf-encodings :utf-8 #+asdf-encodings :encoding #+asdf-encodings :utf-8
:components :components
((:file "source/presets") (:file "source/parameters") ((:file "source/presets") (:file "source/parameters")
(:file "source/genworks") (:file "source/initialize") (:file "source/genworks") (:file "source/initialize")
(:file "source/zzinit"))) (:file "source/zzinit")))
;;;; -*- coding: utf-8 -*- ;;;; -*- coding: utf-8 -*-
(asdf:defsystem #:gwl-graphics :description (asdf:defsystem #:gwl-graphics :description
"The Gendl\" GWL embedded graphics support" :author "John McCarthy" "The Gendl\" GWL embedded graphics support" :author "John McCarthy"
:license "Affero Gnu Public License (http://www.gnu.org/licenses/)" :license "Affero Gnu Public License (http://www.gnu.org/licenses/)"
:serial t :version "20160125" :depends-on (:geom-base :gwl) :serial t :version "20160204" :depends-on (:geom-base :gwl)
#-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings) #-asdf-unicode :defsystem-depends-on #-asdf-unicode (:asdf-encodings)
#+asdf-encodings :encoding #+asdf-encodings :utf-8 #+asdf-encodings :encoding #+asdf-encodings :utf-8
:components :components
((:file "gwl/source/application-mixin") ((:file "gwl/source/application-mixin")
(:file "gwl/source/base-ajax-graphics-sheet") (:file "gwl/source/base-ajax-graphics-sheet")
(:file "gwl/source/base-html-graphics-sheet") (:file "gwl/source/base-html-graphics-sheet")
(:file "gwl/source/layout-mixin") (:file "gwl/source/layout-mixin")
(:file "gwl/source/process-graphics-fields") (:file "gwl/source/process-graphics-fields")
(:file "gwl/source/web-drawing") (:file "gwl/source/x3d-try") (:file "gwl/source/web-drawing") (:file "gwl/source/x3d-try")
(:file "raphael/source/package") (:file "raphael/source/formats") (:file