Mercurial > hg-old > index.cgi
annotate src/lwasm.c @ 26:d2e86babd958
Added error tracking infrastructure
| author | lost |
|---|---|
| date | Fri, 02 Jan 2009 02:38:02 +0000 |
| parents | 05d4115b4860 |
| children | f736579569b4 |
| rev | line source |
|---|---|
| 0 | 1 /* |
|
4
34568fab6058
Fixed package to include all required files; also added copyright preamble to all source files
lost
parents:
0
diff
changeset
|
2 lwasm.c |
|
34568fab6058
Fixed package to include all required files; also added copyright preamble to all source files
lost
parents:
0
diff
changeset
|
3 Copyright © 2008 William Astle |
|
34568fab6058
Fixed package to include all required files; also added copyright preamble to all source files
lost
parents:
0
diff
changeset
|
4 |
|
34568fab6058
Fixed package to include all required files; also added copyright preamble to all source files
lost
parents:
0
diff
changeset
|
5 This file is part of LWASM. |
|
34568fab6058
Fixed package to include all required files; also added copyright preamble to all source files
lost
parents:
0
diff
changeset
|
6 |
|
34568fab6058
Fixed package to include all required files; also added copyright preamble to all source files
lost
parents:
0
diff
changeset
|
7 LWASM is free software: you can redistribute it and/or modify it under the |
|
34568fab6058
Fixed package to include all required files; also added copyright preamble to all source files
lost
parents:
0
diff
changeset
|
8 terms of the GNU General Public License as published by the Free Software |
|
34568fab6058
Fixed package to include all required files; also added copyright preamble to all source files
lost
parents:
0
diff
changeset
|
9 Foundation, either version 3 of the License, or (at your option) any later |
|
34568fab6058
Fixed package to include all required files; also added copyright preamble to all source files
lost
parents:
0
diff
changeset
|
10 version. |
|
34568fab6058
Fixed package to include all required files; also added copyright preamble to all source files
lost
parents:
0
diff
changeset
|
11 |
|
34568fab6058
Fixed package to include all required files; also added copyright preamble to all source files
lost
parents:
0
diff
changeset
|
12 This program is distributed in the hope that it will be useful, but WITHOUT |
|
34568fab6058
Fixed package to include all required files; also added copyright preamble to all source files
lost
parents:
0
diff
changeset
|
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
|
34568fab6058
Fixed package to include all required files; also added copyright preamble to all source files
lost
parents:
0
diff
changeset
|
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for |
|
34568fab6058
Fixed package to include all required files; also added copyright preamble to all source files
lost
parents:
0
diff
changeset
|
15 more details. |
|
34568fab6058
Fixed package to include all required files; also added copyright preamble to all source files
lost
parents:
0
diff
changeset
|
16 |
|
34568fab6058
Fixed package to include all required files; also added copyright preamble to all source files
lost
parents:
0
diff
changeset
|
17 You should have received a copy of the GNU General Public License along with |
|
34568fab6058
Fixed package to include all required files; also added copyright preamble to all source files
lost
parents:
0
diff
changeset
|
18 this program. If not, see <http://www.gnu.org/licenses/>. |
|
34568fab6058
Fixed package to include all required files; also added copyright preamble to all source files
lost
parents:
0
diff
changeset
|
19 |
| 26 | 20 |
| 21 Contains random functions used by the assembler | |
|
4
34568fab6058
Fixed package to include all required files; also added copyright preamble to all source files
lost
parents:
0
diff
changeset
|
22 */ |
| 0 | 23 |
| 26 | 24 #define __lwasm_c_seen__ |
| 25 | |
| 26 #include <stdarg.h> | |
| 0 | 27 #include <stdlib.h> |
| 26 | 28 #include <stdio.h> |
| 29 | |
| 0 | 30 #include "lwasm.h" |
| 26 | 31 #include "util.h" |
| 0 | 32 |
| 26 | 33 int register_error(asmstate_t *as, lwasm_line_t *l, int pass, const char *fmt, ...) |
| 0 | 34 { |
| 26 | 35 lwasm_error_t *e; |
| 36 va_list args; | |
| 37 char errbuff[1024]; | |
| 38 int r; | |
| 0 | 39 |
| 26 | 40 if (as -> passnum != pass) |
| 41 return; | |
| 42 | |
| 43 va_start(args, fmt); | |
| 0 | 44 |
| 26 | 45 e = lwasm_alloc(sizeof(lwasm_error_t)); |
| 46 | |
| 47 e -> next = l -> err; | |
| 48 l -> err = e; | |
| 0 | 49 |
| 50 as -> errorcount++; | |
| 51 | |
| 26 | 52 r = vsnprintf(errbuff, 1024, fmt, args); |
| 53 e -> mess = lwasm_strdup(errbuff); | |
| 0 | 54 |
| 26 | 55 va_end(args); |
| 0 | 56 |
| 26 | 57 return r; |
| 0 | 58 } |