diff options
author | Peter Breitenlohner <peb@mppmu.mpg.de> | 2011-08-01 10:21:26 +0000 |
---|---|---|
committer | Peter Breitenlohner <peb@mppmu.mpg.de> | 2011-08-01 10:21:26 +0000 |
commit | dced0f61f3eb8e164594fafc628ac7d8f97eacaf (patch) | |
tree | 10fa5a3b780fa37c7e9389a6ac51e0b5f8438503 /Build/source/texk/seetexk/strtol.c | |
parent | 9728af2a7e87fddfa3a77ae6dc24755d3dda3e71 (diff) |
seetexk: remove unused files
git-svn-id: svn://tug.org/texlive/trunk@23301 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/seetexk/strtol.c')
-rw-r--r-- | Build/source/texk/seetexk/strtol.c | 56 |
1 files changed, 0 insertions, 56 deletions
diff --git a/Build/source/texk/seetexk/strtol.c b/Build/source/texk/seetexk/strtol.c deleted file mode 100644 index 5cb6662fbb6..00000000000 --- a/Build/source/texk/seetexk/strtol.c +++ /dev/null @@ -1,56 +0,0 @@ -#include <stdio.h> -#include <ctype.h> - -/* - * This is for people who don't have strtol defined on their systems. - * -- Compliments of Daniel.Stodolsky@cs.cmu.edu - */ - -long strtol(nptr,base,eptr) -char *nptr; -int base; -char **eptr; -{ - long l; - - if (base==10) - { - if (sscanf(nptr,"%ld",&l)!=1) - { - *eptr = nptr; - return 0; - } - else - { - while(!isdigit(*nptr)) - nptr++; - while (isdigit(*nptr)) - nptr++; - *eptr = nptr; - return l; - } - } - else - if (base==16) - { - if (sscanf(nptr,"%lx",&l)!=1) - { - *eptr = nptr; - return 0; - } - else - { - while(!isxdigit(*nptr)) - nptr++; - while (isxdigit(*nptr)) - nptr++; - *eptr = nptr; - return l; - } - } - else - { /* a base we don't understand. Puke */ - *eptr = nptr; - return 0; - } -} |