freem/src/symtab_bltin.c - diff

Return to symtab_bltin.c CVS log

Up to [Coherent Logic Development] / freem / src

version 1.8, 2025/04/04 12:46:13	version 1.10, 2025/04/10 01:24:39
Line 24	Line 24
* along with FreeM. If not, see <https://www.gnu.org/licenses/>.	* along with FreeM. If not, see <https://www.gnu.org/licenses/>.
*	*
* $Log$	* $Log$
	* Revision 1.10 2025/04/10 01:24:39 snw
	* Remove C++ style comments
	*
	* Revision 1.9 2025/04/09 19:52:02 snw
	* Eliminate as many warnings as possible while building with -Wall
	*
* Revision 1.8 2025/04/04 12:46:13 snw	* Revision 1.8 2025/04/04 12:46:13 snw
* Patch Solaris 8 crash and bump version to 0.63.1-rc1	* Patch Solaris 8 crash and bump version to 0.63.1-rc1
*	*
Line 591 no_with:	Line 597 no_with:
/* OLD get_sym routine */	/* OLD get_sym routine */
if ((i = alphptr[(int) key[0]])) {	if ((i = alphptr[(int) key[0]])) {

// printf ("alphptr match; writing_mb = %d\r\n", writing_mb);	/* printf ("alphptr match; writing_mb = %d\r\n", writing_mb); */

k = 1;	k = 1;
j = i + 1; /* first char always matches! */	j = i + 1; /* first char always matches! */
Line 634 no_with:	Line 640 no_with:

} while (i < PSIZE);	} while (i < PSIZE);
}	}
	else {
	printf ("alphptr not found\r\n");
	}

merr_raise (M6);	merr_raise (M6);
data[0] = EOL;	data[0] = EOL;
Line 1841 zinvend:	Line 1850 zinvend:
*newptr++ = k1;	*newptr++ = k1;
*newptr++ = set_sym;	*newptr++ = set_sym;

//if (mcmnd != ZNEW) test = FALSE;	/if (mcmnd != ZNEW) test = FALSE; /

return;	return;