Removed in favour of cl-pxmlutils

8 files changed, 0 insertions, 208 deletions

diff --git a/dev-lisp/cl-pxml/ChangeLog b/dev-lisp/cl-pxml/ChangeLog
deleted file mode 100644
index 4272cd4fe0cb..000000000000
--- a/dev-lisp/cl-pxml/ChangeLog
+++ /dev/null
@@ -1,12 +0,0 @@
-# ChangeLog for dev-lisp/cl-pxml
-# Copyright 2000-2003 Gentoo Technologies, Inc.; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-lisp/cl-pxml/ChangeLog,v 1.2 2003/10/16 17:37:11 mkennedy Exp $
-
-  16 Oct 2003; Matthew Kennedy <mkennedy@gentoo.org> cl-pxml-20030325.ebuild,
-  metadata.xml, files/pxml-20030325-gentoo.patch, files/pxml.asd:
-  masked for now
-
-*cl-pxml-20030325 (07 Jul 2003)
-
-  07 Jul 2003; Matthew Kennedy <mkennedy@gentoo.org> :
-  initial import
diff --git a/dev-lisp/cl-pxml/Manifest b/dev-lisp/cl-pxml/Manifest
deleted file mode 100644
index f9632eb99833..000000000000
--- a/dev-lisp/cl-pxml/Manifest
+++ /dev/null
@@ -1,7 +0,0 @@
-MD5 9b65b0341efc8f4b29498aad23315229 metadata.xml 164
-MD5 f3c276d0d0f8401f457cbcb36e9dcd03 cl-pxml-20030325.ebuild 942
-MD5 e37d3a59f7fa76a4a055f53bd85c2d18 ChangeLog 483
-MD5 4b2a2a9b68656ff431ee8a42a4ab2392 files/pxml.asd 417
-MD5 f63cd1b313a37c1b83b1f3683ea80deb files/digest-cl-pxml-20030325 68
-MD5 7c9071a34b1da982b0af9de90a394c55 files/pxml-20030325-gentoo.patch 2929
-MD5 bbb59dd54bc4d55b47dc59a45bd238a0 files/pxml-gentoo.patch 1535
diff --git a/dev-lisp/cl-pxml/cl-pxml-20030325.ebuild b/dev-lisp/cl-pxml/cl-pxml-20030325.ebuild
deleted file mode 100644
index 287f8a985a75..000000000000
--- a/dev-lisp/cl-pxml/cl-pxml-20030325.ebuild
+++ /dev/null
@@ -1,39 +0,0 @@
-# Copyright 1999-2003 Gentoo Technologies, Inc.
-# Distributed under the terms of the GNU General Public License v2
-# $Header: /var/cvsroot/gentoo-x86/dev-lisp/cl-pxml/cl-pxml-20030325.ebuild,v 1.4 2003/10/16 17:37:11 mkennedy Exp $
-
-inherit common-lisp
-
-DESCRIPTION="Common Lisp XML parser from Franz, Inc."
-HOMEPAGE="http://opensource.franz.com/xmlutils/index.html"
-SRC_URI="mirror://gentoo/xmlutils-${PV}.tar.gz"
-LICENSE="LLGPL-2.1"
-SLOT="0"
-KEYWORDS="-x86"
-IUSE=""
-DEPEND="dev-lisp/common-lisp-controller
-	virtual/commonlisp
-	dev-lisp/cl-acl-compat"
-
-CLPACKAGE=pxml
-
-S=${WORKDIR}/xmlutils
-
-src_unpack() {
-	unpack ${A}
-	epatch ${FILESDIR}/pxml-${PV}-gentoo.patch
-}
-
-src_install() {
-	common-lisp-install pxml?.cl ${FILESDIR}/pxml.asd
-	common-lisp-system-symlink
-	dodoc ChangeLog pxml.txt pxml.htm
-}
-
-pkg_preinst() {
-	rm -rf /usr/lib/common-lisp/*/${CLPACKAGE} || true
-}
-
-pkg_postrm() {
-	rm -rf /usr/lib/common-lisp/*/${CLPACKAGE} || true
-}
diff --git a/dev-lisp/cl-pxml/files/digest-cl-pxml-20030325 b/dev-lisp/cl-pxml/files/digest-cl-pxml-20030325
deleted file mode 100644
index b85e9d2078dd..000000000000
--- a/dev-lisp/cl-pxml/files/digest-cl-pxml-20030325
+++ /dev/null
@@ -1 +0,0 @@
-MD5 75d7ecb096f491b1628130e1883bee14 xmlutils-20030325.tar.gz 55204
diff --git a/dev-lisp/cl-pxml/files/pxml-20030325-gentoo.patch b/dev-lisp/cl-pxml/files/pxml-20030325-gentoo.patch
deleted file mode 100644
index a9957c0543af..000000000000
--- a/dev-lisp/cl-pxml/files/pxml-20030325-gentoo.patch
+++ /dev/null
@@ -1,84 +0,0 @@
-diff -u xmlutils.orig/pxml0.cl xmlutils/pxml0.cl
---- xmlutils.orig/pxml0.cl	2003-04-01 00:41:01.000000000 -0600
-+++ xmlutils/pxml0.cl	2003-10-16 11:29:53.067861096 -0500
-@@ -29,14 +29,14 @@
- ;;
- 
- (defpackage net.xml.parser
--  (:use :lisp :clos :excl :net.uri)
-+  (:use :lisp #+allegro :clos :acl-compat.excl :net.uri)
-   (:export
-    #:parse-xml)
-   )
- 
- (in-package :net.xml.parser)
- 
--(unless (fboundp 'pxml-dribble-bug-hook)
-+#+allegro (unless (fboundp 'pxml-dribble-bug-hook)
-   (let ((pxml-version-strings nil))
-     (defun pxml-dribble-bug-hook (stream-or-string)
-       (if (stringp stream-or-string)
-@@ -47,7 +47,7 @@
- 
-     (push 'pxml-dribble-bug-hook excl:*dribble-bug-hooks*)))
- 
--(funcall 'pxml-dribble-bug-hook "$Id: pxml-20030325-gentoo.patch,v 1.1 2003/10/16 17:37:11 mkennedy Exp $")
-+#+allegro (funcall 'pxml-dribble-bug-hook "$Id: pxml-20030325-gentoo.patch,v 1.1 2003/10/16 17:37:11 mkennedy Exp $")
- 
- (defun xml-char-p (char)
-   (declare (optimize (speed 3) (safety 1)))
-diff -u xmlutils.orig/pxml1.cl xmlutils/pxml1.cl
---- xmlutils.orig/pxml1.cl	2003-04-01 00:41:01.000000000 -0600
-+++ xmlutils/pxml1.cl	2003-10-16 11:41:46.354425056 -0500
-@@ -25,13 +25,13 @@
- 
- (in-package :net.xml.parser)
- 
--(pxml-dribble-bug-hook "$Id: pxml-20030325-gentoo.patch,v 1.1 2003/10/16 17:37:11 mkennedy Exp $")
-+#+allegro (pxml-dribble-bug-hook "$Id: pxml-20030325-gentoo.patch,v 1.1 2003/10/16 17:37:11 mkennedy Exp $")
- 
- (defparameter *collectors* (list nil nil nil nil nil nil nil nil))
- 
- (defun put-back-collector (col)
-   (declare (optimize (speed 3) (safety 1)))
--  (mp::without-scheduling
-+  (acl-compat.mp:without-scheduling
-     (do ((cols *collectors* (cdr cols)))
- 	((null cols)
- 	 ; toss it away
-@@ -83,7 +83,7 @@
- (defun get-tokenbuf ()
-   (declare (optimize (speed 3) (safety 1)))
-   (let (buf)
--    (mp::without-scheduling
-+    (acl-compat.mp:without-scheduling
-       (do* ((bufs *tokenbufs* (cdr bufs))
- 	    (this (car bufs) (car bufs)))
- 	  ((null bufs))
-@@ -185,7 +185,7 @@
- 
- (defun put-back-tokenbuf (buf)
-   (declare (optimize (speed 3) (safety 1)))
--  (mp::without-scheduling
-+  (acl-compat.mp:without-scheduling
-     (do ((bufs *tokenbufs* (cdr bufs)))
- 	((null bufs)
- 	 ; toss it away
-@@ -197,7 +197,7 @@
- (defun get-collector ()
-   (declare (optimize (speed 3) (safety 1)))
-   (let (col)
--    (mp::without-scheduling
-+    (acl-compat.mp:without-scheduling
-       (do* ((cols *collectors* (cdr cols))
- 	    (this (car cols) (car cols)))
- 	  ((null cols))
-@@ -265,7 +265,7 @@
- 			      (iostruct-read-sequence-func iostruct))))))
-     (if* (and from-stream (eq tmp-char #\return)) then #\newline else tmp-char)))
- 
--(defun unicode-check (p tokenbuf)
-+#+allegro (defun unicode-check (p tokenbuf)
-   (declare (ignorable tokenbuf) (optimize (speed 3) (safety 1)))
-   ;; need no-OO check because external format support isn't completely done yet
-   (when (not (typep p 'string-input-simple-stream))
diff --git a/dev-lisp/cl-pxml/files/pxml-gentoo.patch b/dev-lisp/cl-pxml/files/pxml-gentoo.patch
deleted file mode 100644
index 7a2833a6a96b..000000000000
--- a/dev-lisp/cl-pxml/files/pxml-gentoo.patch
+++ /dev/null
@@ -1,41 +0,0 @@
-diff -u xmlutils.orig/pxml0.cl xmlutils/pxml0.cl
---- xmlutils.orig/pxml0.cl	2003-04-01 00:41:01.000000000 -0600
-+++ xmlutils/pxml0.cl	2003-06-09 20:04:40.000000000 -0500
-@@ -29,25 +29,24 @@
- ;;
- 
- (defpackage net.xml.parser
--  (:use :lisp :clos :excl :net.uri)
-+  (:use :lisp :excl :net.uri)
-   (:export
-    #:parse-xml)
-   )
- 
- (in-package :net.xml.parser)
- 
--(unless (fboundp 'pxml-dribble-bug-hook)
--  (let ((pxml-version-strings nil))
--    (defun pxml-dribble-bug-hook (stream-or-string)
--      (if (stringp stream-or-string)
--	  (push stream-or-string pxml-version-strings)
--	(loop for string in (reverse pxml-version-strings)
--	    do (write-string string stream-or-string)
--	       (terpri stream-or-string))))
-+;; (unless (fboundp 'pxml-dribble-bug-hook)
-+;;   (let ((pxml-version-strings nil))
-+;;     (defun pxml-dribble-bug-hook (stream-or-string)
-+;;       (if (stringp stream-or-string)
-+;; 	  (push stream-or-string pxml-version-strings)
-+;; 	(loop for string in (reverse pxml-version-strings)
-+;; 	    do (write-string string stream-or-string)
-+;; 	       (terpri stream-or-string))))
-+;;     (push 'pxml-dribble-bug-hook excl:*dribble-bug-hooks*)))
- 
--    (push 'pxml-dribble-bug-hook excl:*dribble-bug-hooks*)))
--
--(funcall 'pxml-dribble-bug-hook "$Id: pxml-gentoo.patch,v 1.1 2003/06/10 04:53:04 mkennedy Exp $")
-+;; (funcall 'pxml-dribble-bug-hook "$Id: pxml-gentoo.patch,v 1.1 2003/06/10 04:53:04 mkennedy Exp $")
- 
- (defun xml-char-p (char)
-   (declare (optimize (speed 3) (safety 1)))
-Only in xmlutils: pxml0.cl~
diff --git a/dev-lisp/cl-pxml/files/pxml.asd b/dev-lisp/cl-pxml/files/pxml.asd
deleted file mode 100644
index 8a7b0ab31932..000000000000
--- a/dev-lisp/cl-pxml/files/pxml.asd
+++ /dev/null
@@ -1,19 +0,0 @@
-;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp -*-
-
-(defpackage #:pxml-system
-  (:use #:cl #:asdf))
-(in-package #:pxml-system)
-
-(in-package :pxml-system)
-
-(defclass acl-file (cl-source-file) ())
-
-(defmethod asdf::source-file-type ((c acl-file) (s module)) 
-  "cl")
-
-(defsystem pxml
-    :depends-on (acl-compat)
-    :components ((:acl-file "pxml0")
-		 (:acl-file "pxml1")
-		 (:acl-file "pxml2")
-		 (:acl-file "pxml3")))
diff --git a/dev-lisp/cl-pxml/metadata.xml b/dev-lisp/cl-pxml/metadata.xml
deleted file mode 100644
index f418045b09c8..000000000000
--- a/dev-lisp/cl-pxml/metadata.xml
+++ /dev/null
@@ -1,5 +0,0 @@
-<?xml version="1.0" encoding="UTF-8"?>
-<!DOCTYPE pkgmetadata SYSTEM "http://www.gentoo.org/dtd/metadata.dtd">
-<pkgmetadata>
-<herd>common-lisp</herd>
-</pkgmetadata>