Permalink
Browse files

Initial commit

  • Loading branch information...
0 parents commit 689431dd2ceb3652cd315748acdefe94679426b3 @mon-key committed Aug 27, 2011
Showing with 779 additions and 0 deletions.
  1. +6 −0 README
  2. +36 −0 package.lisp
  3. +626 −0 tiff.lisp
  4. +44 −0 tiff4cl.asd
  5. +67 −0 util.lisp
6 README
@@ -0,0 +1,6 @@
+This is a fork of Walter C. Pelissero's tiff4cl
+As provided from the tarball dated 2009-08-28
+
+http://wcp.sdf-eu.org/software/tiff4cl-20090828.src.tbz
+http://wcp.sdf-eu.org/software/
+
@@ -0,0 +1,36 @@
+;;; package.lisp --- package definition
+
+;;; Copyright (C) 2009 by Walter C. Pelissero
+
+;;; Author: Walter C. Pelissero <walter@pelissero.de>
+;;; Project: tiff4cl
+
+#+cmu (ext:file-comment "$Module: package.lisp $")
+
+;;; This library is free software; you can redistribute it and/or
+;;; modify it under the terms of the GNU Lesser General Public License
+;;; as published by the Free Software Foundation; either version 2.1
+;;; of the License, or (at your option) any later version.
+;;; This library is distributed in the hope that it will be useful,
+;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+;;; Lesser General Public License for more details.
+;;; You should have received a copy of the GNU Lesser General Public
+;;; License along with this library; if not, write to the Free
+;;; Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+;;; 02111-1307 USA
+
+(in-package :cl-user)
+
+(defpackage :tiff4cl
+ (:nicknames :tiff)
+ (:use :common-lisp)
+ (:export #:parse-TIFF
+ #:print-TIFF-tags
+ #:map-TIFF-tags
+ #:TIFF-extract-tags
+ ;; accessors
+ #:ifd-tags
+ #:tag-id
+ #:tag-type
+ #:tag-value))
Oops, something went wrong.

0 comments on commit 689431d

Please sign in to comment.