riscv
/
alliance
mirror of https://gitlab.lip6.fr/vlsi-eda/alliance.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

- same small modif

This commit is contained in:
Ludovic Jacomme 2004-07-30 13:39:58 +00:00
parent 352883a22b
commit 44daffd2a4
1 changed files with 16 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
alliance/src/loon/src/lon_lib_matching.c
View File

@ -36,13 +36,7 @@
#include "lon_lib_matching.h" #include "lon_lib_matching.h"
/*size of memory block*/ static authtable* HTABLE = NULL;
#define BLOCK 256
static authtable* HTABLE;
/******************************************************************************/ /******************************************************************************/
/* return 0, if there is already a variable with pattern */ /* return 0, if there is already a variable with pattern */
@ -59,7 +53,7 @@ static int relation_between(chain_list* expr, char* pattern)
else return 0; else return 0;
} }
addauthelem(HTABLE, pattern,(int)expr); addauthelem(HTABLE, pattern,(long)expr);
return 1; return 1;
} }
@ -131,13 +125,23 @@ extern int pattern_matching(chain_list* expr, chain_list* pattern)
exit(1); exit(1);
} }
HTABLE=createauthtable (BLOCK); if ( HTABLE == (authtable *)0 )
{
HTABLE=createauthtable ( 13 );
}
else
{
resetauthtable( HTABLE );
}
ret=loc_pattern_matching(expr,pattern); ret=loc_pattern_matching(expr,pattern);
/*free table*/
if ( HTABLE->TABLE_SIZE > 50 )
{
destroyauthtable( HTABLE ); destroyauthtable( HTABLE );
HTABLE=NULL; HTABLE = (authtable *)0;
}
return ret; return ret;
} }