/**
 * Invoke this from the command line with
 *
 *    a.out very-simple-tst.rsl
 *
 * It should output "First module name: M".
 *
 */

#include "trans-interface.h"

main(int argc, char** argv) {

    TransInterface* ti = new TransInterface(argc, argv);


    if ((result = ti->Translate(argc, argv)) == 1) {
	AccessSymbolTables();
    }

    fprintf(stderr, "Translator failed");

}


/**
 * Grab a few simple symtab access calls from rsl-to-dict.C and print out what
 * they return.
 */
void AccessSymbolTables() {

    EntityStruct* e;
    e = mods->Enum();
    printf("First module name: %s\n", e->GetName());

}