static char TestWindow_id[] = "$Header: /usr/tiburon/unix/gui/tmacs/RCS/TestWindow.cc,v 1.1 1996/07/22 10:42:12 oreilly Exp $";


/*
$Log: TestWindow.cc,v $
Revision 1.1  1996/07/22 10:42:12  oreilly
First external release

*/
#include <Xm/PushB.h>
#include <Xm/Form.h>
#include "TestWindow.h"

TestWindow::TestWindow(const char *name) : VkSimpleWindow(name) 
{
  Widget form = XtCreateWidget("form", xmFormWidgetClass, 
			       mainWindowWidget(), NULL, 0);

  Widget button = XtVaCreateManagedWidget("pushMe", xmPushButtonWidgetClass,
					  form, NULL);
  
  addView(form);
}