Merge pull request #17 from consultingwerk/like

Integrated Like-Support from Acorn

build.number

@@ -1,3 +1,3 @@
 #Build Number for ANT. Do not edit!
-#Sat Nov 04 14:20:22 CET 2017
-build.number=1174
+#Wed Jan 03 11:03:09 CET 2018
+build.number=1176

data/newsyntax/11.7/LikeParameters.p

@@ -0,0 +1,18 @@
+define temp-table ttIdx
+    field idxName as char
+    field pkLike as deci.
+
+procedure test:
+    define input parameter tst LIKE ttIdx.idxName.
+end procedure.
+
+FUNCTION myExampleFunction RETURNS LOGICAL ( 
+    output ioP as character, 
+    input-output ioj like ttIdx.pkLike,
+    input tstf as decimal extent 5,
+    input fer like ttIdx.idxName,
+    input hkjhkjh as class Progress.Lang.Error,
+    input-output class Progress.Lang.AppError extent,
+    output decimal extent):
+    return true.
+end function.

data/newsyntax/11.7/TestSerializableOptions.cls

@@ -20,6 +20,8 @@ CLASS Test.TestSerializableOptions SERIALIZABLE:
      *
      * @return CHARACTER
      */
+
+    define public event testEvt signature void (amr as character).
 
     DEFINE PRIVATE SERIALIZABLE TEMP-TABLE ttTest NO-UNDO FIELD c AS CHARACTER .
 
@@ -41,4 +43,14 @@ CLASS Test.TestSerializableOptions SERIALIZABLE:
 
 	DEFINE PRIVATE SERIALIZABLE VARIABLE TestVariable2 AS CHARACTER NO-UNDO SERIALIZE-NAME "BamBam":U. 
 
+  METHOD PROTECTED VOID InternalAdd (poItem AS Progress.Lang.Object EXTENT):
+
+        DEFINE VARIABLE i AS INTEGER NO-UNDO.
+
+        DO i = 1 TO EXTENT (poItem):
+            THIS-OBJECT:InternalAdd (poItem[i]) .
+        END.
+
+    END METHOD.
+
 END CLASS.

src/com/joanju/proparse/unittest/TestNewSyntax.java

@@ -22,6 +22,7 @@
 import org.prorefactor.treeparser.ParseUnit;
 
 import com.joanju.proparse.DoParse;
+import com.joanju.proparse.Environment;
 
 /**
  * Test all tree parsers against new syntax. These tests just run the tree
@@ -36,6 +37,8 @@ public class TestNewSyntax extends TestCase {
 	protected void setUp() throws Exception {
 		super.setUp();
 
+		Environment env = Environment.instance();
+		env.configSet("proversion", "11.7");
 	}
 
 	public void test01() throws Exception {