chiark - git - mdw - clg/blob - clg.system

   1 ;;; -*- Mode: lisp -*-
   2
   3 (setf
   4  (logical-pathname-translations "clg")
   5  '(("**;*.*.*" "/home/espen/src/clg/**/*.*.*")))
   6 (setq mk::*cmu-errors-to-file* nil)
   7
   8 (load "clg:tools;config")
   9 (load "clg:tools;sharedlib")
  10
  11 (import 'alien:load-shared-library)
  12
  13 (eval
  14  `(mk:defsystem clg
  15     :source-pathname "clg:"
  16     :binary-pathname "clg:"
  17     :components
  18     ((:module tools
  19       :components ("autoexport"))
  20      (:module glib
  21       :initially-do
  22       (progn
  23         (load-shared-library "libglib-1.3.so.1")
  24         (load-shared-library "libgobject-1.3.so.1" :init "g_type_init"))
  25       :components
  26       ((:file "glib-package")
  27        (:file "gutils" :depends-on ("glib-package"))
  28        (:file "gforeign" :depends-on ("gutils"))
  29        (:file "glib" :depends-on ("gforeign"))
  30        (:file "gtype" :depends-on ("glib"))
  31        (:file "gobject" :depends-on ("gtype"))
  32        (:file "glib-export" :depends-on ("gutils" "glib" "gtype" "gobject")))
  33       :depends-on (tools))
  34      (:file "gdkglue"
  35       :source-pathname "gdk;"
  36       :binary-pathname "gdk;"
  37       :initially-do
  38       (progn
  39         (load-shared-library "libgdk_pixbuf-1.3.so.1")
  40         (load-shared-library "libgdk-x11-1.3.so.1")
  41         ;; Initializing of gdk types is done by gtk, so we
  42         ;; have to load an initialize it at this point
  43         (load-shared-library
  44          "libgtk-x11-1.3.so.1"
  45          :init "gtk_init"
  46          :prototype '(function
  47                       c-call:void
  48                       alien:system-area-pointer
  49                       alien:system-area-pointer)
  50          :initargs (list (system:int-sap 0) (system:int-sap 0))))
  51       :language :c
  52       :compiler-options (:cflags ,(configure-cflags "gtk-config-2.0")
  53                          :optimize 2))
  54      (:module gdk
  55       :components
  56       ((:file "gdk-package")
  57        (:file "gdk-export" :depends-on ("gdkenums" "gdktypes" "gdk"))
  58        (:file "gdkenums" :depends-on ("gdk-package"))
  59        (:file "gdktypes" :depends-on ("gdkenums"))
  60        (:file "gdk" :depends-on ("gdktypes")))
  61       :depends-on (glib "gdkglue"))
  62      (:file "gtkglue"
  63       :source-pathname "gtk;"
  64       :binary-pathname "gtk;"
  65       :language :c
  66       :compiler-options (:cflags ,(configure-cflags "gtk-config-2.0")
  67                          :optimize 2
  68                          :definitions (#+cmu CMUCL)
  69                          :include-paths ("/usr/lib/cmucl")))
  70      (:module gtk
  71       :components
  72       ((:file "gtk-package")
  73        (:file "gtk-export" :depends-on ("gtkenums" "gtktypes" "gtk"))
  74        (:file "gtkobject" :depends-on ("gtk-package"))
  75        (:file "gtkenums" :depends-on ("gtk-package"))
  76        (:file "gtktypes" :depends-on ("gtkenums" "gtkobject"))
  77        (:file "gtkwidget" :depends-on ("gtktypes"))
  78        (:file "gtkcontainer" :depends-on ("gtktypes"))
  79        (:file "gtk" :depends-on ("gtktypes"))
  80        (:file "gtkutils" :depends-on ("gtk")))
  81       :depends-on (glib gdk "gtkglue")))))
  82
  83
  84