]> granicus.if.org Git - python/commitdiff
Removed guesstabsize.c, which is obsolete.
authorJack Jansen <jack.jansen@cwi.nl>
Tue, 11 Jul 2000 21:18:44 +0000 (21:18 +0000)
committerJack Jansen <jack.jansen@cwi.nl>
Tue, 11 Jul 2000 21:18:44 +0000 (21:18 +0000)
Mac/Build/PythonCorePPC.prj
Mac/Python/macguesstabsize.c [deleted file]

index 99152a5fce02f635516e53a1119b44c293c41ace..260982d1f775c55458c70ec78784fb22bd050cfa 100644 (file)
Binary files a/Mac/Build/PythonCorePPC.prj and b/Mac/Build/PythonCorePPC.prj differ
diff --git a/Mac/Python/macguesstabsize.c b/Mac/Python/macguesstabsize.c
deleted file mode 100644 (file)
index 482f43d..0000000
+++ /dev/null
@@ -1,63 +0,0 @@
-/***********************************************************
-Copyright 1991-1997 by Stichting Mathematisch Centrum, Amsterdam,
-The Netherlands.
-
-                        All Rights Reserved
-
-Permission to use, copy, modify, and distribute this software and its
-documentation for any purpose and without fee is hereby granted,
-provided that the above copyright notice appear in all copies and that
-both that copyright notice and this permission notice appear in
-supporting documentation, and that the names of Stichting Mathematisch
-Centrum or CWI or Corporation for National Research Initiatives or
-CNRI not be used in advertising or publicity pertaining to
-distribution of the software without specific, written prior
-permission.
-
-While CWI is the initial source for this software, a modified version
-is made available by the Corporation for National Research Initiatives
-(CNRI) at the Internet address ftp://ftp.python.org.
-
-STICHTING MATHEMATISCH CENTRUM AND CNRI DISCLAIM ALL WARRANTIES WITH
-REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF
-MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL STICHTING MATHEMATISCH
-CENTRUM OR CNRI BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL
-DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
-PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
-TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
-PERFORMANCE OF THIS SOFTWARE.
-
-******************************************************************/
-
-#include <Types.h>
-#include <Files.h>
-#include <OSUtils.h>
-#include <Resources.h>
-
-#include <string.h>
-
-/* Interface used by parsetok.c */
-#error
-guesstabsize(path)
-       char *path;
-{
-       Str255 s;
-       int refnum;
-       Handle h;
-       int tabsize = 0;
-       
-       /* Very simple case: stdin (pathname empty) */
-       if ( path[0] == '\0' || strcmp(path, "<stdin>") == 0 ) return 0;
-       s[0] = strlen(path);
-       memcpy(s+1, path, s[0]);
-       refnum = OpenResFile(s);
-       if (refnum == -1)
-               return 0;
-       UseResFile(refnum);
-       h = GetIndResource('ETAB', 1);
-       if (h != 0) {
-               tabsize = (*(short**)h)[1];
-       }
-       CloseResFile(refnum);
-       return tabsize;
-}