diff options
Diffstat (limited to 'libf2c/libI77/err.c')
| -rw-r--r-- | libf2c/libI77/err.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/libf2c/libI77/err.c b/libf2c/libI77/err.c index 56d82ac..e7ac23a 100644 --- a/libf2c/libI77/err.c +++ b/libf2c/libI77/err.c @@ -163,7 +163,8 @@ f__fatal(int n, char *s) dead = 1; if (f__init & 1) { if (f__curunit) { - fprintf(stderr,"apparent state: unit %d ",f__curunit-f__units); + fprintf(stderr,"apparent state: unit %d ", + (int)(f__curunit-f__units)); fprintf(stderr, f__curunit->ufnm ? "named %s\n" : "(unnamed)\n", f__curunit->ufnm); } |