freem/src/cmd_unmap.c - diff

Return to cmd_unmap.c CVS log

Up to [Coherent Logic Development] / freem / src

version 1.3, 2025/03/09 19:14:24	version 1.4, 2025/04/09 19:52:02
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/04/09 19:52:02 snw
	* Eliminate as many warnings as possible while building with -Wall
	*
* Revision 1.3 2025/03/09 19:14:24 snw	* Revision 1.3 2025/03/09 19:14:24 snw
* First phase of REUSE compliance and header reformat	* First phase of REUSE compliance and header reformat
*	*
Line 39	Line 42

MRESULT cmd_unmap(MACTION *ra)	MRESULT cmd_unmap(MACTION *ra)
{	{
char mapping_type;
char mapping_obj[256];	char mapping_obj[256];
char tmp_data[256];	char tmp_data[256];
char tmp_key[256];	char tmp_key[256];
Line 54 MRESULT cmd_unmap(MACTION *ra)	Line 56 MRESULT cmd_unmap(MACTION *ra)

expr (NAME);	expr (NAME);
if (merr ()) return merr ();	if (merr ()) return merr ();

if (stcmp (varnam, "GLOBAL\201") == 0 \|\| stcmp (varnam, "global\201") == 0) {	if (stcmp (varnam, "GLOBAL\201") != 0 && stcmp (varnam, "global\201") != 0 && stcmp (varnam, "ROUTINE\201") != 0 && stcmp (varnam, "routine\201") != 0) {
mapping_type = 'g';
}
else if (stcmp (varnam, "ROUTINE\201") == 0 \|\| stcmp (varnam, "routine\201") == 0) {
mapping_type = 'r';
return ARGLIST;
}
else {
return ARGLIST;	return ARGLIST;
}	}