[Jboss-svn-commits] JBL Code SVN: r2960 - in trunk/labs/jbossrules/drools-compiler/src/test: java/org/drools/lang resources/org/drools/lang

[<jbo...@li...>]

Author: mic...@jb...
Date: 2006-03-16 00:17:29 -0500 (Thu, 16 Mar 2006)
New Revision: 2960

Added:
   trunk/labs/jbossrules/drools-compiler/src/test/resources/org/drools/lang/with_eval.drl
Modified:
   trunk/labs/jbossrules/drools-compiler/src/test/java/org/drools/lang/RuleParserTest.java
Log:
eval tests

Modified: trunk/labs/jbossrules/drools-compiler/src/test/java/org/drools/lang/RuleParserTest.java
===================================================================
--- trunk/labs/jbossrules/drools-compiler/src/test/java/org/drools/lang/RuleParserTest.java	2006-03-16 05:16:29 UTC (rev 2959)
+++ trunk/labs/jbossrules/drools-compiler/src/test/java/org/drools/lang/RuleParserTest.java	2006-03-16 05:17:29 UTC (rev 2960)
@@ -14,6 +14,7 @@
 import org.drools.lang.descr.AndDescr;
 import org.drools.lang.descr.BoundVariableDescr;
 import org.drools.lang.descr.ColumnDescr;
+import org.drools.lang.descr.EvalDescr;
 import org.drools.lang.descr.FieldBindingDescr;
 import org.drools.lang.descr.LiteralDescr;
 import org.drools.lang.descr.OrDescr;
@@ -397,6 +398,18 @@
         
         assertEqualsIgnoreWhitespace( "System.out.println( \"Mark and Michael\" + bar );", rule.getConsequence());
     }
+    
+    public void testWithEval() throws Exception {
+        RuleParser parser = parseResource( "with_eval.drl" );
+        parser.compilation_unit();
+        
+        PackageDescr pack = parser.getPackageDescr();
+        assertEquals(1, pack.getRules().size());
+        RuleDescr rule = (RuleDescr) pack.getRules().get( 0 );
+        assertEquals(3, rule.getLhs().getDescrs().size());
+        EvalDescr eval = (EvalDescr) rule.getLhs().getDescrs().get( 2 );
+        assertEqualsIgnoreWhitespace( "abc(\"foo\");", eval.getText());
+    }
 	
 	private RuleParser parse(String text) throws Exception {
 		parser = newParser( newTokenStream( newLexer( newCharStream( text ) ) ) );

Added: trunk/labs/jbossrules/drools-compiler/src/test/resources/org/drools/lang/with_eval.drl
===================================================================
--- trunk/labs/jbossrules/drools-compiler/src/test/resources/org/drools/lang/with_eval.drl	2006-03-16 05:16:29 UTC (rev 2959)
+++ trunk/labs/jbossrules/drools-compiler/src/test/resources/org/drools/lang/with_eval.drl	2006-03-16 05:17:29 UTC (rev 2960)
@@ -0,0 +1,10 @@
+
+rule simple_rule 
+  when
+	Foo()
+	Bar()
+	eval(abc("foo");)
+  then
+	Kapow
+	
+end
\ No newline at end of file


Property changes on: trunk/labs/jbossrules/drools-compiler/src/test/resources/org/drools/lang/with_eval.drl
___________________________________________________________________
Name: svn:eol-style
   + native