mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2025-03-10 02:38:50 +00:00
0df5f9fb7e
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@12875 91177308-0d34-0410-b5e6-96231b3b80d8
38 lines
778 B
C
38 lines
778 B
C
/* Copyright (c) 1988 Bellcore
|
|
** All Rights Reserved
|
|
** Permission is granted to copy or use this program, EXCEPT that it
|
|
** may not be sold for profit, the copyright notice must be reproduced
|
|
** on copies, and credit should be given to Bellcore where it is due.
|
|
** BELLCORE MAKES NO WARRANTY AND ACCEPTS NO LIABILITY FOR THIS PROGRAM.
|
|
*/
|
|
|
|
|
|
#ifndef lint
|
|
static char rcsid[]= "$Header$";
|
|
#endif
|
|
|
|
#include "misc.h"
|
|
#include "token.h"
|
|
|
|
K_token _K_ato[K_MAXTOKENS]; /* storage for tokens */
|
|
K_token _K_bto[K_MAXTOKENS];
|
|
|
|
int _K_atm;
|
|
int _K_btm;
|
|
|
|
void
|
|
K_settoken(file,index,pointer)
|
|
int file;
|
|
int index;
|
|
K_token pointer;
|
|
{
|
|
if (file)
|
|
{
|
|
_K_bto[index] = pointer;
|
|
}
|
|
else
|
|
{
|
|
_K_ato[index] = pointer;
|
|
}
|
|
}
|