diff options
Diffstat (limited to 'dev-lisp/cl-jpeg/files/1.033-exports-gentoo.patch')
| -rw-r--r-- | dev-lisp/cl-jpeg/files/1.033-exports-gentoo.patch | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/dev-lisp/cl-jpeg/files/1.033-exports-gentoo.patch b/dev-lisp/cl-jpeg/files/1.033-exports-gentoo.patch new file mode 100644 index 000000000000..aa606b248b09 --- /dev/null +++ b/dev-lisp/cl-jpeg/files/1.033-exports-gentoo.patch @@ -0,0 +1,22 @@ +diff -ur cljl.orig/jpeg.lisp cljl/jpeg.lisp +--- cljl.orig/jpeg.lisp 2005-03-28 12:59:29.000000000 -0600 ++++ cljl/jpeg.lisp 2005-03-28 13:00:44.000000000 -0600 +@@ -59,11 +59,13 @@ + ;;; to the Independent JPEG Group - colorspace conversion and DCT algorithms were adopted from their sources; + ;;; to Jeff Dalton for his wise paper "Common Lisp Pitfalls". + +-(defpackage #:jpeg (:use #:common-lisp)) +-(in-package #:jpeg) ++(defpackage #:jpeg ++ (:use #:common-lisp) ++ (:export #:encode-image ++ #:decode-image ++ #:jpeg-to-bmp)) + +-(eval-when (compile) +- (export '(encode-image decode-image jpeg-to-bmp))) ++(in-package #:jpeg) + + (declaim (inline csize write-stuffed quantize get-average zigzag encode-block llm-dct descale crunch colorspace-convert subsample + inverse-llm-dct dequantize upsample extend recieve decode-ac decode-dc decode-block izigzag write-bits)) +Only in cljl: jpeg.lisp.~1.8.~ |