diff --git a/src/app-utils/app-utils.i b/src/app-utils/app-utils.i index eb443a349f..72783a3124 100644 --- a/src/app-utils/app-utils.i +++ b/src/app-utils/app-utils.i @@ -15,7 +15,7 @@ #include #include -#include "engine-helpers.h" +#include "engine-helpers-guile.h" %} #if defined(SWIGGUILE) diff --git a/src/app-utils/gnc-helpers.c b/src/app-utils/gnc-helpers.c index 97754931e8..118e40b94b 100644 --- a/src/app-utils/gnc-helpers.c +++ b/src/app-utils/gnc-helpers.c @@ -29,7 +29,7 @@ #include "swig-runtime.h" #include "gnc-engine.h" -#include "engine-helpers.h" +#include "engine-helpers-guile.h" #include "gnc-helpers.h" #include "gnc-ui-util.h" diff --git a/src/app-utils/guile-util.c b/src/app-utils/guile-util.c index d7652e311f..ec2cf3c564 100644 --- a/src/app-utils/guile-util.c +++ b/src/app-utils/guile-util.c @@ -37,7 +37,7 @@ #endif #include "qof.h" -#include "engine-helpers.h" +#include "engine-helpers-guile.h" #include "glib-helpers.h" #include "gnc-gconf-utils.h" #include "gnc-glib-utils.h" diff --git a/src/app-utils/option-util.c b/src/app-utils/option-util.c index 50c3860045..5e99e09fe0 100644 --- a/src/app-utils/option-util.c +++ b/src/app-utils/option-util.c @@ -29,8 +29,9 @@ #include #include +#include "Account.h" #include "option-util.h" -#include "engine-helpers.h" +#include "engine-helpers-guile.h" #include "glib-helpers.h" #include "gnc-guile-utils.h" #include "qof.h" diff --git a/src/bin/gnucash-bin.c b/src/bin/gnucash-bin.c index ea95e01de3..2cc967dfda 100644 --- a/src/bin/gnucash-bin.c +++ b/src/bin/gnucash-bin.c @@ -50,7 +50,7 @@ #include "gnc-gconf-utils.h" #include "dialog-new-user.h" #include "gnc-session.h" -#include "engine-helpers.h" +#include "engine-helpers-guile.h" #include "swig-runtime.h" /* This static indicates the debugging module that this .o belongs to. */ diff --git a/src/engine/Makefile.am b/src/engine/Makefile.am index dc58731abe..46724eeb0f 100644 --- a/src/engine/Makefile.am +++ b/src/engine/Makefile.am @@ -77,6 +77,7 @@ gncinclude_HEADERS = \ cap-gains.h \ cashobjects.h \ engine-helpers.h \ + engine-helpers-guile.h \ glib-helpers.h \ gnc-budget.h \ gnc-commodity.h \ diff --git a/src/engine/engine-helpers.c b/src/engine/engine-helpers.c index f766ec360a..01fe515e37 100644 --- a/src/engine/engine-helpers.c +++ b/src/engine/engine-helpers.c @@ -30,6 +30,7 @@ #include "Account.h" #include "engine-helpers.h" +#include "engine-helpers-guile.h" #include "glib-helpers.h" #include "gnc-date.h" #include "gnc-engine.h" diff --git a/src/engine/engine-helpers.h b/src/engine/engine-helpers.h index 800cc67413..564cbfe283 100644 --- a/src/engine/engine-helpers.h +++ b/src/engine/engine-helpers.h @@ -26,7 +26,6 @@ #define ENGINE_HELPERS_H #include -#include #include "gnc-engine.h" #include "Account.h" @@ -87,33 +86,4 @@ gnc_book_option_register_cb (gchar *key, GncBOCb func, gpointer user_data); void gnc_book_option_remove_cb (gchar *key, GncBOCb func, gpointer user_data); -/* Helpers for various types */ - -SCM gnc_timespec2timepair(Timespec t); -Timespec gnc_timepair2timespec(SCM x); -GDate gnc_timepair_to_GDate(SCM x); -int gnc_timepair_p(SCM x); - -SCM gnc_guid2scm(GncGUID guid); -GncGUID gnc_scm2guid(SCM guid_scm); -int gnc_guid_p(SCM guid_scm); - -/* for a list of strings */ -GSList * gnc_query_scm2path (SCM path_scm); - -/* These two functions convert a query object into a scheme - * representation of the query and vice-versa. They do not - * simply convert a query pointer to a guile query pointer! */ -SCM gnc_query2scm (QofQuery * q); -QofQuery * gnc_scm2query (SCM query_scm); - -int gnc_gh_gint64_p(SCM num); - -SCM gnc_numeric_to_scm(gnc_numeric arg); -gnc_numeric gnc_scm_to_numeric(SCM arg); -int gnc_numeric_p(SCM arg); -gnc_commodity * gnc_scm_to_commodity(SCM scm); -SCM gnc_commodity_to_scm (const gnc_commodity *commodity); -SCM gnc_book_to_scm (const QofBook *book); - #endif diff --git a/src/engine/engine.i b/src/engine/engine.i index 6ec3e0137e..b255c3efdf 100644 --- a/src/engine/engine.i +++ b/src/engine/engine.i @@ -14,6 +14,7 @@ #include "gnc-lot.h" #include "gnc-hooks-scm.h" #include "engine-helpers.h" +#include "engine-helpers-guile.h" #include "SX-book.h" #include "kvp-scm.h" #include "glib-helpers.h" @@ -126,6 +127,7 @@ functions. */ } %include +%include %typemap(in) Transaction *trans; %typemap(in) Split *split; %typemap(in) char * num; diff --git a/src/engine/gncBusGuile.c b/src/engine/gncBusGuile.c index f9504b32fa..729e05a173 100644 --- a/src/engine/gncBusGuile.c +++ b/src/engine/gncBusGuile.c @@ -25,6 +25,7 @@ #include "gncBusGuile.h" #include "engine-helpers.h" +#include "engine-helpers-guile.h" #include "swig-runtime.h" #include "guile-mappings.h" #define FUNC_NAME G_STRFUNC diff --git a/src/engine/kvp-scm.c b/src/engine/kvp-scm.c index c5f74772ff..0b4e1187b0 100644 --- a/src/engine/kvp-scm.c +++ b/src/engine/kvp-scm.c @@ -2,7 +2,7 @@ #include "qof.h" #include -#include "engine-helpers.h" +#include "engine-helpers-guile.h" #include "kvp-scm.h" #include "guile-mappings.h" diff --git a/src/gnome-utils/dialog-options.c b/src/gnome-utils/dialog-options.c index af1f69908f..f3f6c1befc 100644 --- a/src/gnome-utils/dialog-options.c +++ b/src/gnome-utils/dialog-options.c @@ -34,7 +34,7 @@ #include "dialog-options.h" #include "dialog-utils.h" -#include "engine-helpers.h" +#include "engine-helpers-guile.h" #include "glib-helpers.h" #include "gnc-account-sel.h" #include "gnc-tree-view-account.h" diff --git a/src/gnome-utils/dialog-transfer.c b/src/gnome-utils/dialog-transfer.c index 6aa0f7230b..d3cb5b173b 100644 --- a/src/gnome-utils/dialog-transfer.c +++ b/src/gnome-utils/dialog-transfer.c @@ -47,6 +47,7 @@ #include "swig-runtime.h" #include "guile-mappings.h" #include "engine-helpers.h" +#include "engine-helpers-guile.h" #include "app-utils/QuickFill.h" diff --git a/src/gnome-utils/gnc-tree-control-split-reg.c b/src/gnome-utils/gnc-tree-control-split-reg.c index fa1677e54c..badb576833 100644 --- a/src/gnome-utils/gnc-tree-control-split-reg.c +++ b/src/gnome-utils/gnc-tree-control-split-reg.c @@ -28,6 +28,7 @@ #include #include +#include #include #include "gnc-tree-control-split-reg.h" diff --git a/src/gnome-utils/gnc-tree-view-split-reg.c b/src/gnome-utils/gnc-tree-view-split-reg.c index c163d8c053..7fe9370554 100644 --- a/src/gnome-utils/gnc-tree-view-split-reg.c +++ b/src/gnome-utils/gnc-tree-view-split-reg.c @@ -28,6 +28,7 @@ #include #include +#include #include #include diff --git a/src/gnome/dialog-price-edit-db.c b/src/gnome/dialog-price-edit-db.c index 27c3f74e5d..8ad4621160 100644 --- a/src/gnome/dialog-price-edit-db.c +++ b/src/gnome/dialog-price-edit-db.c @@ -46,7 +46,7 @@ #include "gnc-ui.h" #include "gnc-ui-util.h" #include "guile-util.h" -#include "engine-helpers.h" +#include "engine-helpers-guile.h" #include "swig-runtime.h"