The patch to fix the error while compiling the corba module.
>From 4de97260fcf465b2e1d3a6c7c89845de5bd1697d Mon Sep 17 00:00:00 2001
From: Nala Ginrut <[email protected]>
Date: Thu, 13 Sep 2012 14:46:16 +0800
Subject: [PATCH] change scm_vtable_index_printer to
scm_vtable_index_instance_printer modified:
corba/gnome/corba/guile-gnome-corba-types.c
---
corba/gnome/corba/guile-gnome-corba-types.c | 8 ++++----
1 files changed, 4 insertions(+), 4 deletions(-)
diff --git a/corba/gnome/corba/guile-gnome-corba-types.c b/corba/gnome/corba/guile-gnome-corba-types.c
index e5ad9f8..546339d 100644
--- a/corba/gnome/corba/guile-gnome-corba-types.c
+++ b/corba/gnome/corba/guile-gnome-corba-types.c
@@ -60,7 +60,7 @@ print_corba_struct (SCM corba_struct, SCM port)
CORBA_TypeCode tc;
gchar *message;
- printer = SCM_PACK (SCM_STRUCT_DATA (corba_struct) [scm_vtable_index_printer]);
+ printer = SCM_PACK (SCM_STRUCT_DATA (corba_struct) [scm_vtable_index_instance_printer]);
if (SCM_NIMP (printer) && scm_procedure_p (printer))
return scm_call_2 (printer, corba_struct, port);
@@ -80,7 +80,7 @@ print_corba_sequence (SCM corba_sequence, SCM port)
CORBA_TypeCode tc;
gchar *message;
- printer = SCM_PACK (SCM_STRUCT_DATA (corba_sequence) [scm_vtable_index_printer]);
+ printer = SCM_PACK (SCM_STRUCT_DATA (corba_sequence) [scm_vtable_index_instance_printer]);
if (SCM_NIMP (printer) && scm_procedure_p (printer))
return scm_call_2 (printer, corba_sequence, port);
@@ -822,7 +822,7 @@ scm_init_gnome_corba_types (void)
SCM_SET_CORBA_STRUCT_TYPECODE (scm_corba_struct_vtable, TC_CORBA_TypeCode);
scm_c_define ("%corba-struct-vtable", scm_corba_struct_vtable);
scm_c_define ("%corba-struct-vtable-offset-user", scm_from_int (scm_corba_struct_vtable_offset_user));
- scm_c_define ("%corba-struct-vtable-offset-printer", scm_from_int (scm_vtable_index_printer));
+ scm_c_define ("%corba-struct-vtable-offset-printer", scm_from_int (scm_vtable_index_instance_printer));
gsubr = scm_c_make_gsubr ("%print-corba-sequence", 2, 0, 0, print_corba_sequence);
scm_corba_sequence_vtable = scm_permanent_object
@@ -831,7 +831,7 @@ scm_init_gnome_corba_types (void)
SCM_SET_CORBA_SEQUENCE_TYPECODE (scm_corba_sequence_vtable, TC_CORBA_TypeCode);
scm_c_define ("%corba-sequence-vtable", scm_corba_sequence_vtable);
scm_c_define ("%corba-sequence-vtable-offset-user", scm_from_int (scm_corba_sequence_vtable_offset_user));
- scm_c_define ("%corba-sequence-vtable-offset-printer", scm_from_int (scm_vtable_index_printer));
+ scm_c_define ("%corba-sequence-vtable-offset-printer", scm_from_int (scm_vtable_index_instance_printer));
scm_c_export ("%corba-struct-vtable",
"%corba-struct-vtable-offset-user",
--
1.7.7
