1 |
< |
/* Copyright (c) 1991 Regents of the University of California */ |
1 |
> |
/* Copyright (c) 1992 Regents of the University of California */ |
2 |
|
|
3 |
|
#ifndef lint |
4 |
|
static char SCCSid[] = "$SunId$ LBL"; |
155 |
|
int assign; |
156 |
|
double (*fptr)(); |
157 |
|
{ |
158 |
+ |
int oldlibsize = libsize; |
159 |
|
register LIBR *lp; |
160 |
|
|
161 |
|
if ((lp = liblookup(fname)) == NULL) { /* insert */ |
188 |
|
lp[0].atyp = assign; |
189 |
|
lp[0].f = fptr; |
190 |
|
} |
191 |
< |
libupdate(fname); /* relink library */ |
191 |
> |
if (libsize != oldlibsize) |
192 |
> |
libupdate(fname); /* relink library */ |
193 |
|
} |
194 |
|
|
195 |
|
|