1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
|
;; -*- scheme -*-
;; gsf-input-bonobo.[ch]
(define-object InputBonobo
(in-module "Gsf")
(parent "GsfInput")
(c-name "GsfInputBonobo")
(gtype-id "GSF_TYPE_INPUT_BONOBO")
)
(define-function gsf_input_bonobo_new
(c-name "gsf_input_bonobo_new")
(is-constructor-of "GsfInputBonobo")
(return-type "GsfInput*")
(parameters
'("Bonobo_Stream-const" "stream")
'("GError**" "err")
)
)
;; gsf-input-gnomevfs.[ch]
(define-object InputVFS
(in-module "Gsf")
(parent "GsfInput")
(c-name "GsfInputGnomeVFS")
(gtype-id "GSF_TYPE_INPUT_GNOME_VFS")
)
(define-function gsf_input_gnomevfs_new
(c-name "gsf_input_gnomevfs_new")
(is-constructor-of "GsfInputGnomeVFS")
(return-type "GsfInput*")
(parameters
'("char-const*" "uri")
'("GError**" "error")
)
)
;; From /home/jk/gnome2/libgsf/gsf/gsf-output-gnomevfs.[ch]
(define-object OutputVFS
(in-module "Gsf")
(parent "GsfOutput")
(c-name "GsfOutputGnomeVFS")
(gtype-id "GSF_TYPE_OUTPUT_GNOME_VFS")
)
(define-function gsf_output_gnomevfs_new
(c-name "gsf_output_gnomevfs_new")
(is-constructor-of "GsfOutputGnomeVFS")
(return-type "GsfOutput*")
(parameters
'("char-const*" "filename")
'("GError**" "err")
)
)
|
