mirror of https://github.com/Gnucash/gnucash
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
58 lines
1.2 KiB
58 lines
1.2 KiB
/*********************************************************************
|
|
* gnc-mod-engine.c
|
|
* module definition/initialization for the Engine module
|
|
*
|
|
* Copyright (c) 2001 Linux Developers Group, Inc.
|
|
*********************************************************************/
|
|
|
|
#include "config.h"
|
|
#include <gmodule.h>
|
|
#include <libguile.h>
|
|
|
|
#include "gnc-engine.h"
|
|
#include "gnc-module-api.h"
|
|
|
|
/* version of the gnc module system interface we require */
|
|
int gnc_module_system_interface = 0;
|
|
|
|
/* module versioning uses libtool semantics. */
|
|
int gnc_module_current = 0;
|
|
int gnc_module_revision = 0;
|
|
int gnc_module_age = 0;
|
|
|
|
|
|
char *
|
|
gnc_module_path(void)
|
|
{
|
|
return g_strdup("gnucash/engine");
|
|
}
|
|
|
|
char *
|
|
gnc_module_description(void)
|
|
{
|
|
return g_strdup("The GnuCash accounting engine");
|
|
}
|
|
|
|
extern SCM scm_init_sw_engine_module(void);
|
|
|
|
int
|
|
gnc_module_init(int refcount)
|
|
{
|
|
if(refcount == 0)
|
|
{
|
|
/* initialize the engine on the first load */
|
|
gnc_engine_init(0, NULL);
|
|
}
|
|
|
|
scm_init_sw_engine_module();
|
|
scm_c_eval_string("(use-modules (sw_engine))");
|
|
scm_c_eval_string("(use-modules (gnucash engine))");
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
int
|
|
gnc_module_end(int refcount) {
|
|
return TRUE;
|
|
}
|