several fixes for new basic compiler

lang/basic/lib/oct.c

@@ -14,6 +14,11 @@ String *_hex(i)
 int i;
 {
 	char buffer[30];
+	register char *p = buffer;
 	sprintf(buffer,"%x",i);
+	while (*p) {
+		if (*p >= 'a' && *p <= 'f') *p += 'A'-'a';
+		p++;
+	}
 	return( (String *)_newstr(buffer));
 }