/*
 * Top-level of a graphics-only version of the rsl browsers.  Also useful as
 * the stand-alone ridraw interface, since at present, we can't easily make an
 * unhooked standalone ridraw in ../ridraw.
 */

#include <stdio.h>
#include <InterViews/world.h>
#include "std-macros++.h"
#include "exception.h"
#include "browser.h"
#include "drawingview.h"
#include "peditor.h"
#include "main.h"


main(int argc, char** argv) {
    TransInterface* ti = new TransInterface(argc, argv);
    ti->Translate(argc, argv);	/* Just so symtabs get init'd */

    World* world = new World(
	"rbrowse", GetIdrawProperties(), GetIdrawOptions(), argc, argv
        );
    Idraw* idraw = ridraw(argc, argv, world, null, null);
    RSLBrowser* browser = new RSLBrowser(ti, world, argc, argv);

    ti->SetBrowser(browser);
    Interactor* tools = idraw->GetTools();
    Interactor* canvas = idraw->GetDrawingView()->GetDrawWindow();

    idraw->GetPEditor()->DrawBox(50, 50, 50, 50);

    if (not catch(Exit))
	browser->Run();
}