| @@ -1,15 +1,15 @@ | | | @@ -1,15 +1,15 @@ |
1 | %{ | | 1 | %{ |
2 | /* $NetBSD: scan.l,v 1.112 2021/01/04 22:26:50 rillig Exp $ */ | | 2 | /* $NetBSD: scan.l,v 1.113 2021/01/05 17:13:44 rillig Exp $ */ |
3 | | | 3 | |
4 | /* | | 4 | /* |
5 | * Copyright (c) 1996 Christopher G. Demetriou. All Rights Reserved. | | 5 | * Copyright (c) 1996 Christopher G. Demetriou. All Rights Reserved. |
6 | * Copyright (c) 1994, 1995 Jochen Pohl | | 6 | * Copyright (c) 1994, 1995 Jochen Pohl |
7 | * All Rights Reserved. | | 7 | * All Rights Reserved. |
8 | * | | 8 | * |
9 | * Redistribution and use in source and binary forms, with or without | | 9 | * Redistribution and use in source and binary forms, with or without |
10 | * modification, are permitted provided that the following conditions | | 10 | * modification, are permitted provided that the following conditions |
11 | * are met: | | 11 | * are met: |
12 | * 1. Redistributions of source code must retain the above copyright | | 12 | * 1. Redistributions of source code must retain the above copyright |
13 | * notice, this list of conditions and the following disclaimer. | | 13 | * notice, this list of conditions and the following disclaimer. |
14 | * 2. Redistributions in binary form must reproduce the above copyright | | 14 | * 2. Redistributions in binary form must reproduce the above copyright |
15 | * notice, this list of conditions and the following disclaimer in the | | 15 | * notice, this list of conditions and the following disclaimer in the |
| @@ -25,27 +25,27 @@ | | | @@ -25,27 +25,27 @@ |
25 | * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES | | 25 | * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
26 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. | | 26 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
27 | * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, | | 27 | * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
28 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT | | 28 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
29 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, | | 29 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
30 | * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY | | 30 | * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
31 | * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT | | 31 | * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
32 | * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF | | 32 | * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
33 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | | 33 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
34 | */ | | 34 | */ |
35 | | | 35 | |
36 | #include <sys/cdefs.h> | | 36 | #include <sys/cdefs.h> |
37 | #if defined(__RCSID) && !defined(lint) | | 37 | #if defined(__RCSID) && !defined(lint) |
38 | __RCSID("$NetBSD: scan.l,v 1.112 2021/01/04 22:26:50 rillig Exp $"); | | 38 | __RCSID("$NetBSD: scan.l,v 1.113 2021/01/05 17:13:44 rillig Exp $"); |
39 | #endif | | 39 | #endif |
40 | | | 40 | |
41 | #include <ctype.h> | | 41 | #include <ctype.h> |
42 | #include <errno.h> | | 42 | #include <errno.h> |
43 | #include <float.h> | | 43 | #include <float.h> |
44 | #include <limits.h> | | 44 | #include <limits.h> |
45 | #include <math.h> | | 45 | #include <math.h> |
46 | #include <stdlib.h> | | 46 | #include <stdlib.h> |
47 | #include <string.h> | | 47 | #include <string.h> |
48 | | | 48 | |
49 | #include "lint1.h" | | 49 | #include "lint1.h" |
50 | #include "cgram.h" | | 50 | #include "cgram.h" |
51 | | | 51 | |
| @@ -165,26 +165,29 @@ TL ([fFlL]?[i]?) | | | @@ -165,26 +165,29 @@ TL ([fFlL]?[i]?) |
165 | \n incline(); | | 165 | \n incline(); |
166 | \t|" "|\f|\v ; | | 166 | \t|" "|\f|\v ; |
167 | "/*" comment(); | | 167 | "/*" comment(); |
168 | "//" slashslashcomment(); | | 168 | "//" slashslashcomment(); |
169 | . badchar(yytext[0]); | | 169 | . badchar(yytext[0]); |
170 | | | 170 | |
171 | %% | | 171 | %% |
172 | | | 172 | |
173 | static void | | 173 | static void |
174 | incline(void) | | 174 | incline(void) |
175 | { | | 175 | { |
176 | curr_pos.p_line++; | | 176 | curr_pos.p_line++; |
177 | curr_pos.p_uniq = 0; | | 177 | curr_pos.p_uniq = 0; |
| | | 178 | #ifdef DEBUG |
| | | 179 | printf("parsing %s:%d\n", curr_pos.p_file, curr_pos.p_line); |
| | | 180 | #endif |
178 | if (curr_pos.p_file == csrc_pos.p_file) { | | 181 | if (curr_pos.p_file == csrc_pos.p_file) { |
179 | csrc_pos.p_line++; | | 182 | csrc_pos.p_line++; |
180 | csrc_pos.p_uniq = 0; | | 183 | csrc_pos.p_uniq = 0; |
181 | } | | 184 | } |
182 | } | | 185 | } |
183 | | | 186 | |
184 | static void | | 187 | static void |
185 | badchar(int c) | | 188 | badchar(int c) |
186 | { | | 189 | { |
187 | | | 190 | |
188 | /* unknown character \%o */ | | 191 | /* unknown character \%o */ |
189 | error(250, c); | | 192 | error(250, c); |
190 | } | | 193 | } |