diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

android

Browse Source
This commit is contained in:
Vitor Santos Costa
2018-08-07 17:20:43 +01:00
parent f6596da27d
commit 05733938c1
6 changed files with 67 additions and 50 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
packages/myddas/sqlite3/sqlitest.yap
View File

@@ -13,12 +13,14 @@ main_ :-
fail.
main_ .
:- if yap_flag(android,true).
:- if( yap_flag(android,true) ).
init :-
db_open(sqlite3, '/data/user/0/pt.up.yap/files/chinook.db', _, _),
!,
writeln('chinook has landed').
init :-
catch(db_open(sqlite3,'chinook.db',_,_), _, fail),
!.
init :-
db_open(sqlite3, '/data/user/0/pt.up.yap.yapdroid/files/Yap/chinook.db', _, _),
% db_open(sqlite3, 'chinook.db', _, _),
writeln('chinook has landed').
:- else.
@@ -26,7 +28,7 @@ init :-
db_open(sqlite3, '/data/user/0/pt.up.yap.yapdroid/files/Yap/chinook.db', _, _),
% db_open(sqlite3, 'chinook.db', _, _),
writeln('chinook has landed').
:-endif
:-endif.
go :-
writeln(('db_import')),