Typo.

[cl-gtk2.git] / glib / gobject.type-info.lisp

diff --git a/glib/gobject.type-info.lisp b/glib/gobject.type-info.lisp
index 8a7706f..1a7a8e5 100644 (file)
--- a/glib/gobject.type-info.lisp
+++ b/glib/gobject.type-info.lisp
@@ -1,117 +1,8 @@
-(defpackage :gobject.type-info
-  (:use :cl :iter :cffi :glib :gobject.ffi)
-  (:export #:+g-type-invalid+
-           #:+g-type-void+
-           #:+g-type-interface+
-           #:+g-type-char+
-           #:+g-type-uchar+
-           #:+g-type-boolean+
-           #:+g-type-int+
-           #:+g-type-uint+
-           #:+g-type-long+
-           #:+g-type-ulong+
-           #:+g-type-int64+
-           #:+g-type-uint64+
-           #:+g-type-enum+
-           #:+g-type-flags+
-           #:+g-type-float+
-           #:+g-type-double+
-           #:+g-type-string+
-           #:+g-type-pointer+
-           #:+g-type-boxed+
-           #:+g-type-param+
-           #:+g-type-object+
-           #:g-type-name
-           #:g-type-from-name
-           #:g-type
-           #:g-type-children
-           #:g-type-parent
-           #:g-type-designator
-           #:g-type-fundamental
-           #:g-type-depth
-           #:g-type-next-base
-           #:g-type-is-a
-           #:g-type-interfaces
-           #:g-type-interface-prerequisites
-           #:g-strv-get-type
-           #:g-closure-get-type
-           #:g-class-property-definition
-           #:g-class-property-definition-name
-           #:g-class-property-definition-type
-           #:g-class-property-definition-readable
-           #:g-class-property-definition-writable
-           #:g-class-property-definition-constructor
-           #:g-class-property-definition-constructor-only
-           #:g-class-property-definition-owner-type
-           #:parse-g-param-spec
-           #:class-properties
-           #:interface-properties
-           #:enum-item
-           #:enum-item-name
-           #:enum-item-value
-           #:enum-item-nick
-           #:get-enum-items
-           #:flags-item
-           #:flags-item-name
-           #:flags-item-value
-           #:flags-item-nick
-           #:get-flags-items
-           #:signal-info
-           #:signal-info-id
-           #:signal-info-name
-           #:signal-info-owner-type
-           #:signal-info-flags
-           #:signal-info-return-type
-           #:signal-info-param-types
-           #:signal-info-detail
-           #:query-signal-info
-           #:type-signals
-           #:parse-signal-name
-           #:class-property-info)
-  (:documentation
-"This package contains functions for querying the basic type information from GObject type system. For an overview of GObject type system, see @a[http://library.gnome.org/devel/gobject/stable/index.html]{GObject documentation}
-
-Types are identified by GType designators that are specified in @class{g-type-designator}. Functions of this package provide means to query basic information about type.
-
-@begin{itemize}
-@item{@fun{g-type-name} and @fun{g-type-from-name} convert between numeric and string representation of GType.}
-@item{@fun{g-type-parent}, @fun{g-type-children} and @fun{g-type-interfaces} traverse across the type hierarchy.}
-@item{@fun{g-type-depth}, @fun{g-type-fundamental}, @fun{g-type-is-a}, @fun{g-type-next-base} are convenience functions that provide useful information from type hierarchy}
-@end{itemize}
-
-This is a list of variables and functions that correspond to basic types:
-@begin{itemize}
-@item{@fun{g-closure-get-type}}
-@item{@fun{g-strv-get-type}}
-@item{@variable{+g-type-invalid+}}
-@item{@variable{+g-type-void+}}
-@item{@variable{+g-type-interface+}}
-@item{@variable{+g-type-char+}}
-@item{@variable{+g-type-uchar+}}
-@item{@variable{+g-type-boolean+}}
-@item{@variable{+g-type-int+}}
-@item{@variable{+g-type-uint+}}
-@item{@variable{+g-type-long+}}
-@item{@variable{+g-type-ulong+}}
-@item{@variable{+g-type-int64+}}
-@item{@variable{+g-type-uint64+}}
-@item{@variable{+g-type-enum+}}
-@item{@variable{+g-type-flags+}}
-@item{@variable{+g-type-float+}}
-@item{@variable{+g-type-double+}}
-@item{@variable{+g-type-string+}}
-@item{@variable{+g-type-pointer+}}
-@item{@variable{+g-type-boxed+}}
-@item{@variable{+g-type-param+}}
-@item{@variable{+g-type-object+}}
-@end{itemize}
-"))
-
-(in-package :gobject.type-info)
+(in-package :gobject)
 
 (defctype g-type gsize)
 
-(eval-when (:load-toplevel :compile-toplevel)
+(eval-when (:compile-toplevel :load-toplevel :execute)
   (defun gtype-make-fundamental-type (x)
     (ash x 2)))