Mercurial > hg-old > index.cgi

comparison lwasm/main.c @ 230:0df2a39a268c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added --6809/--6309 switches and some cleanups in error reporting
author lost
date Fri, 12 Jun 2009 03:18:32 +0000
parents bae1e3ecdce1
children a58f49a77441
comparison
equal deleted inserted replaced
229:59a138df0401 230:0df2a39a268c
108 if (!p) 108 if (!p)
109 { 109 {
110 fprintf(stderr, "Invalid pragma string: %s\n", arg); 110 fprintf(stderr, "Invalid pragma string: %s\n", arg);
111 exit(1); 111 exit(1);
112 } 112 }
113 break;
114
115 case '9':
116 as -> no6309 = 1;
117 break;
118
119 case '3':
120 as -> no6309 = 0;
113 break; 121 break;
114 122
115 case ARGP_KEY_END: 123 case ARGP_KEY_END:
116 // done; sanity check 124 // done; sanity check
117 if (!as -> outfile) 125 if (!as -> outfile)
147 "Generate raw binary format output, equivalent of --format=raw"}, 155 "Generate raw binary format output, equivalent of --format=raw"},
148 { "obj", 0x100, 0, 0, 156 { "obj", 0x100, 0, 0,
149 "Generate proprietary object file format for later linking, equivalent of --format=obj" }, 157 "Generate proprietary object file format for later linking, equivalent of --format=obj" },
150 { "pragma", 'p', "PRAGMA", 0, 158 { "pragma", 'p', "PRAGMA", 0,
151 "Set an assembler pragma to any value understood by the \"pragma\" pseudo op"}, 159 "Set an assembler pragma to any value understood by the \"pragma\" pseudo op"},
160 { "6809", '9', 0, 0,
161 "Set assembler to 6809 only mode" },
162 { "6309", '3', 0, 0,
163 "Set assembler to 6309 mode (default)" },
152 { 0 } 164 { 0 }
153 }; 165 };
154 166
155 static struct argp argp = 167 static struct argp argp =
156 { 168 {