411 lines
7.9 KiB
Scheme
411 lines
7.9 KiB
Scheme
;; -*- scheme -*-
|
|
; object definitions ...
|
|
(define-object Term
|
|
(in-module "Moo")
|
|
(parent "GtkWidget")
|
|
(c-name "MooTerm")
|
|
(gtype-id "MOO_TYPE_TERM")
|
|
)
|
|
|
|
(define-object TermWindow
|
|
(in-module "Moo")
|
|
(parent "MooWindow")
|
|
(c-name "MooTermWindow")
|
|
(gtype-id "MOO_TYPE_TERM_WINDOW")
|
|
)
|
|
|
|
;; Enumerations and flags ...
|
|
|
|
;; From ../mooterm/mooterm.h
|
|
|
|
(define-function moo_term_error_quark
|
|
(c-name "moo_term_error_quark")
|
|
(return-type "GQuark")
|
|
)
|
|
|
|
(define-function moo_term_get_type
|
|
(c-name "moo_term_get_type")
|
|
(return-type "GType")
|
|
)
|
|
|
|
(define-function moo_term_command_get_type
|
|
(c-name "moo_term_command_get_type")
|
|
(return-type "GType")
|
|
)
|
|
|
|
(define-function moo_term_profile_get_type
|
|
(c-name "moo_term_profile_get_type")
|
|
(return-type "GType")
|
|
)
|
|
|
|
(define-function moo_term_profile_array_get_type
|
|
(c-name "moo_term_profile_array_get_type")
|
|
(return-type "GType")
|
|
)
|
|
|
|
(define-function moo_term_erase_binding_get_type
|
|
(c-name "moo_term_erase_binding_get_type")
|
|
(return-type "GType")
|
|
)
|
|
|
|
(define-method set_adjustment
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_set_adjustment")
|
|
(return-type "none")
|
|
(parameters
|
|
'("GtkAdjustment*" "vadj")
|
|
)
|
|
)
|
|
|
|
(define-method fork_command
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_fork_command")
|
|
(return-type "gboolean")
|
|
(parameters
|
|
'("const-MooTermCommand*" "cmd")
|
|
'("const-char*" "working_dir")
|
|
'("char**" "envp")
|
|
'("GError**" "error")
|
|
)
|
|
)
|
|
|
|
(define-method fork_command_line
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_fork_command_line")
|
|
(return-type "gboolean")
|
|
(parameters
|
|
'("const-char*" "cmd_line")
|
|
'("const-char*" "working_dir")
|
|
'("char**" "envp")
|
|
'("GError**" "error")
|
|
)
|
|
)
|
|
|
|
(define-method fork_argv
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_fork_argv")
|
|
(return-type "gboolean")
|
|
(parameters
|
|
'("char**" "argv")
|
|
'("const-char*" "working_dir")
|
|
'("char**" "envp")
|
|
'("GError**" "error")
|
|
)
|
|
)
|
|
|
|
(define-method child_alive
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_child_alive")
|
|
(return-type "gboolean")
|
|
)
|
|
|
|
(define-method kill_child
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_kill_child")
|
|
(return-type "none")
|
|
)
|
|
|
|
(define-function moo_term_set_helper_directory
|
|
(c-name "moo_term_set_helper_directory")
|
|
(return-type "none")
|
|
(parameters
|
|
'("const-char*" "dir")
|
|
)
|
|
)
|
|
|
|
(define-method feed
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_feed")
|
|
(return-type "none")
|
|
(parameters
|
|
'("const-char*" "data")
|
|
'("int" "len")
|
|
)
|
|
)
|
|
|
|
(define-method feed_child
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_feed_child")
|
|
(return-type "none")
|
|
(parameters
|
|
'("const-char*" "string")
|
|
'("int" "len")
|
|
)
|
|
)
|
|
|
|
(define-method scroll_to_top
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_scroll_to_top")
|
|
(return-type "none")
|
|
)
|
|
|
|
(define-method scroll_to_bottom
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_scroll_to_bottom")
|
|
(return-type "none")
|
|
)
|
|
|
|
(define-method scroll_lines
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_scroll_lines")
|
|
(return-type "none")
|
|
(parameters
|
|
'("int" "lines")
|
|
)
|
|
)
|
|
|
|
(define-method scroll_pages
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_scroll_pages")
|
|
(return-type "none")
|
|
(parameters
|
|
'("int" "pages")
|
|
)
|
|
)
|
|
|
|
(define-method copy_clipboard
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_copy_clipboard")
|
|
(return-type "none")
|
|
(parameters
|
|
'("GdkAtom" "selection")
|
|
)
|
|
)
|
|
|
|
(define-method paste_clipboard
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_paste_clipboard")
|
|
(return-type "none")
|
|
(parameters
|
|
'("GdkAtom" "selection")
|
|
)
|
|
)
|
|
|
|
(define-method select_all
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_select_all")
|
|
(return-type "none")
|
|
)
|
|
|
|
(define-method get_selection
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_get_selection")
|
|
(return-type "char*")
|
|
)
|
|
|
|
(define-method get_content
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_get_content")
|
|
(return-type "char*")
|
|
)
|
|
|
|
(define-method ctrl_c
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_ctrl_c")
|
|
(return-type "none")
|
|
)
|
|
|
|
(define-method set_pointer_visible
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_set_pointer_visible")
|
|
(return-type "none")
|
|
(parameters
|
|
'("gboolean" "visible")
|
|
)
|
|
)
|
|
|
|
(define-method set_font_from_string
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_set_font_from_string")
|
|
(return-type "none")
|
|
(parameters
|
|
'("const-char*" "font")
|
|
)
|
|
)
|
|
|
|
(define-method set_cursor_blink_time
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_set_cursor_blink_time")
|
|
(return-type "none")
|
|
(parameters
|
|
'("guint" "ms")
|
|
)
|
|
)
|
|
|
|
(define-function moo_term_profile_new
|
|
(c-name "moo_term_profile_new")
|
|
(is-constructor-of "MooTermProfile")
|
|
(return-type "MooTermProfile*")
|
|
(parameters
|
|
'("const-char*" "name")
|
|
'("const-MooTermCommand*" "cmd")
|
|
'("char**" "envp")
|
|
'("const-char*" "working_dir")
|
|
)
|
|
)
|
|
|
|
(define-method copy
|
|
(of-object "MooTermProfile")
|
|
(c-name "moo_term_profile_copy")
|
|
(return-type "MooTermProfile*")
|
|
)
|
|
|
|
(define-method free
|
|
(of-object "MooTermProfile")
|
|
(c-name "moo_term_profile_free")
|
|
(return-type "none")
|
|
)
|
|
|
|
(define-function moo_term_profile_array_new
|
|
(c-name "moo_term_profile_array_new")
|
|
(is-constructor-of "MooTermProfileArray")
|
|
(return-type "MooTermProfileArray*")
|
|
)
|
|
|
|
(define-method add
|
|
(of-object "MooTermProfileArray")
|
|
(c-name "moo_term_profile_array_add")
|
|
(return-type "none")
|
|
(parameters
|
|
'("const-MooTermProfile*" "profile")
|
|
)
|
|
)
|
|
|
|
(define-method copy
|
|
(of-object "MooTermProfileArray")
|
|
(c-name "moo_term_profile_array_copy")
|
|
(return-type "MooTermProfileArray*")
|
|
)
|
|
|
|
(define-method free
|
|
(of-object "MooTermProfileArray")
|
|
(c-name "moo_term_profile_array_free")
|
|
(return-type "none")
|
|
)
|
|
|
|
(define-method get_profiles
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_get_profiles")
|
|
(return-type "MooTermProfileArray*")
|
|
)
|
|
|
|
(define-method get_profile
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_get_profile")
|
|
(return-type "MooTermProfile*")
|
|
(parameters
|
|
'("guint" "index")
|
|
)
|
|
)
|
|
|
|
(define-method set_profile
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_set_profile")
|
|
(return-type "none")
|
|
(parameters
|
|
'("guint" "index")
|
|
'("const-MooTermProfile*" "profile")
|
|
)
|
|
)
|
|
|
|
(define-method add_profile
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_add_profile")
|
|
(return-type "none")
|
|
(parameters
|
|
'("const-MooTermProfile*" "profile")
|
|
)
|
|
)
|
|
|
|
(define-method remove_profile
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_remove_profile")
|
|
(return-type "none")
|
|
(parameters
|
|
'("guint" "index")
|
|
)
|
|
)
|
|
|
|
(define-method set_default_profile
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_set_default_profile")
|
|
(return-type "none")
|
|
(parameters
|
|
'("int" "profile")
|
|
)
|
|
)
|
|
|
|
(define-method get_default_profile
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_get_default_profile")
|
|
(return-type "int")
|
|
)
|
|
|
|
(define-method start_default_profile
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_start_default_profile")
|
|
(return-type "none")
|
|
(parameters
|
|
'("GError**" "error")
|
|
)
|
|
)
|
|
|
|
(define-method start_profile
|
|
(of-object "MooTerm")
|
|
(c-name "moo_term_start_profile")
|
|
(return-type "none")
|
|
(parameters
|
|
'("int" "profile")
|
|
'("GError**" "error")
|
|
)
|
|
)
|
|
|
|
(define-function moo_term_command_new
|
|
(c-name "moo_term_command_new")
|
|
(is-constructor-of "MooTermCommand")
|
|
(return-type "MooTermCommand*")
|
|
(parameters
|
|
'("const-char*" "cmd_line")
|
|
'("char**" "argv")
|
|
)
|
|
)
|
|
|
|
(define-method copy
|
|
(of-object "MooTermCommand")
|
|
(c-name "moo_term_command_copy")
|
|
(return-type "MooTermCommand*")
|
|
)
|
|
|
|
(define-method free
|
|
(of-object "MooTermCommand")
|
|
(c-name "moo_term_command_free")
|
|
(return-type "none")
|
|
)
|
|
|
|
|
|
|
|
;; From ../mooterm/mootermwindow.h
|
|
|
|
(define-function moo_term_window_get_type
|
|
(c-name "moo_term_window_get_type")
|
|
(return-type "GType")
|
|
)
|
|
|
|
(define-function moo_term_window_new
|
|
(c-name "moo_term_window_new")
|
|
(is-constructor-of "MooTermWindow")
|
|
(return-type "GtkWidget*")
|
|
)
|
|
|
|
(define-method apply_settings
|
|
(of-object "MooTermWindow")
|
|
(c-name "moo_term_window_apply_settings")
|
|
(return-type "none")
|
|
)
|
|
|
|
(define-method get_term
|
|
(of-object "MooTermWindow")
|
|
(c-name "moo_term_window_get_term")
|
|
(return-type "MooTerm*")
|
|
)
|