[Jason-developers] SF.net SVN: jason:[1770] trunk

[<jom...@us...>]

Revision: 1770
          http://sourceforge.net/p/jason/svn/1770
Author:   jomifred
Date:     2014-03-31 14:16:09 +0000 (Mon, 31 Mar 2014)
Log Message:
-----------
implement ToProlog (from cartago) in Jason classes

Modified Paths:
--------------
    trunk/demos/persistent-belief-base/bookstore.properties
    trunk/demos/persistent-belief-base/bookstore.script
    trunk/demos/persistent-belief-base/c.asl
    trunk/lib/moise.jar
    trunk/src/jason/asSyntax/DefaultTerm.java

Modified: trunk/demos/persistent-belief-base/bookstore.properties
===================================================================
--- trunk/demos/persistent-belief-base/bookstore.properties	2013-12-20 17:59:14 UTC (rev 1769)
+++ trunk/demos/persistent-belief-base/bookstore.properties	2014-03-31 14:16:09 UTC (rev 1770)
@@ -1,5 +1,5 @@
 #HSQL Database Engine
-#Mon Jun 13 10:20:47 BRT 2011
+#Tue Jan 21 16:04:05 BRST 2014
 hsqldb.script_format=0
 runtime.gc_interval=0
 sql.enforce_strict_size=false

Modified: trunk/demos/persistent-belief-base/bookstore.script
===================================================================
--- trunk/demos/persistent-belief-base/bookstore.script	2013-12-20 17:59:14 UTC (rev 1769)
+++ trunk/demos/persistent-belief-base/bookstore.script	2014-03-31 14:16:09 UTC (rev 1770)
@@ -28,4 +28,4 @@
 INSERT INTO PUBLISHER VALUES(1,'Springer')
 INSERT INTO PUBLISHER VALUES(2,'MIT Press')
 INSERT INTO PUBLISHER VALUES(3,'John Wiley & Sons')
-INSERT INTO TABLEA VALUES('54',FALSE,'[source(self)]')
+INSERT INTO TABLEA VALUES('56',FALSE,'[source(self)]')

Modified: trunk/demos/persistent-belief-base/c.asl
===================================================================
--- trunk/demos/persistent-belief-base/c.asl	2013-12-20 17:59:14 UTC (rev 1769)
+++ trunk/demos/persistent-belief-base/c.asl	2014-03-31 14:16:09 UTC (rev 1770)
@@ -6,7 +6,7 @@
      
 +!start : a(X) 
   <- -+a(X+1); // a is stored in a DB
-     .print("Not first run, I already run ",X," times.");
+     .print("It is not my first run, I already run ",X," times.");
      !show_book(X);
      .println; .print("All titles:");
      ?show_all_titles.
@@ -32,3 +32,4 @@
 // Rules used to show all books  
 show_all_titles :- book(_, Title, _, _Year, _ISBN) & .println("-- ", Title) & false.
 show_all_titles :- true.
+

Modified: trunk/lib/moise.jar
===================================================================
(Binary files differ)

Modified: trunk/src/jason/asSyntax/DefaultTerm.java
===================================================================
--- trunk/src/jason/asSyntax/DefaultTerm.java	2013-12-20 17:59:14 UTC (rev 1769)
+++ trunk/src/jason/asSyntax/DefaultTerm.java	2014-03-31 14:16:09 UTC (rev 1770)
@@ -32,6 +32,8 @@
 import java.util.logging.Level;
 import java.util.logging.Logger;
 
+import c4jason.ToProlog;
+
 /**
  * Base class for all terms.
  * 
@@ -43,7 +45,7 @@
  * 
  * @see ASSyntax
  */
-public abstract class DefaultTerm implements Term, Serializable {
+public abstract class DefaultTerm implements Term, Serializable, ToProlog {
 
     private static final long serialVersionUID = 1L;
     private static Logger logger = Logger.getLogger(Term.class.getName());
@@ -128,4 +130,9 @@
         else 
             return srcInfo.toString();
     }
+    
+    @Override
+    public String getAsPrologStr() {
+        return toString();
+    }
 }

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.