From 9dc86c735b57d57b1285868802370d1292b67426 Mon Sep 17 00:00:00 2001 From: Vitor Santos Costa Date: Mon, 26 Nov 2018 09:16:52 +0000 Subject: [PATCH] myddas --- packages/myddas/pl/myddas.ypp | 7 +++++-- packages/myddas/pl/myddas_driver.ypp | 4 +--- 2 files changed, 6 insertions(+), 5 deletions(-) diff --git a/packages/myddas/pl/myddas.ypp b/packages/myddas/pl/myddas.ypp index b909f9a9a..21bcabeb6 100644 --- a/packages/myddas/pl/myddas.ypp +++ b/packages/myddas/pl/myddas.ypp @@ -132,7 +132,10 @@ db_abolish/2, db_listing/0, db_listing/1 - ]). + ]). + +:- meta_predicate db_import(+,+,:), db_import(+,:). + :- use_module(myddas_sqlite3,[ % myddas_mysql.ypp @@ -351,7 +354,7 @@ db_stats(Protocol,List):- #ifdef DEBUG %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % db_stats_time(+,-) -% Reference is C puuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuu;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;uuuuu;ointer (memory reference) +% Reference is C pointer (memory reference) % db_stats_time(Reference,Time):- '$error_checks'(db_stats_time(Reference,Time)), diff --git a/packages/myddas/pl/myddas_driver.ypp b/packages/myddas/pl/myddas_driver.ypp index a1f70337d..4e94b3327 100644 --- a/packages/myddas/pl/myddas_driver.ypp +++ b/packages/myddas/pl/myddas_driver.ypp @@ -156,7 +156,6 @@ DBMS(datalog_show_tables)(Connection) :- % DBMS(show_tables)/2 % gives the results of the SHOW TABLES statement % by backtracking -#if sqlite3 DBMS(show_tables)(Connection,table(Table)) :- '$get_value'(Connection,Conn), SQL = 'SELECT name FROM sqlite_master WHERE type=\'table\' ORDER BY name', @@ -165,8 +164,7 @@ DBMS(show_tables)(Connection,table(Table)) :- c_DBMS(query)(SQL,ResultSet,Conn,Mode,_), !, DBMS(row)(ResultSet,1,[Table]). -#endif - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%