Mercurial > hg > plml

changeset 28:fa51ed121a52

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
FIX: bug in call to current_engine/1
author samer
date Fri, 24 Feb 2012 18:38:45 +0000
parents 555b29024dab
children eefd012640e8
files prolog/plml.pl
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/prolog/plml.pl	Fri Feb 24 18:11:23 2012 +0000
+++ b/prolog/plml.pl	Fri Feb 24 18:38:45 2012 +0000
@@ -637,10 +637,10 @@
 convert_mx(loc,    X, mat(Y,W)) :- !, mlMX2ATOM(X,Z), term_to_atom(Y|W,Z).
 
 convert_mx(mat,    X, Y) :- !, % !!! use first engine to save to its matbase
-	current_engine(I,open),  
+	current_engine(I),  
 	bt_call( db_save(I,mx(X),Y), db_drop(I,Y)).
 convert_mx(tmp,    X, Y) :- !, % !!! use first engine to save to its matbase
-	current_engine(I,open),  
+	current_engine(I),  
 	bt_call( db_tmp(I,mx(X),Y), db_drop(I,Y)).
 
 convert_mx(list(float), X, Y) :- !, mlGETREALS(X,Y).