cputc-native-user troubleshooting

xs/lisp/eval.c

@@ -1416,6 +1416,7 @@ object eval(object e) {
 			if (check_int_args(base)) goto LERROR;
 #if (defined(RCX) && defined(CONF_CONIO))
 			cputc_native_user(INTval(e = base[0]), INTval(base[1]), INTval(base[2]), INTval(base[3]));
+			cputc(INTval(e = base[0], 4); cputc(INTval(base[1], 3); cputc(INTval(base[2], 2); cputc(INTval(base[3], 1); 
 #elif (!defined(RCX))
 			// NOTE: If not on the RCX, these values (which are character mask values)
 			//   will not display the intended characters.