#include <iostream>
#include <string>
#include "token.h"
#include "lexan.h"

void lexan::unnext(token t)
{ oldtoken = t;
  useoldtoken = true; }

token lexan::next()
{ if (useoldtoken)
  { useoldtoken = false;
    return oldtoken; }
  char c = ' ';
  while (c == ' ')
    c = in.get();
  if (in.fail())
    return token::end();

  switch (c)
  { case 'a': case 'j': case 's': case 'A': case 'J': case 'S': 
    case 'b': case 'k': case 't': case 'B': case 'K': case 'T': 
    case 'c': case 'l': case 'u': case 'C': case 'L': case 'U': 
    case 'd': case 'm': case 'v': case 'D': case 'M': case 'V': 
    case 'e': case 'n': case 'w': case 'E': case 'N': case 'W': 
    case 'f': case 'o': case 'x': case 'F': case 'O': case 'X': 
    case 'g': case 'p': case 'y': case 'G': case 'P': case 'Y': 
    case 'h': case 'q': case 'z': case 'H': case 'Q': case 'Z': 
    case 'i': case 'r':           case 'I': case 'R': 
    { string t;
      while (isalpha(c))
      { t += (char) tolower(c);
        c = in.get(); }
      in.unget();
      return token::var(t); }

    case '0': case '1': case '2': case '3': case '4': 
    case '5': case '6': case '7': case '8': case '9': 
    { int v = 0;
      while (isdigit(c))
      { v = v * 10 + digittoint(c);
        c = in.get(); }
      in.unget();
      return token::num(v); }

    case '+': case '-': case '*': case '/': case '^': 
    case '(': case ')':
      return token::op(string(1, c));

    case '\n':
      return token::end();

    default:
    { cout << "Bad character '" << c << "' at beginning of token\n";
      return token::end(); } } }