1 | /*****************************************************************************/ |
2 | /* */ |
3 | /* asmlabel.c */ |
4 | /* */ |
5 | /* Generate assembler code labels */ |
6 | /* */ |
7 | /* */ |
8 | /* */ |
9 | /* (C) 2000-2009 Ullrich von Bassewitz */ |
10 | /* Roemerstrasse 52 */ |
11 | /* D-70794 Filderstadt */ |
12 | /* EMail: uz@cc65.org */ |
13 | /* */ |
14 | /* */ |
15 | /* This software is provided 'as-is', without any expressed or implied */ |
16 | /* warranty. In no event will the authors be held liable for any damages */ |
17 | /* arising from the use of this software. */ |
18 | /* */ |
19 | /* Permission is granted to anyone to use this software for any purpose, */ |
20 | /* including commercial applications, and to alter it and redistribute it */ |
21 | /* freely, subject to the following restrictions: */ |
22 | /* */ |
23 | /* 1. The origin of this software must not be misrepresented; you must not */ |
24 | /* claim that you wrote the original software. If you use this software */ |
25 | /* in a product, an acknowledgment in the product documentation would be */ |
26 | /* appreciated but is not required. */ |
27 | /* 2. Altered source versions must be plainly marked as such, and must not */ |
28 | /* be misrepresented as being the original software. */ |
29 | /* 3. This notice may not be removed or altered from any source */ |
30 | /* distribution. */ |
31 | /* */ |
32 | /*****************************************************************************/ |
33 | |
34 | |
35 | |
36 | #include <stdio.h> |
37 | #include <string.h> |
38 | |
39 | /* common */ |
40 | #include "chartype.h" |
41 | |
42 | /* cc65 */ |
43 | #include "asmlabel.h" |
44 | #include "error.h" |
45 | |
46 | |
47 | |
48 | /*****************************************************************************/ |
49 | /* Code */ |
50 | /*****************************************************************************/ |
51 | |
52 | |
53 | |
54 | unsigned GetLocalLabel (void) |
55 | /* Get an unused label. Will never return zero. */ |
56 | { |
57 | /* Number to generate unique labels */ |
58 | static unsigned NextLabel = 0; |
59 | |
60 | /* Check for an overflow */ |
61 | if (NextLabel >= 0xFFFF) { |
62 | Internal ("Local label overflow" ); |
63 | } |
64 | |
65 | /* Return the next label */ |
66 | return ++NextLabel; |
67 | } |
68 | |
69 | |
70 | |
71 | const char* LocalLabelName (unsigned L) |
72 | /* Make a label name from the given label number. The label name will be |
73 | ** created in static storage and overwritten when calling the function |
74 | ** again. |
75 | */ |
76 | { |
77 | static char Buf[64]; |
78 | sprintf (Buf, "L%04X" , L); |
79 | return Buf; |
80 | } |
81 | |
82 | |
83 | |
84 | int IsLocalLabelName (const char* Name) |
85 | /* Return true if Name is the name of a local label */ |
86 | { |
87 | unsigned I; |
88 | |
89 | if (Name[0] != 'L' || strlen (Name) != 5) { |
90 | return 0; |
91 | } |
92 | for (I = 1; I <= 4; ++I) { |
93 | if (!IsXDigit (Name[I])) { |
94 | return 0; |
95 | } |
96 | } |
97 | |
98 | /* Local label name */ |
99 | return 1; |
100 | } |
101 | |