From: Stephen Gibberd
Subject: Problems using cl-pdf package with cmucl on debian system
Date: 
Message-ID: <20ab4a7f.0304171854.701a32c8@posting.google.com>
I'm running the unstable version of debian, and tried using the cl-pdf
package but with little success. A transcript of what happens when I
try loading this package is below. Does anyone have any ideas on where
to look?

Thanks.

--------------------

CMU Common Lisp release x86-linux 3.1.7 18d+ 18 January 2003 build
4523, running on wipadmin
For support see http://www.cons.org/cmucl/support.html Send bug
reports to the debian BTS.
or to ········@debian.org
type (help) for help, (quit) to exit, and (demo) to see the demos

Loaded subsystems:
    Python 1.0, target Intel x86
    CLOS based on PCL version:  September 16 92 PCL (f)
* (require 'cl-pdf)

; loading system definition from
/usr/share/common-lisp/systems/cl-pdf.asd into
; #<The ASDF1040 package, 0/9 internal, 0/9 external>
; Loading #p"/usr/share/common-lisp/source/cl-pdf/cl-pdf.asd".
; registering #<SYSTEM :CL-PDF {4802E90D}> as CL-PDF
; loading system definition from
/usr/share/common-lisp/systems/uffi.asd into
; #<The ASDF1069 package, 0/9 internal, 0/9 external>
; Loading #p"/usr/share/common-lisp/source/uffi/uffi.asd".
; registering #<SYSTEM UFFI {480E257D}> as UFFI

; In: LAMBDA (#:G1071 #:G1072 #:G1084 #:G1085)
;   #'(LAMBDA (PCL::.PV-CELL. PCL::.NEXT-METHOD-CALL. PCL::.ARG0.
PCL::.ARG1.)
;       (DECLARE #)
;       (LOCALLY # #))
; Note: Return type not fixed values, so can't use known return
convention:
;   *
; 

; Compilation unit finished.
;   1 note
; Loading #p"/usr/lib/common-lisp/cmucl-normal/uffi/src/package.x86f".
; Loading #p"/usr/lib/common-lisp/cmucl-normal/uffi/src/primitives.x86f".
; Loading #p"/usr/lib/common-lisp/cmucl-normal/uffi/src/strings.x86f".
; Loading #p"/usr/lib/common-lisp/cmucl-normal/uffi/src/objects.x86f".
; Loading #p"/usr/lib/common-lisp/cmucl-normal/uffi/src/aggregates.x86f".
; Loading #p"/usr/lib/common-lisp/cmucl-normal/uffi/src/functions.x86f".
; Loading #p"/usr/lib/common-lisp/cmucl-normal/uffi/src/libraries.x86f".
; Loading #p"/usr/lib/common-lisp/cmucl-normal/uffi/src/os.x86f".
; Loading #p"/usr/lib/common-lisp/cmucl-normal/cl-pdf/defpackage.x86f".
; Loading #p"/usr/lib/common-lisp/cmucl-normal/cl-pdf/config.x86f".
; Loading #p"/usr/lib/common-lisp/cmucl-normal/cl-pdf/zlib.x86f".

Undefined foreign symbol: "compress"

Restarts:
  0: [CONTINUE       ] Return NIL from load of
#p"/usr/lib/common-lisp/cmucl-normal/cl-pdf/zlib.x86f".
  1: [RETRY-COMPONENT] ASDF::RETRY-COMPONENT
  2: [SKIP-COMPONENT ] ASDF::SKIP-COMPONENT
  3: [ABORT          ] Return to Top-Level.
From: Jenifer Atkins
Subject: Re: Problems using cl-pdf package with cmucl on debian system
Date: 
Message-ID: <78b24ebc.0304172302.6a54df6d@posting.google.com>
···@everyday.com.kh (Stephen Gibberd) wrote in message news:<····························@posting.google.com>...
> I'm running the unstable version of debian, and tried using the cl-pdf
> package but with little success. A transcript of what happens when I
> try loading this package is below. Does anyone have any ideas on where
> to look?
> 
> Thanks.

I had some minor problems trying to get cl-pdf-1.1.1 running on
cmucl-18d.
==========================
For zlib:
--- cl-pdf/zlib.lisp    Sat Feb 22 21:21:55 2003
+++ ../cl-pdf/zlib.lisp Thu Apr 10 19:43:51 2003
@@ -6,7 +6,7 @@
 
 ;Adapted from an UFFI example
 
-(eval-when (:load-toplevel)
+(eval-when (:load-toplevel :compile-toplevel :execute)
 
 (defparameter *zlib-path*
   #-(or macosx darwin)
==========================

And also the problems with font:

diff -u cl-pdf/font.lisp ../cl-pdf/font.lisp
   (font-metrics :accessor font-metrics)
   (widths :accessor widths :initform (make-array 256 :initial-element
0 :element-type '(signed-byte 16)))
   (kernings :accessor kernings :initform (make-array 256
:initial-element nil))
-  (characters :accessor characters :initform (make-array 256))))
+  (characters :accessor characters :initform (make-array 256
:initial-element nil))))
 
 (defmethod initialize-instance :after ((font font) &rest init-options
&key &allow-other-keys)
   (let ((font-metrics (gethash (name font) *font-metrics*)))

=========================

Be sure to include only valid fontpaths in config.lisp

Also you might need to hack uffi foreign library loader.

----
From: Kevin Rosenberg
Subject: Re: Problems using cl-pdf package with cmucl on debian system
Date: 
Message-ID: <slrnba04br.3tm.kevin@tiger.med-info.com>
In article <····························@posting.google.com>, Stephen Gibberd wrote:
> I'm running the unstable version of debian, and tried using the cl-pdf
> package but with little success. A transcript of what happens when I
> try loading this package is below. Does anyone have any ideas on where
> to look?
> [...]
> 
> CMU Common Lisp release x86-linux 3.1.7 18d+ 18 January 2003 build
> 4523, running on wipadmin

I've encounted this. It appears to be a bug in cmucl and have
previously filed a report against the Debian cmucl package.

-- 
       Kevin Rosenberg        |  .''`.  ** Debian GNU/Linux **
  http://b9.com/debian.html   | : :' :      The  universal
  GPG signed and encrypted    | `. `'      Operating System
     messages accepted.       |   `-    http://www.debian.org/
comp.lang.lisp / 2003 / apr