File: ftello.c

package info (click to toggle)
cvs 2%3A1.12.13%2Breal-15
  • links: PTS, VCS
  • area: main
  • in suites: jessie-kfreebsd
  • size: 18,124 kB
  • sloc: ansic: 100,316; sh: 33,775; asm: 3,281; perl: 2,818; ada: 1,681; makefile: 1,587; yacc: 1,184; pascal: 1,082; cpp: 1,001; lisp: 35
file content (28 lines) | stat: -rw-r--r-- 799 bytes parent folder | download | duplicates (8)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
/* ftello.c -- an implementation of ftell() that returns an off_t
   Copyright (C) 2003, Free Software Foundation, Inc.

   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 2, or (at your option)
   any later version.

   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.  */

#ifdef HAVE_CONFIG_H
#include "config.h"
#endif

#include <stdio.h>
#include <sys/types.h>

off_t
ftello (FILE *stream)
{
    long pos;
    pos = ftell (stream);

    return (off_t) pos;
}