This commit is contained in:
Vitor Santos Costa
2018-07-02 16:48:00 +01:00
parent 71aed8b870
commit fd492b5b16
8 changed files with 37 additions and 32 deletions

View File

@@ -2,7 +2,7 @@
:- use_module(library(lists)).
:- use_module(library(maplist)).
:- use_module(library(maplist)).
:- use_module(library(myddas)).
main :-
@@ -10,7 +10,7 @@ main :-
main_,
close.
main_ :-
go,
catch(go,E,writeln(E)),
fail.
main_ .
@@ -28,6 +28,11 @@ go :-
db_import('tracks', tracks),
writeln(('tracks -> tracks')).
go :-
% X=1,
artists(X,Y),
writeln(X:Y).
go :-
writeln(db_get_attributes_types),
db_get_attributes_types(albums,Als),
@@ -57,6 +62,7 @@ go :-
db_describe(T,tableinfo(FieldID,Type,Null,Primary,Default,'')),
writeln(T:tableinfo(FieldID,Type,Null,Primary,Default,'')).
go :-
writeln(access),
go_cut0.
@@ -73,11 +79,6 @@ go :-
go :-
go_cut1.
go :-
% X=1,
artists(X,Y),
writeln(X:Y).
go_cut0 :-
artists(X,Y),
writeln(X:Y),