evolve4src/src/evolve_simulator/kforth_execute.cpp
int kforth_ops_max_opcode(KFORTH_OPERATIONS *kfops)
{
	int i, found_empty_slot;

	ASSERT( kfops != NULL );

	found_empty_slot = 0;
	for(i=0; i < KFORTH_OPS_LEN; i++) {
		if( kfops[i].name == NULL ) {
			found_empty_slot = 1;
			break;
		}
	}

	ASSERT( found_empty_slot );
	ASSERT( i >= 0 );

	return i-1;
}
/*
 * Return the maximum defined opcode for 'kfops'
 *
 * Valid opcodes will be: 0 .. max_opcode
 *
 * max_opcode will be less than or equal to KFORTH_OPS_LEN
 *
 */
Return the maximum defined opcode for 'kfops'
Valid opcodes will be: 0 ..

max_opcode will be less than or equal to KFORTH_OPS_LEN
Return the maximum defined opcode for ' kfops ' Valid opcodes will be : 0 .. max_opcode will be less than or equal to KFORTH_OPS_LEN
int kforth_ops_max_opcode(KFORTH_OPERATIONS *kfops)
{
	int i, found_empty_slot;
	ASSERT( kfops != NULL );
	found_empty_slot = 0;
	for(i=0; i < KFORTH_OPS_LEN; i++) {
		if( kfops[i].name == NULL ) {
			found_empty_slot = 1;
			break;
		}
	}
	ASSERT( found_empty_slot );
	ASSERT( i >= 0 );
	return i-1;
}
int kforth_ops_max_opcode ( KFORTH_OPERATIONS * kfops ) { int i , found_empty_slot ; ASSERT ( kfops != NULL ) ; found_empty_slot = 0 ; for ( i = 0 ; i < KFORTH_OPS_LEN ; i ++ ) { if ( kfops [ i ] . name == NULL ) { found_empty_slot = 1 ; break ; } } ASSERT ( found_empty_slot ) ; ASSERT ( i >= 0 ) ; return i - 1 ; }
Return the maximum defined opcode for 'kfops'
 Valid opcodes will be: 0 .. max_opcode
Return the maximum defined opcode for ' kfops ' Valid opcodes will be : 0 .. max_opcode