scully/src/test.cpp

/* The scully programming language.
 *
 * Copyright (c) Peter Dahlberg, Markus Hauschild and Florian Sattler, 2013.
 * Licensed under the GNU GPL v2.
 */

#include "Token.h"

// this file is auto generated from grammar/grammar.y
#include "grammar.h"

#include "lexertl/generator.hpp"
#include "lexertl/lookup.hpp"
#include "lexertl/rules.hpp"
#include "lexertl/state_machine.hpp"

int main() {
	lexertl::rules rules;
	lexertl::state_machine state_machine;

	//keywords
	rules.add("bool", T_BOOL);
	rules.add("for", T_FOR);
	rules.add("if", T_IF);
	rules.add("int", T_INT);
	rules.add("return", T_RETURN);
	rules.add("void", T_VOID);
	rules.add("rfor", T_RFOR);
	rules.add("rif", T_RIF);

	// special characters
	rules.add("\"(\"", T_LPAREN);
	rules.add("\")\"", T_RPAREN);
	rules.add("mulder", T_BEGIN);
	rules.add("scully", T_END);
	rules.add(",", T_COMMA);
	rules.add(";", T_SEMICOLON);

	// operators
	rules.add("=", T_ASSIGN);
	rules.add("==", T_EQUALS);
	rules.add("<", T_LESS);
	rules.add("\"+\"", T_PLUS);
	rules.add("\"-\"", T_MINUS);
	rules.add("\"*\"", T_TIMES);
	rules.add("\"/\"", T_DIV);

	// constants
	rules.add("true", T_TRUE);
	rules.add("false", T_FALSE);
	rules.add("\\d+", T_CINT);

	// identifier
	rules.add("[a-zA-Z_][a-zA-Z_0-9]*", T_IDENTIFIER);

	// whitespace
	rules.add("\\s+", T_WHITESPACE);

	lexertl::generator::build(rules, state_machine);
	state_machine.minimise();

	std::cout << "The scully programming language v0.1" << std::endl;

	void* parser = scullyParserAlloc(malloc);

	while (true) {
		std::cout << "> ";
		std::string input;
		std::getline(std::cin, input);
		if (std::cin.eof()) {
			std::cout << std::endl << "Bye." << std::endl;
			return 0;
		}

		auto iter = input.begin();
		auto end = input.end();
		lexertl::smatch results(iter, end);

		do {
			lexertl::lookup (state_machine, results);
			std::string s(results.start, results.end);
			if (results.id != T_WHITESPACE) {
				std::cout << "Id: " << results.id << ", Token: " << s << std::endl;
				scullyParser(parser, results.id, new Token(s));
			}
		} while (results.id != 0);
	}

	scullyParserFree(parser, free);
	return 0;
}