Initial version of donated sources by Avertec, 3.4p5.
[tas-yagle.git] / distrib / sources / mbkspef / spef_main.c
1 /****************************************************************************/
2 /* */
3 /* Chaine de CAO & VLSI AVERTEC */
4 /* */
5 /* Produit : STM Version 1.00 */
6 /* Fichier : stm_main.c */
7 /* */
8 /* (c) copyright 2000 AVERTEC */
9 /* Tous droits reserves */
10 /* */
11 /* Auteur(s) : Gilles Augustins */
12 /* */
13 /****************************************************************************/
14
15 /****************************************************************************/
16 /* includes */
17 /****************************************************************************/
18
19 #include SPE_H
20 extern int spefparse() ;
21 extern FILE *spefin ;
22
23 /****************************************************************************/
24 /* functions */
25 /****************************************************************************/
26
27 int main (int argc, char **argv)
28 {
29
30 mbkenv();
31 if (argc != 2) {
32 printf ("usage : spef <filename>\n") ;
33 EXIT (EXIT_FAILURE) ;
34 }
35
36 if ((spefin = fopen (argv[1], "r"))) {
37 spefparse () ;
38 fclose (spefin) ;
39 } else {
40 fprintf (stderr, "SPEF ERROR : no file %s\n", argv[2]);
41 EXIT (EXIT_FAILURE) ;
42 }
43
44
45 EXIT (EXIT_SUCCESS) ;
46
47 }