From 9508b76bd2401b6b9e289b5c8ec9fc0e08909283 Mon Sep 17 00:00:00 2001 From: Elliot Lee Date: Mon, 24 Nov 1997 22:37:52 +0000 Subject: Initial revision --- gtk/gtk.defs | 810 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 810 insertions(+) create mode 100644 gtk/gtk.defs (limited to 'gtk/gtk.defs') diff --git a/gtk/gtk.defs b/gtk/gtk.defs new file mode 100644 index 000000000..0228e7a8b --- /dev/null +++ b/gtk/gtk.defs @@ -0,0 +1,810 @@ +; -*- scheme -*- + +;;; Gtk enums + +(define-enum GtkWindowType + (toplevel GTK_WINDOW_TOPLEVEL) + (dialog GTK_WINDOW_DIALOG) + (popup GTK_WINDOW_POPUP)) + +(define-enum GtkStateType + (normal GTK_STATE_NORMAL) + (active GTK_STATE_ACTIVE) + (prelight GTK_STATE_PRELIGHT) + (selected GTK_STATE_SELECTED) + (insensitive GTK_STATE_INSENSITIVE)) + +(define-enum GtkDirectionType + (tab-forward GTK_DIR_TAB_FORWARD) + (tab-backward GTK_DIR_TAB_BACKWARD) + (up GTK_DIR_UP) + (down GTK_DIR_DOWN) + (left GTK_DIR_LEFT) + (right GTK_DIR_RIGHT)) + +(define-enum GtkShadowType + (none GTK_SHADOW_NONE) + (in GTK_SHADOW_IN) + (out GTK_SHADOW_OUT) + (etched-in GTK_SHADOW_ETCHED_IN) + (etched-out GTK_SHADOW_ETCHED_OUT)) + +(define-enum GtkArrowType + (up GTK_ARROW_UP) + (down GTK_ARROW_DOWN) + (left GTK_ARROW_LEFT) + (right GTK_ARROW_RIGHT)) + +(define-enum GtkPackType + (start GTK_PACK_START) + (end GTK_PACK_END)) + +(define-enum GtkPolicyType + (always GTK_POLICY_ALWAYS) + (automatic GTK_POLICY_AUTOMATIC)) + +(define-enum GtkUpdateType + (continous GTK_UPDATE_CONTINUOUS) + (discontinous GTK_UPDATE_DISCONTINUOUS) + (delayed GTK_UPDATE_DELAYED)) + +(define-flags GtkAttachOptions + (expand GTK_EXPAND) + (shrink GTK_SHRINK) + (fill GTK_FILL)) + +(define-flags GtkSignalRunType + (first GTK_RUN_FIRST) + (last GTK_RUN_LAST) + (both GTK_RUN_BOTH) + (mask GTK_RUN_MASK) + (no-recurse GTK_RUN_NO_RECURSE)) + +(define-enum GtkWindowPosition + (none GTK_WIN_POS_NONE) + (center GTK_WIN_POS_CENTER) + (mouse GTK_WIN_POS_MOUSE)) + +(define-enum GtkSubmenuDirection + (left GTK_DIRECTION_LEFT) + (right GTK_DIRECTION_RIGHT)) + +(define-enum GtkSubmenuPlacement + (top-bottom GTK_TOP_BOTTOM) + (left-right GTK_LEFT_RIGHT)) + +(define-enum GtkMenuFactoryType + (menu GTK_MENU_FACTORY_MENU) + (menu-bar GTK_MENU_FACTORY_MENU_BAR) + (option-menu GTK_MENU_FACTORY_OPTION_MENU)) + +(define-enum GtkMetricType + (pixels GTK_PIXELS) + (inches GTK_INCHES) + (centimeters GTK_CENTIMETERS)) + +(define-enum GtkScrollType + (none GTK_SCROLL_NONE) + (step-backward GTK_SCROLL_STEP_BACKWARD) + (step-forward GTK_SCROLL_STEP_FORWARD) + (page-backward GTK_SCROLL_PAGE_BACKWARD) + (page-forward GTK_SCROLL_PAGE_FORWARD)) + +(define-enum GtkTroughType + (none GTK_TROUGH_NONE) + (start GTK_TROUGH_START) + (end GTK_TROUGH_END)) + +(define-enum GtkPositionType + (left GTK_POS_LEFT) + (right GTK_POS_RIGHT) + (top GTK_POS_TOP) + (bottom GTK_POS_BOTTOM)) + +(define-enum GtkPreviewType + (color GTK_PREVIEW_COLOR) + (grayscale GTK_PREVIEW_GRAYSCALE)) + +(define-flags GtkWidgetFlags + (visible GTK_VISIBLE) + (mapped GTK_MAPPED) + (unmapped GTK_UNMAPPED) + (realized GTK_REALIZED) + (sensitive GTK_SENSITIVE) + (parent-sensitive GTK_PARENT_SENSITIVE) + (no-window GTK_NO_WINDOW) + (has-focus GTK_HAS_FOCUS) + (can-focus GTK_CAN_FOCUS) + (has-default GTK_HAS_DEFAULT) + (can-default GTK_CAN_DEFAULT) + (propagate-state GTK_PROPAGATE_STATE) + (anchored GTK_ANCHORED) + (basic GTK_BASIC) + (user-style GTK_USER_STYLE)) + +;;; Gdk enums + +(define-enum GdkWindowType + (root GDK_WINDOW_ROOT) + (toplevel GDK_WINDOW_TOPLEVEL) + (child GDK_WINDOW_CHILD) + (dialog GDK_WINDOW_DIALOG) + (temp GDK_WINDOW_TEMP) + (pixmap GDK_WINDOW_PIXMAP)) + +(define-enum GdkWindowClass + (input-output GDK_INPUT_OUTPUT) + (input-only GDK_INPUT_ONLY)) + +(define-enum GdkImageType + (normal GDK_IMAGE_NORMAL) + (shared GDK_IMAGE_SHARED) + (fastest GDK_IMAGE_FASTEST)) + +(define-enum GdkVisualType + (static-gray GDK_VISUAL_STATIC_GRAY) + (grayscale GDK_VISUAL_GRAYSCALE) + (static-color GDK_VISUAL_STATIC_COLOR) + (pseudo-color GDK_VISUAL_PSEUDO_COLOR) + (true-color GDK_VISUAL_TRUE_COLOR) + (direct-color GDK_VISUAL_DIRECT_COLOR)) + +(define-flags GdkWindowAttributesType + (title GDK_WA_TITLE) + (x GDK_WA_X) + (y GDK_WA_Y) + (cursor GDK_WA_CURSOR) + (colormap GDK_WA_COLORMAP) + (visual GDK_WA_VISUAL)) + +(define-flags GdkWindowHints + (pos GDK_HINT_POS) + (min-size GDK_HINT_MIN_SIZE) + (max-size GDK_HINT_MAX_SIZE)) + +(define-enum GdkFunction + (copy GDK_COPY) + (invert GDK_INVERT) + (xor GDK_XOR)) + +(define-enum GdkFill + (solid GDK_SOLID) + (tiled GDK_TILED) + (stippled GDK_STIPPLED) + (opaque-stippled GDK_OPAQUE_STIPPLED)) + +(define-enum GdkLineStyle + (solid GDK_LINE_SOLID) + (on-off-dash GDK_LINE_ON_OFF_DASH) + (double-dash GDK_LINE_DOUBLE_DASH)) + +(define-enum GdkCapStyle + (not-last GDK_CAP_NOT_LAST) + (butt GDK_CAP_BUTT) + (round GDK_CAP_ROUND) + (projecting GDK_CAP_PROJECTING)) + +(define-enum GdkJoinStyle + (miter GDK_JOIN_MITER) + (round GDK_JOIN_ROUND) + (bevel GDK_JOIN_BEVEL)) + +(define-enum GdkCursorType + (cursor GDK_LAST_CURSOR)) + +(define-enum GdkEventType + (nothing GDK_NOTHING) + (delete GDK_DELETE) + (destroy GDK_DESTROY) + (expose GDK_EXPOSE) + (motion-notify GDK_MOTION_NOTIFY) + (button-press GDK_BUTTON_PRESS) + (2button-press GDK_2BUTTON_PRESS) + (3button-press GDK_3BUTTON_PRESS) + (button-release GDK_BUTTON_RELEASE) + (key-press GDK_KEY_PRESS) + (key-release GDK_KEY_RELEASE) + (enter-notify GDK_ENTER_NOTIFY) + (leave-notify GDK_LEAVE_NOTIFY) + (focus-change GDK_FOCUS_CHANGE) + (configure GDK_CONFIGURE) + (map GDK_MAP) + (unmap GDK_UNMAP) + (property-notify GDK_PROPERTY_NOTIFY) + (selection-clear GDK_SELECTION_CLEAR) + (selection-request GDK_SELECTION_REQUEST) + (selection-notify GDK_SELECTION_NOTIFY) + (other-event GDK_OTHER_EVENT)) + +(define-flags GdkEventMask + (exposure-mask GDK_EXPOSURE_MASK) + (pointer-motion-mask GDK_POINTER_MOTION_MASK) + (pointer-motion-hint-mask GDK_POINTER_MOTION_HINT_MASK) + (button-motion-mask GDK_BUTTON_MOTION_MASK) + (button1-motion-mask GDK_BUTTON1_MOTION_MASK) + (button2-motion-mask GDK_BUTTON2_MOTION_MASK) + (button3-motion-mask GDK_BUTTON3_MOTION_MASK) + (button-press-mask GDK_BUTTON_PRESS_MASK) + (button-release-mask GDK_BUTTON_RELEASE_MASK) + (key-press-mask GDK_KEY_PRESS_MASK) + (key-release-mask GDK_KEY_RELEASE_MASK) + (enter-notify-mask GDK_ENTER_NOTIFY_MASK) + (leave-notify-mask GDK_LEAVE_NOTIFY_MASK) + (focus-change-mask GDK_FOCUS_CHANGE_MASK) + (structure-mask GDK_STRUCTURE_MASK) + (all-events-mask GDK_ALL_EVENTS_MASK)) + +(define-enum GdkNotifyType + (ancestor GDK_NOTIFY_ANCESTOR) + (virtual GDK_NOTIFY_VIRTUAL) + (inferior GDK_NOTIFY_INFERIOR) + (nonlinear GDK_NOTIFY_NONLINEAR) + (nonlinear-virtual GDK_NOTIFY_NONLINEAR_VIRTUAL) + (unknown GDK_NOTIFY_UNKNOWN)) + +(define-flags GdkModifierType + (shift-mask GDK_SHIFT_MASK) + (lock-mask GDK_LOCK_MASK) + (control-mask GDK_CONTROL_MASK) + (mod1-mask GDK_MOD1_MASK) + (mod2-mask GDK_MOD2_MASK) + (mod3-mask GDK_MOD3_MASK) + (mod4-mask GDK_MOD4_MASK) + (mod5-mask GDK_MOD5_MASK) + (button1-mask GDK_BUTTON1_MASK) + (button2-mask GDK_BUTTON2_MASK) + (button3-mask GDK_BUTTON3_MASK) + (button4-mask GDK_BUTTON4_MASK) + (button5-mask GDK_BUTTON5_MASK)) + +(define-enum GdkSubwindowMode + (clip-by-children GDK_CLIP_BY_CHILDREN) + (include-inferiors GDK_INCLUDE_INFERIORS)) + +(define-flags GdkInputCondition + (read GDK_INPUT_READ) + (write GDK_INPUT_WRITE) + (exception GDK_INPUT_EXCEPTION)) + +(define-enum GdkStatus + (ok GDK_OK) + (error GDK_ERROR) + (error-param GDK_ERROR_PARAM) + (error-file GDK_ERROR_FILE) + (error-mem GDK_ERROR_MEM)) + +(define-enum GdkByteOrder + (lsb-first GDK_LSB_FIRST) + (msb-first GDK_MSB_FIRST)) + +(define-flags GdkGCValuesMask + (foreground GDK_GC_FOREGROUND) + (background GDK_GC_BACKGROUND) + (font GDK_GC_FONT) + (function GDK_GC_FUNCTION) + (fill GDK_GC_FILL) + (tile GDK_GC_TILE) + (stipple GDK_GC_STIPPLE) + (clip-mask GDK_GC_CLIP_MASK) + (subwindow GDK_GC_SUBWINDOW) + (ts-x-origin GDK_GC_TS_X_ORIGIN) + (ts-y-origin GDK_GC_TS_Y_ORIGIN) + (clip-x-origin GDK_GC_CLIP_X_ORIGIN) + (clip-y-origin GDK_GC_CLIP_Y_ORIGIN) + (exposures GDK_GC_EXPOSURES) + (line-width GDK_GC_LINE_WIDTH) + (line-style GDK_GC_LINE_STYLE) + (cap-style GDK_GC_CAP_STYLE) + (join-style GDK_GC_JOIN_STYLE)) + +(define-enum GdkSelection + (primary GDK_SELECTION_PRIMARY) + (secondary GDK_SELECTION_SECONDARY)) + +(define-enum GdkPropertyState + (new-value GDK_PROPERTY_NEW_VALUE) + (delete GDK_PROPERTY_DELETE)) + +(define-enum GdkPropMode + (replace GDK_PROP_MODE_REPLACE) + (prepend GDK_PROP_MODE_PREPEND) + (append GDK_PROP_MODE_APPEND)) + +;;; Gtk boxed types + +(define-boxed GtkAcceleratorTable + gtk_accelerator_table_ref + gtk_accelerator_table_unref) + +(define-boxed GtkStyle + gtk_style_ref + gtk_style_unref) + +;;; Gdk boxed types + +;(define-boxed GdkPoint +; gdk_point_copy +; gdk_point_destroy) + +(define-boxed GdkColormap + gdk_colormap_ref + gdk_colormap_unref) + +(define-boxed GdkVisual + gdk_visual_ref + gdk_visual_unref) + +(define-boxed GdkFont + gdk_font_ref + gdk_font_free) + +(define-boxed GdkWindow + gdk_window_ref + gdk_window_unref) + +(define-boxed GdkEvent + gdk_event_copy + gdk_event_free) + +;;; Functions + +(define-func gtk_exit + none + (int code 0)) + +(define-func gtk_rc_parse + none + (string file)) + +(define-func g_mem_chunk_info + none) + +;; GtkObject + +(define-func gtk_object_destroy + none + (GtkObject object)) + +;; GtkWidget + +(define-object GtkWidget (GtkObject)) + +(define-func GTK_WIDGET_STATE + GtkStateType + (GtkWidget widget)) + +(define-func GTK_WIDGET_FLAGS + GtkWidgetFlags + (GtkWidget widget)) + +(define-func GTK_WIDGET_SET_FLAGS + none + (GtkWidget widget) + (GtkWidgetFlags flags)) + +(define-func GTK_WIDGET_UNSET_FLAGS + none + (GtkWidget widget) + (GtkWidgetFlags flags)) + +(define-func gtk_widget_destroy + none + (GtkWidget widget)) + +(define-func gtk_widget_unparent + none + (GtkWidget widget)) + +(define-func gtk_widget_show + none + (GtkWidget widget)) + +(define-func gtk_widget_hide + none + (GtkWidget widget)) + +(define-func gtk_widget_map + none + (GtkWidget widget)) + +(define-func gtk_widget_unmap + none + (GtkWidget widget)) + +(define-func gtk_widget_realize + none + (GtkWidget widget)) + +(define-func gtk_widget_unrealize + none + (GtkWidget widget)) + +;(define-func gtk_widget_install_accelerator +; none +; (GtkWidget widget) +; (GtkAcceleratorTable table) +; (string signal_name) +; (char key) +; (...)) + +(define-func gtk_widget_remove_accelerator + none + (GtkWidget widget) + (GtkAcceleratorTable table) + (string signal_name)) + +;(define-func gtk_widget_event +; bool +; (GtkWidget widget) +; (GdkEvent event)) + +(define-func gtk_widget_activate + none + (GtkWidget widget)) + +(define-func gtk_widget_reparent + none + (GtkWidget widget) + (GtkWidget new_parent)) + +(define-func gtk_widget_popup + none + (GtkWidget widget) + (int x) + (int y)) + +(define-func gtk_widget_basic + bool + (GtkWidget widget)) + +(define-func gtk_widget_grab_focus + none + (GtkWidget widget)) + +(define-func gtk_widget_grab_default + none + (GtkWidget widget)) + +(define-func gtk_widget_restore_state + none + (GtkWidget widget)) + +(define-func gtk_widget_set_name + none + (GtkWidget widget) + (string name)) + +(define-func gtk_widget_get_name + static_string + (GtkWidget widget)) + +(define-func gtk_widget_set_state + none + (GtkWidget widget) + (GtkStateType state)) + +(define-func gtk_widget_set_sensitive + none + (GtkWidget widget) + (bool sensitive)) + +(define-func gtk_widget_set_style + none + (GtkWidget widget) + (GtkStyle style)) + +(define-func gtk_widget_set_uposition + none + (GtkWidget widget) + (int x) + (int y)) + +(define-func gtk_widget_set_usize + none + (GtkWidget widget) + (int height) + (int width)) + +(define-func gtk_widget_set_events + none + (GtkWidget widget) + (GdkEventMask events)) + +(define-func gtk_widget_set_extension_events + none + (GtkWidget widget) + (GdkEventMask events)) + +(define-func gtk_widget_get_toplevel + GtkWidget + (GtkWidget widget)) + +;(define-func gtk_widget_get_ancestor +; GtkWidget +; (GtkWidget widget) +; (GtkType type)) + +(define-func gtk_widget_get_colormap + GdkColormap + (GtkWidget widget)) + +(define-func gtk_widget_get_visual + GdkVisual + (GtkWidget widget)) + +(define-func gtk_widget_get_style + GtkStyle + (GtkWidget widget)) + +(define-func gtk_widget_get_events + GdkEventMask + (GtkWidget widget)) + +(define-func gtk_widget_get_extension_events + GdkEventMask + (GtkWidget widget)) + +(define-func gtk_widget_push_colormap + none + (GdkColormap cmap)) + +(define-func gtk_widget_push_visual + none + (GdkVisual visual)) + +(define-func gtk_widget_push_style + none + (GtkStyle style)) + +(define-func gtk_widget_pop_colormap + none) + +(define-func gtk_widget_pop_visual + none) + +(define-func gtk_widget_pop_style + none) + +(define-func gtk_widget_set_default_colormap + none + (GdkColormap cmap)) + +(define-func gtk_widget_set_default_visual + none + (GdkVisual visual)) + +(define-func gtk_widget_set_default_style + none + (GtkStyle style)) + +(define-func gtk_widget_get_default_colormap + GdkColormap) + +(define-func gtk_widget_get_default_visual + GdkVisual) + +(define-func gtk_widget_get_default_style + GtkStyle) + +;;; Container + +(define-object GtkContainer (GtkWidget)) + +(define-func gtk_container_border_width + none + (GtkContainer container) + (int border_width)) + +(define-func gtk_container_add + none + (GtkContainer container) + (GtkWidget widget)) + +(define-func gtk_container_remove + none + (GtkContainer container) + (GtkWidget widget)) + +(define-func gtk_container_disable_resize + none + (GtkContainer container)) + +(define-func gtk_container_enable_resize + none + (GtkContainer container)) + +(define-func gtk_container_block_resize + none + (GtkContainer container)) + +(define-func gtk_container_unblock_resize + none + (GtkContainer container)) + +(define-func gtk_container_need_resize + bool + (GtkContainer container) + (GtkWidget widget)) + +(define-func gtk_container_check_resize + none + (GtkContainer container) + (GtkWidget widget)) + +(define-func gtk_container_focus + GtkDirectionType + (GtkContainer container) + (GtkDirectionType direction)) + +;;; Bin + +(define-object GtkBin (GtkContainer)) + +;;; Window + +(define-object GtkWindow (GtkBin)) + +(define-func gtk_window_new + GtkWidget + (GtkWindowType type)) + +(define-func gtk_window_set_title + none + (GtkWindow window) + (string title)) + +(define-func gtk_window_set_focus + none + (GtkWindow window) + (GtkWidget focus)) + +(define-func gtk_window_set_default + none + (GtkWindow window) + (GtkWidget default)) + +(define-func gtk_window_set_policy + none + (GtkWindow window) + (bool allow_shrink) + (bool allow_grow) + (bool auto_shrink)) + +(define-func gtk_window_add_accelerator_table + none + (GtkWindow window) + (GtkAcceleratorTable table)) + +(define-func gtk_window_remove_accelerator_table + none + (GtkWindow window) + (GtkAcceleratorTable table)) + +(define-func gtk_window_position + none + (GtkWindow window) + (GtkWindowPosition position)) + +;;; Box + +(define-object GtkBox (GtkContainer)) + +;;; Table + +(define-object GtkTable (GtkContainer)) + +;;; Button + +(define-object GtkButton (GtkContainer)) + +;;; ToggleButton + +(define-object GtkToggleButton (GtkButton)) + +;;; CheckButton + +(define-object GtkCheckButton (GtkToggleButton)) + +;;; RadioButton + +(define-object GtkRadioButton (GtkCheckButton)) + + +;; misc + + +(define-func gtk_button_new_with_label + GtkWidget + (string label)) + +(define-func gtk_vbox_new + GtkWidget + (bool homogenous) + (int spacing)) + +(define-func gtk_hbox_new + GtkWidget + (bool homogenous) + (int spacing)) + +(define-func gtk_hseparator_new + GtkWidget) + +(define-func gtk_box_pack_start + none + (GtkBox box) + (GtkWidget child) + (bool expand) + (bool fill) + (int padding)) + +(define-func gtk_table_new + GtkWidget + (int rows) + (int columns) + (bool homogenous)) + +(define-func gtk_table_attach + none + (GtkTable table) + (GtkWidget child) + (int left_attach) + (int right_attach) + (int top_attach) + (int bottom_attach) + (GtkAttachOptions xoptions) + (GtkAttachOptions yoptions) + (int xpadding) + (int ypadding)) + +(define-func gtk_table_attach_defaults + none + (GtkTable table) + (GtkWidget child) + (int left_attach) + (int right_attach) + (int top_attach) + (int bottom_attach)) + +(define-func gtk_table_set_row_spacing + none + (GtkTable table) + (int row) + (int spacing)) + +(define-func gtk_table_set_col_spacing + none + (GtkTable table) + (int col) + (int spacing)) + +(define-func gtk_table_set_row_spacings + none + (GtkTable table) + (int spacing)) + +(define-func gtk_table_set_col_spacings + none + (GtkTable table) + (int spacing)) + +(define-func gtk_toggle_button_new_with_label + GtkWidget + (string label)) + +(define-func gtk_check_button_new_with_label + GtkWidget + (string label)) + +(define-func gtk_radio_button_new_with_label_from_widget + GtkWidget + (GtkRadioButton group) + (string label)) + +(define-func gtk_label_new + GtkWidget + (string label)) + +(define-func gtk_frame_new + GtkWidget + (string label)) -- cgit v1.2.1