r3353: *** empty log message ***

diff --git a/-clim/fli-templates.lisp b/-clim/fli-templates.lisp
new file mode 100644 (file)
index 0000000..d3b2b26
--- /dev/null
+++ b/-clim/fli-templates.lisp
@@ -0,0 +1,2 @@
+
+(FLI::DEFINE-PRECOMPILED-FOREIGN-OBJECT-SETTER-FUNCTIONS (((:XT-ARG XM-LIBRARY::$ROW-COLUMN-ROW-COLUMN-TYPE) :SIZE COMMON-LISP:NIL))) 
\ No newline at end of file

diff --git a/-clim/lw-build-exec.lisp b/-clim/lw-build-exec.lisp
index 7081f2341ae6da63ccb5d5d8cad4e79d8dc2386b..7743d57969343b056ac47246eb69d3e1b93f3a67 100644 (file)
--- a/-clim/lw-build-exec.lisp
+++ b/-clim/lw-build-exec.lisp
@@ -1,4 +1,8 @@
 (asdf:oos 'asdf:load-op 'reversi)
 
-#+lispworks
+(let ((path (make-pathname :defaults *load-truename*
+                          :name "fli-templates")))
+  (compile-file path)
+  (load (compile-file-pathname path)))
+
 (deliver 'reversi::clim-reversi "cl-reversi" 5 :multiprocessing t)