/*****************************************************************************/
/* */
-/* toklist.c */
+/* toklist.c */
/* */
-/* Token list for the ca65 macroassembler */
+/* Token list for the ca65 macroassembler */
/* */
/* */
/* */
/*****************************************************************************/
-/* Code */
+/* Code */
/*****************************************************************************/
/* Compare the token given as parameter against the current token */
{
if (N->T.Tok != CurTok.Tok) {
- /* Different token */
- return tcDifferent;
+ /* Different token */
+ return tcDifferent;
}
/* If the token has string attribute, check it */
if (TokHasSVal (N->T.Tok)) {
- if (SB_Compare (&CurTok.SVal, &N->T.SVal) != 0) {
- return tcSameToken;
- }
+ if (SB_Compare (&CurTok.SVal, &N->T.SVal) != 0) {
+ return tcSameToken;
+ }
} else if (TokHasIVal (N->T.Tok)) {
- if (N->T.IVal != CurTok.IVal) {
- return tcSameToken;
- }
+ if (N->T.IVal != CurTok.IVal) {
+ return tcSameToken;
+ }
}
/* Tokens are identical */
TokList* T = xmalloc (sizeof (TokList));
/* Initialize the fields */
- T->Next = 0;
- T->Root = 0;
- T->Last = 0;
- T->RepCount = 0;
- T->RepMax = 1;
- T->Count = 0;
- T->Check = 0;
- T->Data = 0;
+ T->Next = 0;
+ T->Root = 0;
+ T->Last = 0;
+ T->RepCount = 0;
+ T->RepMax = 1;
+ T->Count = 0;
+ T->Check = 0;
+ T->Data = 0;
T->LI = 0;
/* Return the new list */
/* Free the token list */
TokNode* T = List->Root;
while (T) {
- TokNode* Tmp = T;
- T = T->Next;
- FreeTokNode (Tmp);
+ TokNode* Tmp = T;
+ T = T->Next;
+ FreeTokNode (Tmp);
}
/* Free associated line info */
/* If we have associated data, free it */
if (List->Data) {
- xfree (List->Data);
+ xfree (List->Data);
}
/* Free the list structure itself */
enum token_t GetTokListTerm (enum token_t Term)
/* Determine if the following token list is enclosed in curly braces. This is
- * the case if the next token is the opening brace. If so, skip it and return
- * a closing brace, otherwise return Term.
- */
+** the case if the next token is the opening brace. If so, skip it and return
+** a closing brace, otherwise return Term.
+*/
{
if (CurTok.Tok == TOK_LCURLY) {
NextTok ();
/* Insert the node into the list */
if (List->Root == 0) {
- List->Root = T;
+ List->Root = T;
} else {
- List->Last->Next = T;
+ List->Last->Next = T;
}
List->Last = T;
static int ReplayTokList (void* List)
/* Function that gets the next token from a token list and sets it. This
- * function may be used together with the PushInput function from the istack
- * module.
- */
+** function may be used together with the PushInput function from the istack
+** module.
+*/
{
/* Cast the generic pointer to an actual list */
TokList* L = List;
/* If there are no more tokens, decrement the repeat counter. If it goes
- * zero, delete the list and remove the function from the stack.
- */
+ ** zero, delete the list and remove the function from the stack.
+ */
if (L->Last == 0) {
- if (++L->RepCount >= L->RepMax) {
- /* Done with this list */
- FreeTokList (L);
+ if (++L->RepCount >= L->RepMax) {
+ /* Done with this list */
+ FreeTokList (L);
--PushCounter;
- PopInput ();
+ PopInput ();
return 0;
- } else {
- /* Replay one more time */
- L->Last = L->Root;
- }
+ } else {
+ /* Replay one more time */
+ L->Last = L->Root;
+ }
}
/* Set the next token from the list */
L->LI = StartLine (&CurTok.Pos, LI_TYPE_ASM, PushCounter);
/* If a check function is defined, call it, so it may look at the token
- * just set and changed it as apropriate.
- */
+ ** just set and changed it as apropriate.
+ */
if (L->Check) {
- L->Check (L);
+ L->Check (L);
}
/* Set the pointer to the next token */
void PushTokList (TokList* List, const char* Desc)
/* Push a token list to be used as input for InputFromStack. This includes
- * several initializations needed in the token list structure, so don't use
- * PushInput directly.
- */
+** several initializations needed in the token list structure, so don't use
+** PushInput directly.
+*/
{
/* If the list is empty, just delete it and bail out */
if (List->Count == 0) {
- FreeTokList (List);
- return;
+ FreeTokList (List);
+ return;
}
/* Reset the last pointer to the first element */
++PushCounter;
PushInput (ReplayTokList, List, Desc);
}
-
-
-