Pessoal, instalei a biblioteca cl-pdf no winxp e ao rodar o código é
informado um erro
(pdf:with-document ()
(pdf:with-page ()
(let ((helvetica (make-instance 'pdf:font)))
(pdf:add-fonts-to-page helvetica)
(pdf:in-text-mode
(pdf:set-font helvetica 36.0)
(pdf:move-text 100 800)
(pdf:draw-text "CL-PDF: Example 1"))
(pdf:translate 230 500)
(loop repeat 101
for i = 0.67 then (* i 1.045)
do (pdf:in-text-mode
(pdf:set-font helvetica i)
(pdf:move-text (* i 3) 0)
(pdf:draw-text "rotation"))
(pdf:rotate 18))))
(pdf:write-document #P"ex1.pdf"))
Microsoft Windows XP [versão 5.1.2600]
(C) Copyright 1985-2001 Microsoft Corp.
C:\Documents and Settings\masp\Desktop>clisp -K full
i i i i i i i ooooo o ooooooo ooooo ooooo
I I I I I I I 8 8 8 8 8 o 8 8
I \ `+' / I 8 8 8 8 8 8
\ `-+-' / 8 8 8 ooooo 8oooo
`-__|__-' 8 8 8 8 8
| 8 o 8 8 o 8 8
------+------ ooooo 8oooooo ooo8ooo ooooo 8
Welcome to GNU CLISP 2.48 (2009-07-28) <http://clisp.cons.org/>
Copyright (c) Bruno Haible, Michael Stoll 1992, 1993
Copyright (c) Bruno Haible, Marcus Daniels 1994-1997
Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998
Copyright (c) Bruno Haible, Sam Steingold 1999-2000
Copyright (c) Sam Steingold, Bruno Haible 2001-2009
Type :h and hit Enter for context help.
;; Loading file C:\Documents and Settings\masp\.clisprc ...
;; Loading file C:\lisp\pacotes\asdf\asdf.lisp ...
WARNING: LOOP: FOR clauses should occur before the loop's main body
WARNING: LOOP: FOR clauses should occur before the loop's main body
;; Loaded file C:\lisp\pacotes\asdf\asdf.lisp
; loading system definition from C:\lisp\pacotes\cl-pdf\cl-pdf.asd into
#<PACKAG
E ASDF0>
;; Loading file C:\lisp\pacotes\cl-pdf\cl-pdf.asd ...
;; Loading file C:\lisp\pacotes\cl-pdf\iterate\iterate.asd ...
; registering #<SYSTEM :ITERATE #x19F5A35D> as ITERATE
;; Loaded file C:\lisp\pacotes\cl-pdf\iterate\iterate.asd
;; Loading file C:\lisp\pacotes\cl-pdf\salza\salza.asd ...
; registering #<SYSTEM :SALZA #x19F7F0AD> as SALZA
;; Loaded file C:\lisp\pacotes\cl-pdf\salza\salza.asd
; registering #<SYSTEM :CL-PDF #x19F8A671> as CL-PDF
;; Loaded file C:\lisp\pacotes\cl-pdf\cl-pdf.asd
;; Loading file C:\lisp\pacotes\cl-pdf\salza\packages.fas ...
** - Continuable Error
SYSTEM::%IN-PACKAGE: a package with name "ZLIB" already exists.
If you continue (by typing 'continue'): discard this nickname
The following restarts are also available:
READ :R1 input another nickname
SKIP :R2 skip 75 91 (DEFPACKAGE :SALZA (:USE :CL :SALZA-TYPES
...
) ...)-5-1
STOP :R3 stop loading file
C:\lisp\pacotes\cl-pdf\salza\packages.
fas
TRY-RECOMPILING :R4 Recompile packages and try loading it again
RETRY :R5 Retry performing #<ASDF:LOAD-OP NIL #x19F4B06D> on
#<ASD
F:CL-SOURCE-FILE "packages" #x19F46731>.
ACCEPT :R6 Continue, treating #<ASDF:LOAD-OP NIL #x19F4B06D> on
#<A
SDF:CL-SOURCE-FILE "packages" #x19F46731> as having been successful.
SKIP :R7 skip (OOS 'LOAD-OP CL-PDF)
STOP :R8 stop loading file C:\Documents and
Settings\masp\.clispr
c
Break 1 CL[5]> continue
;; Loaded file C:\lisp\pacotes\cl-pdf\salza\packages.fas
;; Loading file C:\lisp\pacotes\cl-pdf\salza\types.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\salza\types.fas
;; Loading file C:\lisp\pacotes\cl-pdf\salza\fixhash.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\salza\fixhash.fas
;; Loading file C:\lisp\pacotes\cl-pdf\salza\deflate-stream.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\salza\deflate-stream.fas
;; Loading file C:\lisp\pacotes\cl-pdf\salza\huffman.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\salza\huffman.fas
;; Loading file C:\lisp\pacotes\cl-pdf\salza\octet-replace.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\salza\octet-replace.fas
;; Loading file C:\lisp\pacotes\cl-pdf\salza\compressor.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\salza\compressor.fas
;; Loading file C:\lisp\pacotes\cl-pdf\salza\deflate-stream-interface.fas
...
;; Loaded file C:\lisp\pacotes\cl-pdf\salza\deflate-stream-interface.fas
;; Loading file C:\lisp\pacotes\cl-pdf\salza\zlib.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\salza\zlib.fas
;; Loading file C:\lisp\pacotes\cl-pdf\iterate\package.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\iterate\package.fas
;; Loading file C:\lisp\pacotes\cl-pdf\iterate\iterate.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\iterate\iterate.fas
;; Loading file C:\lisp\pacotes\cl-pdf\defpackage.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\defpackage.fas
;; Loading file C:\lisp\pacotes\cl-pdf\config.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\config.fas
;; Loading file C:\lisp\pacotes\cl-pdf\zlib.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\zlib.fas
;; Loading file C:\lisp\pacotes\cl-pdf\font-metrics.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\font-metrics.fas
;; Loading file C:\lisp\pacotes\cl-pdf\encodings.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\encodings.fas
;; Loading file C:\lisp\pacotes\cl-pdf\t1-font.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\t1-font.fas
;; Loading file C:\lisp\pacotes\cl-pdf\ttu-font.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\ttu-font.fas
;; Loading file C:\lisp\pacotes\cl-pdf\font.fas ...
WARNING: DEFGENERIC: redefining function FONT-DESCRIPTOR in
C:\lisp\pacotes\cl-pdf\font.fas, was defined in top-level
WARNING: The generic function #<STANDARD-GENERIC-FUNCTION NAME> is being
modified, but has already been called.
;; Loaded file C:\lisp\pacotes\cl-pdf\font.fas
;; Loading file C:\lisp\pacotes\cl-pdf\pdf.fas ...
WARNING: DEFGENERIC: redefining function MAKE-DICTIONARY in
C:\lisp\pacotes\cl-pdf\pdf.fas, was defined in top-level
WARNING: DEFGENERIC: redefining function FONT-DESCRIPTOR in
C:\lisp\pacotes\cl-pdf\pdf.fas, was defined in
C:\lisp\pacotes\cl-pdf\font.fas
;; Loaded file C:\lisp\pacotes\cl-pdf\pdf.fas
;; Loading file C:\lisp\pacotes\cl-pdf\x11-colors.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\x11-colors.fas
;; Loading file C:\lisp\pacotes\cl-pdf\pdf-base.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\pdf-base.fas
;; Loading file C:\lisp\pacotes\cl-pdf\png.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\png.fas
;; Loading file C:\lisp\pacotes\cl-pdf\pdf-geom.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\pdf-geom.fas
;; Loading file C:\lisp\pacotes\cl-pdf\text.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\text.fas
;; Loading file C:\lisp\pacotes\cl-pdf\bar-codes.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\bar-codes.fas
;; Loading file C:\lisp\pacotes\cl-pdf\chart.fas ...
WARNING: The generic function #<STANDARD-GENERIC-FUNCTION WIDTH> is being
modified, but has already been called.
;; Loaded file C:\lisp\pacotes\cl-pdf\chart.fas
0 errors, 0 warnings
; loading system definition from C:\lisp\pacotes\cl-pdf\cl-pdf-parser.asd
into #
<PACKAGE ASDF0>
;; Loading file C:\lisp\pacotes\cl-pdf\cl-pdf-parser.asd ...
; registering #<SYSTEM :CL-PDF-PARSER #x1A1CDCB1> as CL-PDF-PARSER
;; Loaded file C:\lisp\pacotes\cl-pdf\cl-pdf-parser.asd
;; Loading file C:\lisp\pacotes\cl-pdf\pdf-parser.fas ...
;; Loaded file C:\lisp\pacotes\cl-pdf\pdf-parser.fas
;; Loading file C:\lisp\pacotes\cl-pdf\pdf-template.fas ...
WARNING: The generic function #<STANDARD-GENERIC-FUNCTION NAME> is being
modified, but has already been called.
;; Loaded file C:\lisp\pacotes\cl-pdf\pdf-template.fas
0 errors, 0 warnings
;; Loaded file C:\Documents and Settings\masp\.clisprc
[1]> (pdf:with-document ()
(pdf:with-page ()
(let ((helvetica (make-instance 'pdf:font)))
(pdf:add-fonts-to-page helvetica)
*** - READ from #<INPUT CONCATENATED-STREAM #<IO TERMINAL-STREAM>>:
#<PACKAGE PDF> has no external symbol with name "ADD-FONTS-TO-PAGE"
The following restarts are available:
ABORT :R1 Abort main loop
Break 1 [2]>
não tive sucesso também usando Ubutntu 9
já inclui no path o caminho para as fontes afm mas mesmo assim nada.
Alguem já instalou o cl-pdf num WinXP ou Ubuntu?
Desde já grato.
--
Marcelino Pinheiro
11-7980-0617
--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups
"Lisp-br" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/lisp-br?hl=en
-~----------~----~----~----~------~----~------~--~---
