611 static void (*os_data_char)(char new_char);
634 static void bin_data_char(char new_char)  in bin_data_char()  argument
638 		*os_data_addr++ = new_char;  in bin_data_char()
671 static void k_data_char(char new_char)  in k_data_char()  argument
675 		os_data_char(ktrans(new_char));  in k_data_char()
678 		if (new_char == his_quote) {  in k_data_char()
683 			os_data_char(new_char);  in k_data_char()
783 	char new_char;  in k_recv()  local
847 		new_char = getc();  in k_recv()
848 		if ((new_char & 0xE0) == 0)  in k_recv()
850 		sum += new_char & 0xff;  in k_recv()
851 		length = untochar(new_char);  in k_recv()
853 		new_char = getc();  in k_recv()
854 		if ((new_char & 0xE0) == 0)  in k_recv()
856 		sum += new_char & 0xff;  in k_recv()
857 		n = untochar(new_char);  in k_recv()
880 		new_char = getc();  in k_recv()
881 		if ((new_char & 0xE0) == 0)  in k_recv()
883 		sum += new_char & 0xff;  in k_recv()
884 		k_state = new_char;  in k_recv()
890 			new_char = getc();  in k_recv()
891 			if ((new_char & 0xE0) == 0)  in k_recv()
893 			sum += new_char & 0xff;  in k_recv()
894 			len_hi = untochar(new_char);  in k_recv()
895 			new_char = getc();  in k_recv()
896 			if ((new_char & 0xE0) == 0)  in k_recv()
898 			sum += new_char & 0xff;  in k_recv()
899 			len_lo = untochar(new_char);  in k_recv()
902 			new_char = getc();  in k_recv()
903 			if ((new_char & 0xE0) == 0)  in k_recv()
905 			if (new_char != tochar((sum + ((sum >> 6) & 0x03)) & 0x3f))  in k_recv()
907 			sum += new_char & 0xff;  in k_recv()
912 			new_char = getc();  in k_recv()
913 			if ((new_char & 0xE0) == 0)  in k_recv()
915 			sum += new_char & 0xff;  in k_recv()
919 				k_data_char (new_char);  in k_recv()
922 				*send_ptr++ = new_char;  in k_recv()
929 		new_char = getc();  in k_recv()
930 		if ((new_char & 0xE0) == 0)  in k_recv()
932 		if (new_char != tochar((sum + ((sum >> 6) & 0x03)) & 0x3f))  in k_recv()
935 		new_char = getc();  in k_recv()
936 		if (new_char != END_CHAR) {  in k_recv()