freem/src/symtab_dispatch.c - diff

Return to symtab_dispatch.c CVS log

Up to [Coherent Logic Development] / freem / src

version 1.3, 2025/03/09 19:50:47	version 1.4, 2025/03/27 03:27:35
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.4 2025/03/27 03:27:35 snw
	* Install init scripts to share/freem/examples/init and fix regression in method dispatch
	*
* Revision 1.3 2025/03/09 19:50:47 snw	* Revision 1.3 2025/03/09 19:50:47 snw
* Second phase of REUSE compliance and header reformat	* Second phase of REUSE compliance and header reformat
*	*
Line 70 void symtab (short action, char *key, ch	Line 73 void symtab (short action, char *key, ch

if (r->subscript_count == 0 && action == kill_sym) {	if (r->subscript_count == 0 && action == kill_sym) {

if (destructor_ct < 10) {	if (destructor_ct < 10) {
snprintf (destructors[destructor_ct++], 50, "DESTROY^%%SYSOOP(\"%s\",.%s)", t_cls, r->name);	snprintf (destructors[destructor_ct++], 50, "DESTROY^%%SYSOOP(\"%s\",.%s)", t_cls, r->name);
}	}