X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=macro.c;h=4232f1af60e53d323e20ebb242e0c23c02529f59;hp=39c31ef235cdb7122f8ad1691023101b1de5327c;hb=c74d8ef6f193cb2be876c920c5cb7f599dd5418a;hpb=3f2bccb78ab4cd59654d521c8aedfe5512ee6608 diff --git a/macro.c b/macro.c index 39c31ef..4232f1a 100644 --- a/macro.c +++ b/macro.c @@ -3,7 +3,7 @@ // MACRO.C - Macro Definition and Invocation // Copyright (C) 199x Landon Dyer, 2011 Reboot and Friends // RMAC derived from MADMAC v1.07 Written by Landon Dyer, 1986 -// Source Utilised with the Kind Permission of Landon Dyer +// Source utilised with the kind permission of Landon Dyer // #include "macro.h" @@ -53,7 +53,12 @@ void InitMacro(void) // int ExitMacro(void) { -#warning !!! Bad macro exiting !!! +#ifndef _MSC_VER +#pragma message !!! Bad macro exiting !!! +#else +#pragma WARNING(!!! Bad macro exiting !!!) +#endif + /* This is a problem. Currently, the argument logic just keeps the current arguments and doesn't save anything if a new macro is called in the middle @@ -110,8 +115,8 @@ int defmac2(char * argname) // int defmac1(char * ln, int notEndFlag) { - PTR p; - LONG len; +// PTR p; +// LONG len; if (list_flag) { @@ -248,7 +253,11 @@ int defr1(char * ln, int kwno) rptlevel++; default: //MORE stupidity here... -#warning "!!! Casting (char *) as LONG !!!" +#ifndef _MSC_VER +#pragma warning "!!! Casting (char *) as LONG !!!" +#else +#pragma WARNING(!!! Casting (char *) as LONG !!!) +#endif addln: // Allocate length of line + 1('\0') + LONG len = strlen(ln) + 1 + sizeof(LONG); @@ -448,7 +457,7 @@ int InvokeMacro(SYM * mac, WORD siz) TOKEN * dest; int stringNum = 0; int argumentNum = 0; - int i; +// int i; for(dry_run=1; ; dry_run--) {