remove unused sfgetd()

diff --git a/lib/sfio/Makefile.am b/lib/sfio/Makefile.am
index a1fd68ee93a0fba120831437c4ad6e35db3b011e..1841b1eec264ab8ccdcfb63bf831f14dcfbcbca4 100644 (file)
--- a/lib/sfio/Makefile.am
+++ b/lib/sfio/Makefile.am
@@ -10,7 +10,7 @@ noinst_LTLIBRARIES = libsfio_C.la
 
 libsfio_C_la_SOURCES = sfclose.c sfcvt.c sfdisc.c \
        sfexcept.c sfexit.c sfextern.c sffilbuf.c \
-       sfflsbuf.c sfgetd.c sfgetl.c sfgetm.c sfgetr.c sfgetu.c \
+       sfflsbuf.c sfgetl.c sfgetm.c sfgetr.c sfgetu.c \
        sfmode.c sfnew.c sfnotify.c \
        sfnputc.c sfopen.c sfpkrd.c sfpoll.c sfpool.c \
        sfprintf.c sfprints.c sfpurge.c \

diff --git a/lib/sfio/sfgetd.c b/lib/sfio/sfgetd.c
deleted file mode 100644 (file)
index 5765c25..0000000
--- a/lib/sfio/sfgetd.c
+++ /dev/null
@@ -1,66 +0,0 @@
-/* $Id$ $Revision$ */
-/* vim:set shiftwidth=4 ts=8: */
-
-/*************************************************************************
- * Copyright (c) 2011 AT&T Intellectual Property 
- * All rights reserved. This program and the accompanying materials
- * are made available under the terms of the Eclipse Public License v1.0
- * which accompanies this distribution, and is available at
- * http://www.eclipse.org/legal/epl-v10.html
- *
- * Contributors: See CVS logs. Details at http://www.graphviz.org/
- *************************************************************************/
-
-#include       <sfio/sfhdr.h>
-
-#include <math.h>
-
-/*     Read a portably coded double value
-**
-**     Written by Kiem-Phong Vo
-*/
-
-Sfdouble_t sfgetd(Sfio_t * f)
-{
-    uchar *s, *ends, c;
-    int p, sign, exp;
-    Sfdouble_t v;
-
-    SFMTXSTART(f, -1.);
-
-    if ((sign = sfgetc(f)) < 0 || (exp = (int) sfgetu(f)) < 0)
-       SFMTXRETURN(f, -1.);
-
-    if (f->mode != SF_READ && _sfmode(f, SF_READ, 0) < 0)
-       SFMTXRETURN(f, -1.);
-
-    SFLOCK(f, 0);
-
-    v = 0.;
-    for (;;) {                 /* fast read for data */
-       if (SFRPEEK(f, s, p) <= 0) {
-           f->flags |= SF_ERROR;
-           v = -1.;
-           goto done;
-       }
-
-       for (ends = s + p; s < ends;) {
-           c = *s++;
-           v += SFUVALUE(c);
-           v = ldexp(v, -SF_PRECIS);
-           if (!(c & SF_MORE)) {
-               f->next = s;
-               goto done;
-           }
-       }
-       f->next = s;
-    }
-
-  done:
-    v = ldexp(v, (sign & 02) ? -exp : exp);
-    if (sign & 01)
-       v = -v;
-
-    SFOPEN(f, 0);
-    SFMTXRETURN(f, v);
-}

diff --git a/lib/sfio/sfhdr.h b/lib/sfio/sfhdr.h
index 625da9bc2acdf52aff4238bcac770aae94420b42..8a41e7231ddef9bbe061e804214a7f7d8ed0011e 100644 (file)
--- a/lib/sfio/sfhdr.h
+++ b/lib/sfio/sfhdr.h
@@ -438,9 +438,6 @@ extern "C" {
 #define SFSVALUE(v)    ((( long)(v))&(SF_SIGN-1))
 #define SFBVALUE(v)    (((ulong)(v))&(SF_BYTE-1))
 
-/* amount of precision to get in each iteration during coding of doubles */
-#define SF_PRECIS      (SF_UBITS-1)
-
 /* grain size for buffer increment */
 #define SF_GRAIN       1024
 #define SF_PAGE                ((ssize_t)(SF_GRAIN*sizeof(int)*2))

diff --git a/lib/sfio/sfio.h b/lib/sfio/sfio.h
index ca6af9f491a622339c6784bbfd0fe18f2475f6a3..a818904dd912fb86766aa4ab5517cb000e1798f9 100644 (file)
--- a/lib/sfio/sfio.h
+++ b/lib/sfio/sfio.h
@@ -337,7 +337,6 @@ extern "C" {
 
     extern int sfputc(Sfio_t *, int);
 
-    extern Sfdouble_t sfgetd(Sfio_t *);
     extern Sflong_t sfgetl(Sfio_t *);
     extern Sfulong_t sfgetu(Sfio_t *);
     extern Sfulong_t sfgetm(Sfio_t *, Sfulong_t);

diff --git a/lib/sfio/sfio.vcxproj b/lib/sfio/sfio.vcxproj
index 50faec2abf4b59f02daa9a0822d0e6d8f974dc35..5bde46e41abfb3602d5b8bb5a60e0ee7cf1520a2 100644 (file)
--- a/lib/sfio/sfio.vcxproj
+++ b/lib/sfio/sfio.vcxproj
@@ -90,7 +90,6 @@
     <ClCompile Include="sfextern.c" />
     <ClCompile Include="sffilbuf.c" />
     <ClCompile Include="sfflsbuf.c" />
-    <ClCompile Include="sfgetd.c" />
     <ClCompile Include="sfgetl.c" />
     <ClCompile Include="sfgetm.c" />
     <ClCompile Include="sfgetr.c" />

diff --git a/lib/sfio/sfio.vcxproj.filters b/lib/sfio/sfio.vcxproj.filters
index d0c74ffc0c99a56bed80a031c6da14dc04761acb..c7a2131802db8c86469376c7edbfbbf60cee94c8 100644 (file)
--- a/lib/sfio/sfio.vcxproj.filters
+++ b/lib/sfio/sfio.vcxproj.filters
@@ -65,9 +65,6 @@
     <ClCompile Include="sfflsbuf.c">
       <Filter>Source Files</Filter>
     </ClCompile>
-    <ClCompile Include="sfgetd.c">
-      <Filter>Source Files</Filter>
-    </ClCompile>
     <ClCompile Include="sfgetl.c">
       <Filter>Source Files</Filter>
     </ClCompile>