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

remove dead code

Browse Source 
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@8862 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Linas Vepstas 2003-07-13 04:15:45 +00:00
parent d3a52af048
commit 3c92f24d57
3 changed files with 4 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
src/engine/Query.c
View File

@ -585,30 +585,4 @@ xaccQueryGetLatestDateFound(Query * q)
return latest; return latest;
} }
void
xaccQuerySetSortOrder(Query *q, GList *p1, GList *p2, GList *p3)
{
GSList *l1 = NULL, *l2 = NULL, *l3 = NULL;
GList *node;
for (node = p1; node; node = node->next)
l1 = g_slist_prepend (l1, node->data);
for (node = p2; node; node = node->next)
l2 = g_slist_prepend (l2, node->data);
for (node = p3; node; node = node->next)
l3 = g_slist_prepend (l3, node->data);
if (l1) l1 = g_slist_reverse (l1);
if (l2) l2 = g_slist_reverse (l2);
if (l3) l3 = g_slist_reverse (l3);
if (p1) g_list_free (p1);
if (p2) g_list_free (p2);
if (p3) g_list_free (p3);
qof_query_set_sort_order (q, l1, l2, l3);
}
/* ======================== END OF FILE ======================= */ /* ======================== END OF FILE ======================= */

2
src/engine/Query.h
View File

@ -210,8 +210,6 @@ void xaccQueryAddKVPMatch(Query *q, GSList *path, const KvpValue *value,
QofQueryCompare how, QofIdType id_type, QofQueryCompare how, QofIdType id_type,
QofQueryOp op); QofQueryOp op);
void xaccQuerySetSortOrder(Query *q, GList *p1, GList *p2, GList *p3);
/******************************************************************* /*******************************************************************
* compatibility interface with old Query API * compatibility interface with old Query API
*******************************************************************/ *******************************************************************/

8
src/engine/gw-engine-spec.scm
View File

@ -1974,11 +1974,11 @@ of having a parent transaction with which one is working...")
ws ws
'gnc:query-set-sort-order 'gnc:query-set-sort-order
'<gw:void> '<gw:void>
"xaccQuerySetSortOrder" "qof_query_set_sort_order"
'((<gnc:Query*> q) '((<gnc:Query*> q)
((gw:glist-of <gnc:id-type> callee-owned) primary) ((gw:gslist-of <gnc:id-type> callee-owned) primary)
((gw:glist-of <gnc:id-type> callee-owned) secondary) ((gw:gslist-of <gnc:id-type> callee-owned) secondary)
((gw:glist-of <gnc:id-type> callee-owned) tertiary)) ((gw:gslist-of <gnc:id-type> callee-owned) tertiary))
"set sort order.") "set sort order.")
(gw:wrap-function (gw:wrap-function