Switch Case, Select Active, or If Else If?

DHawthorne wrote: »

My guess on the IF statements would be that there is an internal optimization done by the compiler so that it is not actually evaluated again if the parameters haven't changed. It seems to me that would be an optimization well worth making in any case.

Line      1 (14:50:41):: *********************************************************
Line      2 (14:50:41):: * TEST 1 REPORT: Parse String SelectActive ==
Line      3 (14:50:41):: * Most recent 5 runs:
Line      4 (14:50:41):: * 1: 1254ms
Line      5 (14:50:41):: * 2: 1254ms
Line      6 (14:50:41):: * 3: 1254ms
Line      7 (14:50:41):: * 4: 1254ms
Line      8 (14:50:41):: * 5: 1252ms
Line      9 (14:50:41):: *----------------------------------------------------------
Line     10 (14:50:41):: * Average run time: 1253ms - over 5 tests
Line     11 (14:50:41):: *********************************************************
Line     12 (14:50:41):: *********************************************************
Line     13 (14:50:41):: * TEST 2 REPORT: Parse String SelectActive find()
Line     14 (14:50:41):: * Most recent 5 runs:
Line     15 (14:50:41):: * 1: 6549ms
Line     16 (14:50:41):: * 2: 6450ms
Line     17 (14:50:41):: * 3: 6485ms
Line     18 (14:50:41):: * 4: 6447ms
Line     19 (14:50:41):: * 5: 6480ms
Line     20 (14:50:41):: *----------------------------------------------------------
Line     21 (14:50:41):: * Average run time: 6481ms - over 5 tests
Line     22 (14:50:41):: *********************************************************
Line     23 (14:50:41):: *********************************************************
Line     24 (14:50:41):: * TEST 3 REPORT: Parse String SwitchCase Random
Line     25 (14:50:41):: * Most recent 5 runs:
Line     26 (14:50:41):: * 1: 1068ms
Line     27 (14:50:41):: * 2: 1066ms
Line     28 (14:50:41):: * 3: 1066ms
Line     29 (14:50:41):: * 4: 1067ms
Line     30 (14:50:41):: * 5: 1068ms
Line     31 (14:50:41):: *----------------------------------------------------------
Line     32 (14:50:41):: * Average run time: 1066ms - over 5 tests
Line     33 (14:50:41):: *********************************************************
Line     34 (14:50:41):: *********************************************************
Line     35 (14:50:41):: * TEST 4 REPORT: Parse String SwitchCase short->long
Line     36 (14:50:41):: * Most recent 5 runs:
Line     37 (14:50:41):: * 1: 1074ms
Line     38 (14:50:41):: * 2: 1073ms
Line     39 (14:50:41):: * 3: 1073ms
Line     40 (14:50:41):: * 4: 1072ms
Line     41 (14:50:41):: * 5: 1072ms
Line     42 (14:50:41):: *----------------------------------------------------------
Line     43 (14:50:41):: * Average run time: 1072ms - over 5 tests
Line     44 (14:50:41):: *********************************************************
Line     45 (14:50:41):: *********************************************************
Line     46 (14:50:41):: * TEST 5 REPORT: Parse String SwitchCase long->short
Line     47 (14:50:41):: * Most recent 5 runs:
Line     48 (14:50:41):: * 1: 1052ms
Line     49 (14:50:41):: * 2: 1053ms
Line     50 (14:50:41):: * 3: 1052ms
Line     51 (14:50:41):: * 4: 1052ms
Line     52 (14:50:41):: * 5: 1052ms
Line     53 (14:50:41):: *----------------------------------------------------------
Line     54 (14:50:41):: * Average run time: 1052ms - over 5 tests
Line     55 (14:50:41):: *********************************************************
Line     56 (14:50:41):: *********************************************************
Line     57 (14:50:41):: * TEST 6 REPORT: Parse String SwitchCase 3Char
Line     58 (14:50:41):: * Most recent 5 runs:
Line     59 (14:50:41):: * 1: 1557ms
Line     60 (14:50:41):: * 2: 1557ms
Line     61 (14:50:41):: * 3: 1557ms
Line     62 (14:50:41):: * 4: 1556ms
Line     63 (14:50:41):: * 5: 1557ms
Line     64 (14:50:41):: *----------------------------------------------------------
Line     65 (14:50:41):: * Average run time: 1556ms - over 5 tests
Line     66 (14:50:41):: *********************************************************
Line     67 (14:50:41):: *********************************************************
Line     68 (14:50:41):: * TEST 7 REPORT: Parse String SelectActive == 3Char
Line     69 (14:50:41):: * Most recent 5 runs:
Line     70 (14:50:41):: * 1: 5177ms
Line     71 (14:50:41):: * 2: 5183ms
Line     72 (14:50:41):: * 3: 5196ms
Line     73 (14:50:41):: * 4: 5174ms
Line     74 (14:50:41):: * 5: 5176ms
Line     75 (14:50:41):: *----------------------------------------------------------
Line     76 (14:50:41):: * Average run time: 5180ms - over 5 tests
Line     77 (14:50:41):: *********************************************************
Line     78 (14:50:41):: *********************************************************
Line     79 (14:50:41):: * TEST 8 REPORT: Parse String SelectActive == stack 3char
Line     80 (14:50:41):: * Most recent 5 runs:
Line     81 (14:50:41):: * 1: 1571ms
Line     82 (14:50:41):: * 2: 1571ms
Line     83 (14:50:41):: * 3: 1572ms
Line     84 (14:50:41):: * 4: 1569ms
Line     85 (14:50:41):: * 5: 1576ms
Line     86 (14:50:41):: *----------------------------------------------------------
Line     87 (14:50:41):: * Average run time: 1571ms - over 5 tests
Line     88 (14:50:41):: *********************************************************
Line     89 (16:17:10):: *********************************************************
Line     90 (16:17:10):: * TEST 9 REPORT: Parse String SwitchCase 3Char
Line     91 (16:17:10):: * Most recent 5 runs:
Line     92 (16:17:10):: * 1: 1117ms
Line     93 (16:17:10):: * 2: 1110ms
Line     94 (16:17:10):: * 3: 1110ms
Line     95 (16:17:10):: * 4: 1113ms
Line     96 (16:17:10):: * 5: 1109ms
Line     97 (16:17:10):: *----------------------------------------------------------
Line     98 (16:17:10):: * Average run time: 1111ms - over 5 tests
Line     99 (16:17:10):: *********************************************************

define_function parseStringSelectEqual(){//Test 1
	stack_var integer x;
	for(x=MAX_CONDITIONAL;x;x--){
		select{
			active(sRandomStrings[x] == 'Dog'):
				nInfo[x] = 1;
			active(sRandomStrings[x] == 'Cat'):
				nInfo[x] = 2;
			active(sRandomStrings[x] == 'Wolf'):
				nInfo[x] = 3;
			active(sRandomStrings[x] == 'Long Animal Names'):
				nInfo[x] = 4;
			active(sRandomStrings[x] == 'Elephant'):
				nInfo[x] = 5;
			active(sRandomStrings[x] == 'Emu'):
				nInfo[x] = 6;
			active(sRandomStrings[x] == 'Whale'):
				nInfo[x] = 7;
			active(sRandomStrings[x] == 'Aardvark'):
				nInfo[x] = 8;
			active(sRandomStrings[x] == 'Ostrich'):
				nInfo[x] = 9;
			active(sRandomStrings[x] == 'Coyote'):
				nInfo[x] = 10;
			active(sRandomStrings[x] == 'Monkey'):
				nInfo[x] = 11;
			active(sRandomStrings[x] == 'Rhinoceros'):
				nInfo[x] = 12;
			active(sRandomStrings[x] == 'Kangaroo'):
				nInfo[x] = 13;
			active(sRandomStrings[x] == 'Penguin'):
				nInfo[x] = 14;
			active(sRandomStrings[x] == 'Seal'):
				nInfo[x] = 15;
			active(sRandomStrings[x] == 'Lion'):
				nInfo[x] = 16;
			active(sRandomStrings[x] == 'Tiger'):
				nInfo[x] = 17;
			active(sRandomStrings[x] == 'Another Long Name'):
				nInfo[x] = 18;
			active(sRandomStrings[x] == 'Lizard'):
				nInfo[x] = 19;
			active(sRandomStrings[x] == 'Boa Constrictor'):
				nInfo[x] = 20;
			active(1):
				send_string 0,"'Problem in call'"
		}                 
	}
}
define_function parseStringSelectFind(){//test 2
	stack_var integer x;
	for(x=MAX_CONDITIONAL;x;x--){
		select{
			active(find_string(sRandomStrings[x],'Dog',1)):
				nInfo[x] = 1;
			active(find_string(sRandomStrings[x],'Cat',1)):
				nInfo[x] = 2;
			active(find_string(sRandomStrings[x],'Wolf',1)):
				nInfo[x] = 3;
			active(find_string(sRandomStrings[x],'Long Animal Names',1)):
				nInfo[x] = 4;
			active(find_string(sRandomStrings[x],'Elephant',1)):
				nInfo[x] = 5;
			active(find_string(sRandomStrings[x],'Emu',1)):
				nInfo[x] = 6;
			active(find_string(sRandomStrings[x],'Whale',1)):
				nInfo[x] = 7;
			active(find_string(sRandomStrings[x],'Aardvark',1)):
				nInfo[x] = 8;
			active(find_string(sRandomStrings[x],'Ostrich',1)):
				nInfo[x] = 9;
			active(find_string(sRandomStrings[x],'Coyote',1)):
				nInfo[x] = 10;
			active(find_string(sRandomStrings[x],'Monkey',1)):
				nInfo[x] = 11;
			active(find_string(sRandomStrings[x],'Rhinoceros',1)):
				nInfo[x] = 12;
			active(find_string(sRandomStrings[x],'Kangaroo',1)):
				nInfo[x] = 13;
			active(find_string(sRandomStrings[x],'Penguin',1)):
				nInfo[x] = 14;
			active(find_string(sRandomStrings[x],'Seal',1)):
				nInfo[x] = 15;
			active(find_string(sRandomStrings[x],'Lion',1)):
				nInfo[x] = 16;
			active(find_string(sRandomStrings[x],'Tiger',1)):
				nInfo[x] = 17;
			active(find_string(sRandomStrings[x],'Another Long Name',1)):
				nInfo[x] = 18;
			active(find_string(sRandomStrings[x],'Lizard',1)):
				nInfo[x] = 19;
			active(find_string(sRandomStrings[x],'Boa Constrictor',1)):
				nInfo[x] = 20;
			active(1):
				send_string 0,"'Problem in call'"
		}                 
	}
}
define_function parseStringSwitchCase1(){//test 3
	stack_var integer x;
	for(x=MAX_CONDITIONAL;x;x--){
		switch(sRandomStrings[x]){
			case 'Dog':
				nInfo[x] = 1;
			case 'Cat':
				nInfo[x] = 2;
			case 'Wolf':
				nInfo[x] = 3;
			case 'Long Animal Names':
				nInfo[x] = 4;
			case 'Elephant':
				nInfo[x] = 5;
			case 'Emu':
				nInfo[x] = 6;
			case 'Whale':
				nInfo[x] = 7;
			case 'Aardvark':
				nInfo[x] = 8;
			case 'Ostrich':
				nInfo[x] = 9;
			case 'Coyote':
				nInfo[x] = 10;
			case 'Monkey':
				nInfo[x] = 11;
			case 'Rhinoceros':
				nInfo[x] = 12;
			case 'Kangaroo':
				nInfo[x] = 13;
			case 'Penguin':
				nInfo[x] = 14;
			case 'Seal':
				nInfo[x] = 15;
			case 'Lion':
				nInfo[x] = 16;
			case 'Tiger':
				nInfo[x] = 17;
			case 'Another Long Name':
				nInfo[x] = 18;
			case 'Lizard':
				nInfo[x] = 19;
			case 'Boa Constrictor':
				nInfo[x] = 20;
			default:
				send_string 0,"'Problem in call'"
		}                 
	}
}
define_function parseStringSwitchCase2(){/test 4
	stack_var integer x;
	for(x=MAX_CONDITIONAL;x;x--){
		switch(sRandomStrings[x]){
			case 'Dog':
				nInfo[x] = 1;
			case 'Cat':
				nInfo[x] = 2;
			case 'Emu':
				nInfo[x] = 6;
			case 'Wolf':
				nInfo[x] = 3;
			case 'Seal':
				nInfo[x] = 15;
			case 'Lion':
				nInfo[x] = 16;
			case 'Whale':
				nInfo[x] = 7;
			case 'Tiger':
				nInfo[x] = 17;
			case 'Coyote':
				nInfo[x] = 10;
			case 'Monkey':
				nInfo[x] = 11;
			case 'Lizard':
				nInfo[x] = 19;
			case 'Ostrich':
				nInfo[x] = 9;
			case 'Penguin':
				nInfo[x] = 14;
			case 'Aardvark':
				nInfo[x] = 8;
			case 'Elephant':
				nInfo[x] = 5;
			case 'Kangaroo':
				nInfo[x] = 13;
			case 'Rhinoceros':
				nInfo[x] = 12;
			case 'Boa Constrictor':
				nInfo[x] = 20;
			case 'Another Long Name':
				nInfo[x] = 18;
			case 'Long Animal Names':
				nInfo[x] = 4;
			default:
				send_string 0,"'Problem in call'"
		}                 
	}
}
define_function parseStringSwitchCase3(){//test 5
	stack_var integer x;
	for(x=MAX_CONDITIONAL;x;x--){
		switch(sRandomStrings[x]){
			case 'Another Long Name':
				nInfo[x] = 18;
			case 'Long Animal Names':
				nInfo[x] = 4;
			case 'Boa Constrictor':
				nInfo[x] = 20;
			case 'Rhinoceros':
				nInfo[x] = 12;
			case 'Aardvark':
				nInfo[x] = 8;
			case 'Elephant':
				nInfo[x] = 5;
			case 'Kangaroo':
				nInfo[x] = 13;
			case 'Ostrich':
				nInfo[x] = 9;
			case 'Penguin':
				nInfo[x] = 14;
			case 'Coyote':
				nInfo[x] = 10;
			case 'Monkey':
				nInfo[x] = 11;
			case 'Lizard':
				nInfo[x] = 19;
			case 'Whale':
				nInfo[x] = 7;
			case 'Tiger':
				nInfo[x] = 17;
			case 'Wolf':
				nInfo[x] = 3;
			case 'Seal':
				nInfo[x] = 15;
			case 'Lion':
				nInfo[x] = 16;
			case 'Dog':
				nInfo[x] = 1;
			case 'Cat':
				nInfo[x] = 2;
			case 'Emu':
				nInfo[x] = 6;
			default:
				send_string 0,"'Problem in call'"
		}                 
	}
}
define_function parseStringSwitchCase4(){//test 6
	stack_var integer x;
	for(x=MAX_CONDITIONAL;x;x--){
		switch(left_string(sRandomStrings[x],3)){
			case 'Dog':
				nInfo[x] = 1;
			case 'Cat':
				nInfo[x] = 2;
			case 'Wol':
				nInfo[x] = 3;
			case 'Lon':
				nInfo[x] = 4;
			case 'Ele':
				nInfo[x] = 5;
			case 'Emu':
				nInfo[x] = 6;
			case 'Wha':
				nInfo[x] = 7;
			case 'Aar':
				nInfo[x] = 8;
			case 'Ost':
				nInfo[x] = 9;
			case 'Coy':
				nInfo[x] = 10;
			case 'Mon':
				nInfo[x] = 11;
			case 'Rhi':
				nInfo[x] = 12;
			case 'Kan':
				nInfo[x] = 13;
			case 'Pen':
				nInfo[x] = 14;
			case 'Sea':
				nInfo[x] = 15;
			case 'Lio':
				nInfo[x] = 16;
			case 'Tig':
				nInfo[x] = 17;
			case 'Ano':
				nInfo[x] = 18;
			case 'Liz':
				nInfo[x] = 19;
			case 'Boa':
				nInfo[x] = 20;
			default:
				send_string 0,"'Problem in call'"
		}                 
	}
}
define_function parseStringSelectEqualLeft1(){//test 7
	stack_var integer x;
	for(x=MAX_CONDITIONAL;x;x--){
		select{
			active(left_string(sRandomStrings[x],3) == 'Dog'):
				nInfo[x] = 1;
			active(left_string(sRandomStrings[x],3) == 'Cat'):
				nInfo[x] = 2;
			active(left_string(sRandomStrings[x],3) == 'Wol'):
				nInfo[x] = 3;
			active(left_string(sRandomStrings[x],3) == 'Lon'):
				nInfo[x] = 4;
			active(left_string(sRandomStrings[x],3) == 'Ele'):
				nInfo[x] = 5;
			active(left_string(sRandomStrings[x],3) == 'Emu'):
				nInfo[x] = 6;
			active(left_string(sRandomStrings[x],3) == 'Wha'):
				nInfo[x] = 7;
			active(left_string(sRandomStrings[x],3) == 'Aar'):
				nInfo[x] = 8;
			active(left_string(sRandomStrings[x],3) == 'Ost'):
				nInfo[x] = 9;
			active(left_string(sRandomStrings[x],3) == 'Coy'):
				nInfo[x] = 10;
			active(left_string(sRandomStrings[x],3) == 'Mon'):
				nInfo[x] = 11;
			active(left_string(sRandomStrings[x],3) == 'Rhi'):
				nInfo[x] = 12;
			active(left_string(sRandomStrings[x],3) == 'Kan'):
				nInfo[x] = 13;
			active(left_string(sRandomStrings[x],3) == 'Pen'):
				nInfo[x] = 14;
			active(left_string(sRandomStrings[x],3) == 'Sea'):
				nInfo[x] = 15;
			active(left_string(sRandomStrings[x],3) == 'Lio'):
				nInfo[x] = 16;
			active(left_string(sRandomStrings[x],3) == 'Tig'):
				nInfo[x] = 17;
			active(left_string(sRandomStrings[x],3) == 'Ano'):
				nInfo[x] = 18;
			active(left_string(sRandomStrings[x],3) == 'Liz'):
				nInfo[x] = 19;
			active(left_string(sRandomStrings[x],3) == 'Boa'):
				nInfo[x] = 20;
			active(1):
				send_string 0,"'Problem in call'"
		}                 
	}
}
define_function parseStringSelectEqualLeft2(){//test 8
	stack_var integer x;
	stack_var char sData[3];
	for(x=MAX_CONDITIONAL;x;x--){
		sData = left_string(sRandomStrings[x],3);
		select{
			active(sData == 'Dog'):
				nInfo[x] = 1;
			active(sData == 'Cat'):
				nInfo[x] = 2;
			active(sData == 'Wol'):
				nInfo[x] = 3;
			active(sData == 'Lon'):
				nInfo[x] = 4;
			active(sData == 'Ele'):
				nInfo[x] = 5;
			active(sData == 'Emu'):
				nInfo[x] = 6;
			active(sData == 'Wha'):
				nInfo[x] = 7;
			active(sData == 'Aar'):
				nInfo[x] = 8;
			active(sData == 'Ost'):
				nInfo[x] = 9;
			active(sData == 'Coy'):
				nInfo[x] = 10;
			active(sData == 'Mon'):
				nInfo[x] = 11;
			active(sData == 'Rhi'):
				nInfo[x] = 12;
			active(sData == 'Kan'):
				nInfo[x] = 13;
			active(sData == 'Pen'):
				nInfo[x] = 14;
			active(sData == 'Sea'):
				nInfo[x] = 15;
			active(sData == 'Lio'):
				nInfo[x] = 16;
			active(sData == 'Tig'):
				nInfo[x] = 17;
			active(sData == 'Ano'):
				nInfo[x] = 18;
			active(sData == 'Liz'):
				nInfo[x] = 19;
			active(sData == 'Boa'):
				nInfo[x] = 20;
			active(1):
				send_string 0,"'Problem in call'"
		}                 
	}
}


define_function parseStringSwitchCase5(){//test 9
	stack_var integer x;
	for(x=MAX_CONDITIONAL;x;x--){
		switch(sRandomStrings[x][1]){
			case 'D':
				nInfo[x] = 1;
			case 'C':
				nInfo[x] = 2;
			case 'W':
				nInfo[x] = 3;
			case 'L':
				nInfo[x] = 4;
			case 'E':{
				switch(sRandomStrings[x][2]){
					case 'l':
						nInfo[x] = 5;
					case 'm':
						nInfo[x] = 6;
				}
			}
			case 'W':
				nInfo[x] = 7;
			case 'A':{
				switch(sRandomStrings[x][2]){
					case 'a':
						nInfo[x] = 8;
					case 'n':
						nInfo[x] = 18;
				}
			}
			case 'O':
				nInfo[x] = 9;
			case 'C':
				nInfo[x] = 10;
			case 'M':
				nInfo[x] = 11;
			case 'R':
				nInfo[x] = 12;
			case 'K':
				nInfo[x] = 13;
			case 'P':
				nInfo[x] = 14;
			case 'S':
				nInfo[x] = 15;
			case 'L':{
				switch(sRandomStrings[x][3]){
					case 'o':
						nInfo[x] = 16;
					case 'z':
						nInfo[x] = 19;
				}
			}
			case 'T':
				nInfo[x] = 17;
			case 'B':
				nInfo[x] = 20;
			default:
				send_string 0,"'Problem in call'"
		}                 
	}
}

DEFINE_START
SET_LENGTH_ARRAY (nInfo,70000)
for(nLoop2=MAX_CONDITIONAL;nLoop2;nLoop2--){
	cAChars[nLoop2] = 'A';
	cZChars[nLoop2] = 'Z';
	cRandomChars[nLoop2] = RANDOM_NUMBER(26)+65;
	switch(RANDOM_NUMBER(20)){
		case 0:
			sRandomStrings[nLoop2] = 'Dog'
		case 1:
			sRandomStrings[nLoop2] = 'Cat'
		case 2:
			sRandomStrings[nLoop2] = 'Wolf'
		case 3:
			sRandomStrings[nLoop2] = 'Long Animal Names'
		case 4:
			sRandomStrings[nLoop2] = 'Elephant'
		case 5:
			sRandomStrings[nLoop2] = 'Emu'
		case 6:
			sRandomStrings[nLoop2] = 'Whale'
		case 7:
			sRandomStrings[nLoop2] = 'Aardvark'
		case 8:
			sRandomStrings[nLoop2] = 'Ostrich'
		case 9:
			sRandomStrings[nLoop2] = 'Coyote'
		case 10:
			sRandomStrings[nLoop2] = 'Monkey'
		case 11:
			sRandomStrings[nLoop2] = 'Rhinoceros'
		case 12:
			sRandomStrings[nLoop2] = 'Kangaroo'
		case 13:
			sRandomStrings[nLoop2] = 'Penguin'
		case 14:
			sRandomStrings[nLoop2] = 'Seal'
		case 15:
			sRandomStrings[nLoop2] = 'Lion'
		case 16:
			sRandomStrings[nLoop2] = 'Tiger'
		case 17:
			sRandomStrings[nLoop2] = 'Another Long Name'
		case 18:
			sRandomStrings[nLoop2] = 'Lizard'
		case 19:
			sRandomStrings[nLoop2] = 'Boa Constrictor'
	}
}