Anonymous

/*   Assembly connection :		- calls ext ASM func "length"		- passes a string of chars		- gets the result (string's length)*/extern unsigned int cdecl length( char*, char );unsigned int asm2pas( char* str, char* res )  /* public by default*/{	unsigned int len;	int i;	len = length( str, 13 );  /* in ASM arguments are in reverse */	for ( i=0; i<len; i++ )  /* copy string */		res[i+1] = str[i];	res[0] = len;									  /* PASCAL string bears length on char[0] */	return len;}