]> git.sur5r.net Git - cc65/blobdiff - src/cc65/goto.c
Renamed ExprDesc.Val to ExprDesc.IVal. Added an FVal field for a floating
[cc65] / src / cc65 / goto.c
index b18637012f8da3c229c6f95600358b433d6ed945..33d056f9a1551b70863af7cc976e82c1ddceb92e 100644 (file)
 
 
 
-void DoGoto (void)
+void GotoStatement (void)
 /* Process a goto statement. */
 {
     /* Eat the "goto" */
-    gettok ();
+    NextToken ();
 
     /* Label name must follow */
-    if (curtok != IDENT) {
+    if (CurTok.Tok != TOK_IDENT) {
 
-               Error (ERR_IDENT_EXPECTED);
+               Error ("Label name expected");
 
     } else {
 
@@ -68,7 +68,7 @@ void DoGoto (void)
     }
 
     /* Eat the label name */
-    gettok ();
+    NextToken ();
 }
 
 
@@ -80,11 +80,11 @@ 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 */
-    gettok ();
-    gettok ();
+    NextToken ();
+    NextToken ();
 }