| 1 | /* |
|---|
| 2 | * |
|---|
| 3 | */ |
|---|
| 4 | |
|---|
| 5 | #ifndef _TYPMAP_H |
|---|
| 6 | #define _TYPMAP_H |
|---|
| 7 | char type_conv[MAX_TOK][32]; |
|---|
| 8 | |
|---|
| 9 | void init_type_conv() |
|---|
| 10 | { |
|---|
| 11 | strcpy(type_conv[NONE], "none"); |
|---|
| 12 | strcpy(type_conv[NONE], "void"); |
|---|
| 13 | strcpy(type_conv[INT_CMD], "int"); |
|---|
| 14 | strcpy(type_conv[RING_CMD], "ring"); |
|---|
| 15 | strcpy(type_conv[QRING_CMD], "ring"); |
|---|
| 16 | strcpy(type_conv[POLY_CMD], "poly"); |
|---|
| 17 | strcpy(type_conv[NUMBER_CMD], "number"); |
|---|
| 18 | strcpy(type_conv[MODUL_CMD], "ideal"); |
|---|
| 19 | strcpy(type_conv[VECTOR_CMD], "ideal"); |
|---|
| 20 | strcpy(type_conv[IDEAL_CMD], "ideal"); |
|---|
| 21 | strcpy(type_conv[MAP_CMD], "map"); |
|---|
| 22 | strcpy(type_conv[MATRIX_CMD], "matrix"); |
|---|
| 23 | strcpy(type_conv[STRING_CMD], "char *"); |
|---|
| 24 | strcpy(type_conv[INTMAT_CMD], "intvec *"); |
|---|
| 25 | strcpy(type_conv[INTVEC_CMD], "intvec *"); |
|---|
| 26 | strcpy(type_conv[LIST_CMD], "lists"); |
|---|
| 27 | strcpy(type_conv[LINK_CMD], "si_link"); |
|---|
| 28 | strcpy(type_conv[PACKAGE_CMD], "package"); |
|---|
| 29 | strcpy(type_conv[PROC_CMD], "procinfo *"); |
|---|
| 30 | /* |
|---|
| 31 | strcpy(type_conv[], ""); |
|---|
| 32 | strcpy(type_conv[], ""); |
|---|
| 33 | strcpy(type_conv[], ""); |
|---|
| 34 | strcpy(type_conv[], ""); |
|---|
| 35 | strcpy(type_conv[], ""); |
|---|
| 36 | strcpy(type_conv[], ""); |
|---|
| 37 | strcpy(type_conv[], ""); |
|---|
| 38 | */ |
|---|
| 39 | printf("[%d] %s\n", INT_CMD, type_conv[INT_CMD]); |
|---|
| 40 | printf("[%d] %s\n", MODUL_CMD, type_conv[MODUL_CMD]); |
|---|
| 41 | printf("[%d] %s\n", STRING_CMD, type_conv[STRING_CMD]); |
|---|
| 42 | printf("[%d] %s\n", LINK_CMD, type_conv[LINK_CMD]); |
|---|
| 43 | printf("[%d] %s\n", PACKAGE_CMD, type_conv[PACKAGE_CMD]); |
|---|
| 44 | /**/ |
|---|
| 45 | } |
|---|
| 46 | |
|---|
| 47 | |
|---|
| 48 | #endif /* _TYPMAP_H */ |
|---|
