From 2fe7bbea072642cdb942bc1008f2b0b77282ea3c Mon Sep 17 00:00:00 2001
From: Dustin Mitchell <djmitche@users.sourceforge.net>
Date: Wed, 19 Jan 2000 05:48:41 +0000
Subject: [PATCH] Fixed a bunch more errors; Seek doesn't work

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@115 626c5289-ae23-0410-ae9c-e8d60b6d4f22
---
 SWIG/Source/Swig/super.c | 17 +++++++----------
 1 file changed, 7 insertions(+), 10 deletions(-)

diff --git a/SWIG/Source/Swig/super.c b/SWIG/Source/Swig/super.c
index eb35443e7..6fcdc1f70 100644
--- a/SWIG/Source/Swig/super.c
+++ b/SWIG/Source/Swig/super.c
@@ -78,12 +78,12 @@ static int Super_read(DOH *s, void *buffer, int length);
 static long Super_tell(DOH *s);
  static int Super_putc(DOH *s, int ch);
 static int Super_getc(DOH *s);
- static int Super_ungetc(DOH *s, int ch);
+static int Super_ungetc(DOH *s, int ch);
  static int Super_replace(DOH *str, DOH *token, DOH *rep, int flags);    
- static void Super_setfile(DOH *s, DOH *f);
- static void Super_setline(DOH *s, int);
- static DOH * Super_getfile(DOH *s);
- static int Super_getline(DOH *s);
+static void Super_setfile(DOH *s, DOH *f);
+static void Super_setline(DOH *s, int);
+static DOH * Super_getfile(DOH *s);
+static int Super_getline(DOH *s);
  static void Super_chop(DOH *str);
 
 /* internal functions */
@@ -757,8 +757,6 @@ Super_chop(DOH *so) {
    int len, tag, offset;
    Super *s = (Super *) so;
   
-   /* check this one for obiwans */
-
    s->hashkey = -1;
    s->pbi = 0;
 
@@ -775,9 +773,8 @@ Super_chop(DOH *so) {
    tag = Super_get_tag(s, len, &offset);
 
    /* Delete any relevant tags... */
-   while (--s->numtags > tag)
-      Delete(s->tags[s->numtags].filename);
-   s->numtags++;
+   while (s->numtags > tag + 1)
+     Super_delete_tag(s, --s->numtags);
    s->tags[tag].length = offset;
 
    s->len = len;