From 507d5ec80b79171e96db043d813f9211c0c22701 Mon Sep 17 00:00:00 2001 Message-Id: <507d5ec80b79171e96db043d813f9211c0c22701.1716778210.git.mdw@distorted.org.uk> From: Mark Wooding Date: Sun, 29 Apr 2001 20:33:53 +0000 Subject: [PATCH] Renamed and added new exported symbols Organization: Straylight/Edgeware From: espen --- glib/glib-package.lisp | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/glib/glib-package.lisp b/glib/glib-package.lisp index 7c3de18..b68b322 100644 --- a/glib/glib-package.lisp +++ b/glib/glib-package.lisp @@ -15,7 +15,7 @@ ;; License along with this library; if not, write to the Free Software ;; Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA -;; $Id: glib-package.lisp,v 1.3 2001-04-29 20:22:21 espen Exp $ +;; $Id: glib-package.lisp,v 1.4 2001-04-29 20:33:53 espen Exp $ (export 'kernel::type-expand-1 "KERNEL") @@ -27,12 +27,12 @@ (defpackage "GLIB" "ALLOCATION" "DIRECT-SLOTS") (:import-from "KERNEL" "TYPE-EXPAND-1") (:export "DEFTYPE-METHOD" "TRANSLATE-TYPE-SPEC" "TRANSLATE-TO-ALIEN" - "TRANSLATE-FROM-ALIEN" "CLEANUP-ALIEN" "SIZE-OF") - (:export "DEFINE-FOREIGN" "USE-PREFIX" "PACKAGE-PREFIX") + "TRANSLATE-FROM-ALIEN" "CLEANUP-ALIEN" "UNREFERENCE-ALIEN" + "SIZE-OF") + (:export "DEFBINDING" "DEFINE-FOREIGN" "USE-PREFIX" "PACKAGE-PREFIX") (:export "LONG" "UNSIGNED-LONG" "INT" "UNSIGNED-INT" "SHORT" "UNSIGNED-SHORT" - "SIGNED" "UNSIGNED" "CHAR" "POINTER" "ENUM" "FLAGS" "TYPE-NUMBER" - "STATIC") - (:export "GET-TO-ALIEN-FUNCTION" "GET-FROM-ALIEN-FUNCTION" - "GET-CLEANUP-FUNCTION" "GET-READER-FUNCTION" "GET-WRITER-FUNCTION" - "GET-DESTROY-FUNCTION")) + "SIGNED" "UNSIGNED" "CHAR" "POINTER" "ENUM" "FLAGS") + (:export "INTERN-ARGUMENT-TRANSLATOR" "INTERN-RETURN-VALUE-TRANSLATOR" + "INTERN-CLEANUP-FUNCTION" "INTERN-WRITER-FUNCTION" + "INTERN-READER-FUNCTION" "INTERN-DESTROY-FUNCTION")) -- [mdw]