#include <stdio.h>
#include <setjmp.h>
#include <string.h>
-#include <alloc.h>
+#include <stdlib.h>
#include "asm.h"
+#include "strcmpi.h"
/*)Module assym.c
*
struct mne **mpp;
register struct sym *sp;
struct sym **spp;
- register h;
+ register int h;
mpp = &mnehash[0];
while (mpp < &mnehash[NHASH])
char *id;
{
register struct mne *mp;
- register h;
+ register int h;
h = hash(id);
mp = mnehash[h];
while (mp) {
- if (symeq(id, mp->m_id))
+ if (as_strcmpi(id, mp->m_id) == 0) /* JLH: case insensitive */
return (mp);
mp = mp->m_mp;
}
char *id;
{
register struct sym *sp;
- register h;
+ register int h;
h = hash(id);
sp = symhash[h];
symglob()
{
register struct sym *sp;
- register i;
+ register int i;
for (i=0; i<NHASH; ++i) {
sp = symhash[i];
allglob()
{
register struct sym *sp;
- register i;
+ register int i;
for (i=0; i<NHASH; ++i) {
sp = symhash[i];
symeq(p1, p2)
register char *p1, *p2;
{
- register n;
+ register int n;
n = NCPS;
do {
if (*p1++ != *p2++)
return (0);
#else
- if (ccase[*p1++] != ccase[*p2++])
+ if (ccase[(unsigned char)(*p1++)] != ccase[(unsigned char)(*p2++)])
return (0);
#endif
* side effects:
* none
*/
-
+
int
hash(p)
register char *p;
{
- register h, n;
+ register int h, n;
h = 0;
n = NCPS;
#if CASE_SENSITIVE
h += *p++;
#else
- h += ccase[*p++];
+ h += ccase[(unsigned char)(*p++)];
#endif
} while (--n);