version 1.54, 2013/02/27 17:11:42
|
version 1.55, 2013/03/10 17:01:05
|
Line 105 instruction_format(struct_processus *s_e
|
Line 105 instruction_format(struct_processus *s_e
|
"\"LOGICAL*8\" }\n"); |
"\"LOGICAL*8\" }\n"); |
printf(" { \"REAL*4\", \"REAL*8\" }\n"); |
printf(" { \"REAL*4\", \"REAL*8\" }\n"); |
printf(" { \"COMPLEX*8\", \"COMPLEX*16\" }\n"); |
printf(" { \"COMPLEX*8\", \"COMPLEX*16\" }\n"); |
printf(" { \"CHARACTER\" }\n\n"); |
printf(" { \"CHARACTER*(*)\" \"CHARACTER*(%s)\" }\n\n", d_INT); |
|
|
printf(" FLOW\n"); |
printf(" FLOW\n"); |
printf(" { \"LENGTH*(*)\" }\n"); |
printf(" { \"LENGTH*(*)\" }\n"); |