Xref: news2.mv.net comp.os.msdos.djgpp:2856
From: Robert Hoehne <Robert DOT Hoehne AT Mathematik DOT tu-chemnitz DOT de>
Newsgroups: comp.os.msdos.djgpp
Subject: Bug in FSDB
Date: Thu, 18 Apr 1996 15:37:39 +0200
Organization: TU Chemnitz-Zwickau
Lines: 59
Message-ID: <317645A3.310@Mathematik.tu-chemnitz.de>
NNTP-Posting-Host: tantalus-e.hrz.tu-chemnitz.de
Mime-Version: 1.0
Content-Type: multipart/mixed; boundary="------------51196FFB7D30"
CC: terra AT diku DOT dk
To: djgpp AT delorie DOT com
DJ-Gateway: from newsgroup comp.os.msdos.djgpp

This is a multi-part message in MIME format.

--------------51196FFB7D30
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit

I found a bug in FSDB. This bug occours only, when specifying
more than one directory for searching the source files, either
with the environment variable or in the command line.

This bug is in file 'unassmbl.c' in function 'cache_fopen'. I include
here a patch, which should work.

Robert
-- 
*****************************************************************
* Robert Hoehne, Fakultaet fuer Mathematik, TU-Chemnitz-Zwickau *
* Post:    Am Berg 3, D-09573 Dittmannsdorf                     *
* e-Mail:  Robert DOT Hoehne AT Mathematik DOT TU-Chemnitz DOT DE              *
* WWW:     http://www.tu-chemnitz.de/~rho                       *
*****************************************************************

--------------51196FFB7D30
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Content-Disposition: inline; filename="unassmbl.dif"

*** i:unassmbl.c	Thu Mar 30 08:00:12 1995
--- unassmbl.c	Thu Apr 18 14:44:04 1996
***************
*** 938,944 ****
    while (f == NULL && s && *s)
      {
        t = index (s, ';');
!       l = t ? t - u - 1 : strlen (s);
        strncpy (u, s, l);
        if (l > 0 && u[l - 1] != '/' && u[l - 1] != '\\')
  	u[l++] = '/';
--- 938,944 ----
    while (f == NULL && s && *s)
      {
        t = index (s, ';');
!       l = t ? t - s : strlen (s);
        strncpy (u, s, l);
        if (l > 0 && u[l - 1] != '/' && u[l - 1] != '\\')
  	u[l++] = '/';
***************
*** 946,951 ****
--- 946,952 ----
        strcat (u, name);
        f = myfopen1 (u);
        s = t;
+       if (s) s++;
      }
  #endif
    return f;

--------------51196FFB7D30--