/* EPC Imp to C Translation Release 4 Version Apr 95 */ #include "imptoc.h" main() { /* CHECKS THAT ASSIGNMENT OF STRINGS OF FIXED LENGTH WITH*/ /* L>128 DO NOT LOES CHARARCTERS*/ char l [1+1] [256] ; strcpy(l [1],"\n0123456789012345678901234567890123456789012345678901234567890\n0123456789012345678901234567890123456789012345678901234567890\n0123456789012345678901234567890123456789012345678901234567890\nTEST OK") ; fprintf(out_file, "%s", imp_concat(imp_concat("L1=",l [1]),"\n")); exit(0); } /* end of automatic translation */