]> git.sur5r.net Git - cc65/blobdiff - src/cc65/goto.c
Cleanup. Added a few general purpose functions.
[cc65] / src / cc65 / goto.c
index 5d6290004f674781b683eb77ccfb8214e7747c40..33d056f9a1551b70863af7cc976e82c1ddceb92e 100644 (file)
 
 
 
-void DoGoto (void)
+void GotoStatement (void)
 /* Process a goto statement. */
 {
     /* Eat the "goto" */
     NextToken ();
 
     /* Label name must follow */
-    if (curtok != TOK_IDENT) {
+    if (CurTok.Tok != TOK_IDENT) {
 
-               Error (ERR_IDENT_EXPECTED);
+               Error ("Label name expected");
 
     } else {
 
@@ -80,7 +80,7 @@ void DoLabel (void)
     SymEntry* Entry = AddLabelSym (CurTok.Ident, SC_DEF);
 
     /* Emit the jump label */
-    g_defloclabel (Entry->V.Label);
+    g_defcodelabel (Entry->V.Label);
 
     /* Eat the ident and colon */
     NextToken ();