diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 95c270b981a..70167b0de67 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+Sun May  2 01:38:50 1999  Craig Burley  <craig@jcb-sc.com>
+
+	* g77.f-torture/execute/u77-test.f (main): Declare FTELL as
+	intrinsic.
+
 Sun May  2 01:13:37 1999  Craig Burley  <craig@jcb-sc.com>
 
 	* g77.f-torture/execute/u77-test.f (main): List libU77
diff --git a/gcc/testsuite/g77.f-torture/execute/u77-test.f b/gcc/testsuite/g77.f-torture/execute/u77-test.f
index edbcf2f9b54..7377f48938c 100644
--- a/gcc/testsuite/g77.f-torture/execute/u77-test.f
+++ b/gcc/testsuite/g77.f-torture/execute/u77-test.f
@@ -50,7 +50,7 @@
      +     stat, lstat, getcwd, gmtime, etime, chmod, itime, date,
      +     chdir, fgetc, fputc, system_clock, second, idate, secnds,
      +     time, ctime, fdate, ttynam, date_and_time, mclock, mclock8,
-     +     cpu_time, dtime
+     +     cpu_time, dtime, ftell
       external lenstr, ctrlc
       integer lenstr
       logical l
diff --git a/libf2c/ChangeLog b/libf2c/ChangeLog
index c79e6243153..72875885c2c 100644
--- a/libf2c/ChangeLog
+++ b/libf2c/ChangeLog
@@ -1,3 +1,7 @@
+Sun May  2 01:38:50 1999  Craig Burley  <craig@jcb-sc.com>
+
+	* libU77/u77-test.f (main): Declare FTELL as intrinsic.
+
 Sun May  2 01:13:37 1999  Craig Burley  <craig@jcb-sc.com>
 
 	* libU77/u77-test.f (main): List libU77 intrinsics
diff --git a/libf2c/libU77/u77-test.f b/libf2c/libU77/u77-test.f
index f338b814991..88a7a83e357 100644
--- a/libf2c/libU77/u77-test.f
+++ b/libf2c/libU77/u77-test.f
@@ -53,7 +53,7 @@
      +     stat, lstat, getcwd, gmtime, etime, chmod, itime, date,
      +     chdir, fgetc, fputc, system_clock, second, idate, secnds,
      +     time, ctime, fdate, ttynam, date_and_time, mclock, mclock8,
-     +     cpu_time, dtime
+     +     cpu_time, dtime, ftell
       external lenstr, ctrlc
       integer lenstr
       logical l