From f081ddf9aaac9b6c0759bd85973f37f3cb727dba Mon Sep 17 00:00:00 2001
From: Mark Pizzolato <mark@infocomm.com>
Date: Thu, 2 Apr 2015 10:02:00 -0700
Subject: [PATCH] PDP10: Make file position settings consistently use
 sim_ftell() instead of ftell().

---
 PDP10/pdp10_lp20.c | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/PDP10/pdp10_lp20.c b/PDP10/pdp10_lp20.c
index b237a767..9c2cc284 100644
--- a/PDP10/pdp10_lp20.c
+++ b/PDP10/pdp10_lp20.c
@@ -780,7 +780,7 @@ else {
     }
 for (i = 0; i < rpt; i++)
     fputc (lppdat, lp20_unit.fileref); 
-lp20_unit.pos = ftell (lp20_unit.fileref);
+lp20_unit.pos = (t_addr)sim_ftell (lp20_unit.fileref);
 lpcolc = lpcolc + rpt;
 return r;
 }
@@ -816,7 +816,7 @@ for (i = 0; i < cnt; i++) {                             /* print 'n' newlines; e
             } /* At TOF */
         } /* update pointer */
     }
-lp20_unit.pos = ftell (lp20_unit.fileref);
+lp20_unit.pos = (t_addr)sim_ftell (lp20_unit.fileref);
 if (stoppc)                                            /* Crossed one or more TOFs? */
     return FALSE;
 
@@ -841,7 +841,7 @@ for (i = 0; i < dvlnt; i++) {                           /* search DAVFU */
         if (lpcolc)                                     /* TOF, need newline? */
             lp20_adv (1, FALSE);
         fputc ('\f', lp20_unit.fileref);                /* print form feed */
-        lp20_unit.pos = ftell (lp20_unit.fileref);
+        lp20_unit.pos = (t_addr)sim_ftell (lp20_unit.fileref);
         lppagc = (lppagc - 1) & PAGC_MASK;              /* decr page cntr */
         if (lppagc != 0)
             return TRUE;