Testsuite: added some control structure tests involving nesting.

TODO

@@ -37,6 +37,8 @@ Next (in order of descending priority/precedence):
 * Implement environment extension
 * Implement notify extension with sole support for mailto mechanism. 
 * Implement date and index extensions
+* Optimize code containing true/false tests to omit explicit JMP opcodes
+  (i.e. optimize the test away and any code that negatively depends on it)
 * Automate script tests; i.e. build a test suite.
 * Use lib/str-find.h for :contains and :matches match types  
 * Resolve code duplication introduced for handling address-parts and match-types

src/testsuite/tests/control-structures.svtest

@@ -71,6 +71,41 @@ test "ELSEIF-address-false" {
 	}
 }
 
+test "IF-nesting-static" {
+	if true {
+		if true {
+			if false {
+				test_fail "chose wrong outcome: true->true->false";
+			} else {
+			}
+		} else {
+			test_fail "chose wrong outcome: true->false";
+		}
+	} elsif true {
+		if false {
+			test_fail "chose wrong outcome: false->true->false";	
+		} elsif true {
+			test_fail "chose wrong outcome: false->true->true";
+		}
+	} else {
+		test_fail "chose wrong outcome: false->false";
+	}
+}
+
+test "ALLOF-ANYOF-static" {
+	if allof ( true, true, true, true, anyof (false, false, true, false) ) {
+		if anyof( allof(false, false), allof(false, true), allof(true, false) ) {
+			test_fail "chose wrong outcome: true->true";
+		} elsif allof( anyof(false, true), true, anyof(true, false), anyof(true, true)) {
+			
+		} else {
+			test_fail "chose wrong outcome: true->false->false";			
+		}
+	} else {
+		test_fail "chose wrong outcome: false";
+	}
+}
+
 test "STOP" {
 	stop;
 	test_fail "continued after stop";