campo-sirio/src/f9/f90.cpp
Alessandro Bonazzi a22881ba03 Patch level : 12.0 1090
Files correlati     : fp0.exe f90500a.msk

Commento:
aggiunto programma di ripristino archiviazione
tolti i blocchi per rifare le archiviazione

Interno
ho trovato un sacco di errori nascosti sotto forma di memory fault. meglio fare un giro completo
2022-09-12 23:27:30 +02:00

21 lines
533 B
C++

#include <xvt.h>
#include "f90.h"
int main(int argc, char** argv)
{
int rt;
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
case 4: rt = f90500(argc, argv); break; // Ripristino archiviazioni
}
return rt;
}