comparison lwasm/pragma.c @ 462:da72c084e0ac

Add some more debugging junk.
author William Astle <lost@l-w.ca>
date Wed, 28 Feb 2018 22:40:07 -0700
parents cad5937314cb
children e97f9a302c6a
comparison
equal deleted inserted replaced
461:c8d4f3486ad7 462:da72c084e0ac
108 while (np) 108 while (np)
109 { 109 {
110 p = lw_token(np, ',', &np); 110 p = lw_token(np, ',', &np);
111 debug_message(as, 200, "Setting/resetting pragma %s", p); 111 debug_message(as, 200, "Setting/resetting pragma %s", p);
112 pragma = parse_pragma_helper(p); 112 pragma = parse_pragma_helper(p);
113 debug_message(as, 200, "Got pragma code %08X", pragma);
113 lw_free(p); 114 lw_free(p);
114 115
115 if (pragma == 0 && !ignoreerr) 116 if (pragma == 0 && !ignoreerr)
116 return 0; 117 return 0;
117 118
118 if (pragma & PRAGMA_CLEARBIT) 119 if (pragma & PRAGMA_CLEARBIT)
119 as->pragmas &= ~pragma; 120 as->pragmas &= ~pragma;
120 else 121 else
121 as->pragmas |= pragma; 122 as->pragmas |= pragma;
123
124 debug_message(as, 200, "New pragma state: %08X", as -> pragmas);
122 } 125 }
123 return 1; 126 return 1;
124 } 127 }
125 128
126 PARSEFUNC(pseudo_parse_pragma) 129 PARSEFUNC(pseudo_parse_pragma)