/*>>> main.c: SAN project main program test driver */

/* Revised: 1994.02.22 */

#include <stdio.h>
#include <stdlib.h>

#include "sandef.h"
#include "sanvar.h"

#include "sanint.h"
#include "sancmd.h"
#include "santrm.h"

/*--> main: test driver main program for SAN standalone test */
nonstatic
int
__cdecl 
main (int argc, charptrT argv[], charptrT envp[])
{
  siT argcount;

#ifdef THINK_C
  argcount = 1;
  progname = "san";
#else
  argcount = argc;
  progname = argv[0];
#endif

/* sign on */

  printf ("Welcome to the SAN Kit.\n");
  printf ("Revised: 1994.02.22\n");
  printf ("\n");

/* check arguments */

  if (argcount != 1)
    {
      fprintf (stderr, "%s: no command line arguments\n", progname);
      exit (1);
    };

/* initialize */

  SANInit ();

/* process commands */

  while (!progdone)
    SANCommand ();

/* terminate */

  SANTerm ();

  return (0);
}

/*<<< main.c: EOF */
