mirror of
https://github.com/RTimothyEdwards/netgen.git
synced 2026-08-25 15:37:39 +02:00
Compare commits
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
da3b96ae9e | ||
|
|
8a2bbe0723 | ||
|
|
a0c49a026a | ||
|
|
1520e276bc | ||
|
|
665203bba1 |
+3
-1
@@ -164,8 +164,10 @@ unsigned long hashcase(char *s, int hashsize)
|
||||
unsigned long genhash(char *s, int c, int hashsize)
|
||||
{
|
||||
unsigned long hashval = 2166136261ul;
|
||||
hashval ^= (unsigned long)c;
|
||||
hashval *= 16777619ul;
|
||||
for (; *s != '\0'; s++) {
|
||||
hashval ^= (unsigned long)c;
|
||||
hashval ^= (unsigned char)(*s);
|
||||
hashval *= 16777619ul;
|
||||
}
|
||||
return (hashsize == 0) ? hashval : (hashval % hashsize);
|
||||
|
||||
+1
-1
@@ -52,7 +52,7 @@ the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
|
||||
|
||||
#ifdef TCL_NETGEN
|
||||
int InterruptPending = 0;
|
||||
void (*oldinthandler)() = SIG_DFL;
|
||||
void (*oldinthandler)(int) = SIG_DFL;
|
||||
extern Tcl_Interp *netgeninterp;
|
||||
extern int check_interrupt();
|
||||
#endif
|
||||
|
||||
Reference in New Issue
Block a user