X-Git-Url: http://gitweb.hachti.de/?a=blobdiff_plain;f=lib%2Ffortran%2Fsrc%2Fuc.asm;h=07ca30e9adb9d8b28cd94ba8d516799a875e31b8;hb=HEAD;hp=a2704dd779647d24ee4bafab23f76e5c1cff4acd;hpb=c08e22bbb226696a64764be9b466a02a3ab0d93f;p=h316.git

diff --git a/lib/fortran/src/uc.asm b/lib/fortran/src/uc.asm
index a2704dd..07ca30e 100644
--- a/lib/fortran/src/uc.asm
+++ b/lib/fortran/src/uc.asm
@@ -9,8 +9,10 @@
 *
 *
 *******
+	SUBR 	UCHAR,UC
+	SUBR 	UC
+*
 	REL
-	SUBR UC
 UC	DAC	**
 	LDA*	UC
 	IRS	UC	RETURN ADDRESS