Move all attributes and other information that is attached to a token into a

[cc65] / src / ca65 / fragment.c

diff --git a/src/ca65/fragment.c b/src/ca65/fragment.c
index 0d5a4b2e51801f9f2cbaeabcb4755bf0b99c6f0e..6ee4dad8b3c493b2e87f28dfd6aaae969a1fa47c 100644 (file)
--- a/src/ca65/fragment.c
+++ b/src/ca65/fragment.c
@@ -6,10 +6,10 @@
 /*                                                                           */
 /*                                                                           */
 /*                                                                           */
-/* (C) 1998-2003 Ullrich von Bassewitz                                       */
-/*               Römerstrasse 52                                             */
-/*               D-70794 Filderstadt                                         */
-/* EMail:        uz@cc65.org                                                 */
+/* (C) 1998-2011, Ullrich von Bassewitz                                      */
+/*                Roemerstrasse 52                                           */
+/*                D-70794 Filderstadt                                        */
+/* EMail:         uz@cc65.org                                                */
 /*                                                                           */
 /*                                                                           */
 /* This software is provided 'as-is', without any expressed or implied       */
@@ -60,7 +60,7 @@ Fragment* NewFragment (unsigned char Type, unsigned short Len)
     /* Initialize it */
     F->Next    = 0;
     F->LineList = 0;
-    F->Pos     = CurPos;
+    F->Pos     = CurTok.Pos;
     F->LI       = UseLineInfo (CurLineInfo);
     F->Len     = Len;
     F->Type    = Type;