Exporting QUERY-ENUM-VALUES and TYPE-FROM-GLIB-NAME

diff --git a/glib/defpackage.lisp b/glib/defpackage.lisp
index 79766c6bb884dbeca889baea7c0d4102c42577fd..d8200086325a6f0c3978cd9a201c8af234fe154d 100644 (file)
--- a/glib/defpackage.lisp
+++ b/glib/defpackage.lisp
@@ -20,7 +20,7 @@
 ;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
 ;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 
 ;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
 ;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 

-;; $Id: defpackage.lisp,v 1.15 2006-08-16 12:09:03 espen Exp $
+;; $Id: defpackage.lisp,v 1.16 2006-09-05 13:18:58 espen Exp $

 
 
 (defpackage "GLIB"
 
 
 (defpackage "GLIB"


@@ -39,11 +39,12 @@ (defpackage "GLIB"
   ;; Symbols from gtype.lisp  
   (:export "TYPE-NUMBER" "GTYPE" "TYPE-QUERY" "TYPE-INSTANCE-SIZE"
           "TYPE-CLASS-SIZE" "TYPE-CLASS-REF" "TYPE-CLASS-UNREF"
   ;; Symbols from gtype.lisp  
   (:export "TYPE-NUMBER" "GTYPE" "TYPE-QUERY" "TYPE-INSTANCE-SIZE"
           "TYPE-CLASS-SIZE" "TYPE-CLASS-REF" "TYPE-CLASS-UNREF"

-           "TYPE-CLASS-PEEK" "TYPE-NUMBER-FROM-GLIB-NAME"
-           "REGISTER-TYPE" "REGISTER-TYPE-ALIAS""REGISTER-NEW-TYPE"
-           "FIND-TYPE-NUMBER" "TYPE-FROM-NUMBER" "SUPERTYPE"
-           "GINSTANCE-CLASS" "GINSTANCE" "REGISTER-DERIVABLE-TYPE"
-           "INIT-TYPES-IN-LIBRARY" "DEFINE-TYPES-BY-INTROSPECTION")
+          "TYPE-CLASS-PEEK" "TYPE-NUMBER-FROM-GLIB-NAME"
+          "REGISTER-TYPE" "REGISTER-TYPE-ALIAS""REGISTER-NEW-TYPE"
+          "FIND-TYPE-NUMBER" "TYPE-FROM-NUMBER" "SUPERTYPE"
+          "GINSTANCE-CLASS" "GINSTANCE" "REGISTER-DERIVABLE-TYPE"
+          "INIT-TYPES-IN-LIBRARY" "DEFINE-TYPES-BY-INTROSPECTION"
+          "TYPE-FROM-GLIB-NAME")

   ;; Symbols from gparam.lisp  
   (:export "GVALUE" "GVALUE-INIT" "GVALUE-NEW" "GVALUE-FREE" "GVALUE-TYPE" 
           "GVALUE-GET" "GVALUE-SET" "VALUE-P" "WITH-GVALUE" "+GVALUE-SIZE+"
   ;; Symbols from gparam.lisp  
   (:export "GVALUE" "GVALUE-INIT" "GVALUE-NEW" "GVALUE-FREE" "GVALUE-TYPE" 
           "GVALUE-GET" "GVALUE-SET" "VALUE-P" "WITH-GVALUE" "+GVALUE-SIZE+"


@@ -91,5 +92,7 @@ (defpackage "GLIB"
           "GLIB-ERROR" "GLIB-FILE-ERROR" "SIGNAL-GERROR" 
           "GERROR-SIGNAL" "LOG-LEVELS" "LOG-DOMAIN" "LOG-MESSAGE" 
           "UNKNOWN-LOG-LEVEL" "ERROR-LOG-LEVEL" "CRITICAL-LOG-LEVEL" 
           "GLIB-ERROR" "GLIB-FILE-ERROR" "SIGNAL-GERROR" 
           "GERROR-SIGNAL" "LOG-LEVELS" "LOG-DOMAIN" "LOG-MESSAGE" 
           "UNKNOWN-LOG-LEVEL" "ERROR-LOG-LEVEL" "CRITICAL-LOG-LEVEL" 

-          "WARNING-LOG-LEVEL" "INFO-LOG-LEVEL" "DEBUG-LOG-LEVEL"))
+          "WARNING-LOG-LEVEL" "INFO-LOG-LEVEL" "DEBUG-LOG-LEVEL")
+  ;; Symbols from genum.lisp  
+  (:export "QUERY-ENUM-VALUES"))