| 1 |
;;;; -*- Mode: LISP; Syntax: ANSI-Common-Lisp; Base: 10 -*- |
|---|
| 2 |
|
|---|
| 3 |
;;; cl-pdf copyright 2002-2005 Marc Battyani see license.txt for the details |
|---|
| 4 |
;;; You can reach me at marc.battyani@fractalconcept.com or marc@battyani.net |
|---|
| 5 |
;;; The homepage of cl-pdf is here: http://www.fractalconcept.com/asp/html/cl-pdf.html |
|---|
| 6 |
|
|---|
| 7 |
(in-package :common-lisp-user) |
|---|
| 8 |
|
|---|
| 9 |
(defpackage #:cl-pdf-system |
|---|
| 10 |
(:use #:cl #:asdf)) |
|---|
| 11 |
|
|---|
| 12 |
(in-package #:cl-pdf-system) |
|---|
| 13 |
|
|---|
| 14 |
;;;Choose the zlib implementation you want to use (only one!) |
|---|
| 15 |
(eval-when (:load-toplevel :compile-toplevel :execute) |
|---|
| 16 |
(pushnew :use-salza-zlib *features*) |
|---|
| 17 |
;;(pushnew :use-uffi-zlib *features*) |
|---|
| 18 |
;;(pushnew :use-abcl-zlib *features*) |
|---|
| 19 |
;;(pushnew :use-no-zlib *features*) |
|---|
| 20 |
) |
|---|
| 21 |
|
|---|
| 22 |
#-(or use-uffi-zlib use-salza-zlib use-abcl-zlib use-no-zlib) |
|---|
| 23 |
(error "You must choose which zlib implementation you want to use!") |
|---|
| 24 |
|
|---|
| 25 |
#+(and (not uffi) use-uffi-zlib) |
|---|
| 26 |
(ignore-errors |
|---|
| 27 |
(print "Trying to load UFFI:") |
|---|
| 28 |
(operate 'load-op :uffi) |
|---|
| 29 |
(pushnew :uffi *features*) |
|---|
| 30 |
(print "UFFI loaded.")) |
|---|
| 31 |
|
|---|
| 32 |
#+clisp (setf *warn-on-floating-point-contagion* nil) |
|---|
| 33 |
|
|---|
| 34 |
(defsystem :cl-pdf |
|---|
| 35 |
:name "cl-pdf" |
|---|
| 36 |
:author "Marc Battyani <marc.battyani@fractalconcept.com>" |
|---|
| 37 |
:version "2.0" |
|---|
| 38 |
:maintainer "Marc Battyani <marc.battyani@fractalconcept.com>" |
|---|
| 39 |
:licence "BSD like licence" |
|---|
| 40 |
:description "Common Lisp PDF Generation Library" |
|---|
| 41 |
:long-description "The cl-pdf package provides a stand-alone Common Lisp library to generate PDF files." |
|---|
| 42 |
:perform (load-op :after (op cl-pdf) |
|---|
| 43 |
(pushnew :cl-pdf *features*)) |
|---|
| 44 |
:components ((:file "defpackage") |
|---|
| 45 |
(:file "config" :depends-on ("defpackage")) |
|---|
| 46 |
#+use-uffi-zlib (:file "init" :depends-on ("config")) |
|---|
| 47 |
(:file "zlib" |
|---|
| 48 |
:depends-on ("config" "defpackage" |
|---|
| 49 |
#+use-uffi-zlib "init")) |
|---|
| 50 |
(:file "font-metrics" :depends-on ("config")) |
|---|
| 51 |
(:file "encodings" :depends-on ("defpackage")) |
|---|
| 52 |
(:file "t1-font" :depends-on ("font-metrics" "encodings")) |
|---|
| 53 |
(:file "ttu-font" :depends-on ("font-metrics")) |
|---|
| 54 |
(:file "font" :depends-on ("t1-font")) |
|---|
| 55 |
(:file "pdf" :depends-on ("font")) |
|---|
| 56 |
(:file "x11-colors" :depends-on ("defpackage")) |
|---|
| 57 |
(:file "pdf-base" :depends-on ("pdf" "x11-colors")) |
|---|
| 58 |
(:file "png" :depends-on ("pdf-base")) |
|---|
| 59 |
(:file "pdf-geom" :depends-on ("pdf-base")) |
|---|
| 60 |
(:file "text" :depends-on ("pdf-base")) |
|---|
| 61 |
(:file "bar-codes" :depends-on ("pdf-geom")) |
|---|
| 62 |
(:file "chart" :depends-on ("text" "pdf-geom"))) |
|---|
| 63 |
:depends-on (:iterate #+use-salza-zlib :salza #+use-salza-zlib :babel)) |
|---|
