X-Git-Url: https://git.subgeniuskitty.com/unix-history/.git/blobdiff_plain/e804469b5b0975de34bae1e66c3e6371249d3ee7..0f4556f12c8f75078501c9d1338ae7648a97f975:/usr/src/usr.lib/libI77/dofio.c

diff --git a/usr/src/usr.lib/libI77/dofio.c b/usr/src/usr.lib/libI77/dofio.c
index 6b61aaa458..e981735978 100644
--- a/usr/src/usr.lib/libI77/dofio.c
+++ b/usr/src/usr.lib/libI77/dofio.c
@@ -1,5 +1,5 @@
 /*
-char id_dofio[] = "@(#)dofio.c	1.2";
+char id_dofio[] = "@(#)dofio.c	1.3";
  *
  * fortran format executer
  */
@@ -14,7 +14,7 @@ char *dfio = "dofio";
 
 en_fio()
 {	ftnint one=1;
-	return(do_fio(&one,NULL,0l));
+	return(do_fio(&one,NULL,0L));
 }
 
 do_fio(number,ptr,len) ftnint *number; ftnlen len; char *ptr;