Help needed to get my 7i76E + 7i85S + 7i73 on my mill going.

FUNCTION(_){
	int actual, message, double motor_max_speed;
	int i;
	// These need to be edited to suit the gearbox
	int speeds[15]    = {0,     80,  125,  160,  215,  270,  360,  450,  595,  750, 1000, 1191, 1500, 2500, 0x1P30};
	int reqd_gear[15] = {0x0, 0x01, 0x21, 0x02, 0x22, 0x04, 0x24, 0x08, 0x28, 0x10, 0x48, 0x68, 0x50, 0x70, 0x0};

	if (spindle_speed_in == 0) return;
	actual = (gear_high * 0x40 + motor_high * 0x20  + gear_A * 0x10 + gear_B * 0x08  + gear_C * 0x04 + gear_D * 0x02 + gear_E * 0x01);
	for (i = 0; spindle_speed_in > speeds[i] && i < 14; i++);
	gear_required = reqd_gear[i];
	if (gear_required == actual && gear_required != 0x0){ // We are in the right gear
		spindle_enable_out = spindle_enable_in;
		if (motor_high)
                   motor_max_speed = 2500;
                else
                   motor_max_speed = 1450;
		motor_speed_out = speeds[13] * (spindle_speed_in / speeds[i+1]);

bengt@CombiMll ~/linuxcnc/configs/GB_2speed $ sudo halcompile  --install GB_2speed.comp
Compiling realtime GB_2speed.c
GB_2speed.comp: In function ‘_’:
GB_2speed.comp:25:23: error: expected identifier or ‘(’ before ‘double’
GB_2speed.comp:38:20: error: ‘motor_max_speed’ undeclared (first use in this function)
GB_2speed.comp:38:20: note: each undeclared identifier is reported only once for each function it appears in
/usr/share/linuxcnc/Makefile.modinc:113: receptet för målet ”GB_2speed.o” misslyckades
make: *** [GB_2speed.o] Fel 1