[Jason-developers] SF.net SVN: jason:[1773] trunk/src/jason/stdlib/concat.java

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

Revision: 1773
          http://sourceforge.net/p/jason/svn/1773
Author:   jomifred
Date:     2014-04-20 23:30:57 +0000 (Sun, 20 Apr 2014)
Log Message:
-----------
.concat also accept terms as first argument

Modified Paths:
--------------
    trunk/src/jason/stdlib/concat.java

Modified: trunk/src/jason/stdlib/concat.java
===================================================================
--- trunk/src/jason/stdlib/concat.java	2014-04-20 21:52:15 UTC (rev 1772)
+++ trunk/src/jason/stdlib/concat.java	2014-04-20 23:30:57 UTC (rev 1773)
@@ -101,7 +101,7 @@
             return un.unifies(result, args[args.length-1]);
 
         
-        } else if (args[0].isString()) {
+        } else { //if (args[0].isString() || args) {
             // string concat
             if (!args[args.length-1].isVar() && !args[args.length-1].isString()) {
                 throw JasonException.createWrongArgument(this,"Last argument '"+args[args.length-1]+"' is not a string nor a variable.");
@@ -119,8 +119,8 @@
                 sr.append(vl);
             }
             return un.unifies(new StringTermImpl(sr.toString()), args[args.length-1]);
-        } else {
-                throw JasonException.createWrongArgument(this,"First argument '"+args[0]+"' must be a list or string.");
+        //} else {
+        //    throw JasonException.createWrongArgument(this,"First argument '"+args[0]+"' must be a list, string or term.");
         }
     }
 }

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