campo-sirio/src/f9/f90.cpp

#include <xvt.h>
#include "f90.h"

int main(int argc, char** argv)
{
  int rt = -1;
  const int r = (argc > 1) ? atoi( &argv[1][1] ) : 0;

  switch (r)
  {
  default:
  case 0: rt = f90100(argc, argv); break; // Programma estrazione pacchetti
  case 1: rt = f90200(argc, argv); break; // Tabella categorie documentali
  case 2: rt = f90300(argc, argv); break; // Gestione documenti cartacei
  case 3: rt = f90400(argc, argv); break; // Test classi
  }
  return rt;
}