IntenseFinance/gnucash
3
0
Fork 0
mirror of https://github.com/Gnucash/gnucash.git synced 2025-02-25 18:55:30 -06:00
Code Issues Packages Projects Releases Wiki Activity

Add scheme/swig typemap for GDate.

Browse Source 
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@19530 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Christian Stimming 2010-09-01 16:23:21 +00:00
parent ae0ff4cabe
commit 4b3ef0786d
3 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/base-typemaps.i
View File

@ -26,6 +26,8 @@ typedef char gchar;
%typemap(in) Timespec "$1 = gnc_timepair2timespec($input);"
%typemap(out) Timespec "$result = gnc_timespec2timepair($1);"
%typemap(in) GDate "$1 = gnc_timepair_to_GDate($input);"
%typemap(in) GncGUID "$1 = gnc_scm2guid($input);"
%typemap(out) GncGUID "$result = gnc_guid2scm($1);"
%typemap(in) GncGUID * (GncGUID g) " g = gnc_scm2guid($input); $1 = &g; "

6
src/engine/engine-helpers.c
View File

@ -111,6 +111,12 @@ gnc_timepair2timespec(SCM x)
return(result);
}
GDate gnc_timepair_to_GDate(SCM x)
{
Timespec tspec = gnc_timepair2timespec(x);
return timespec_to_gdate(tspec);
}
int
gnc_timepair_p(SCM x)
{

1
src/engine/engine-helpers.h
View File

@ -47,6 +47,7 @@ void gnc_transaction_set_date(Transaction *t, Timespec ts);
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);