ftp.nice.ch/pub/next/developer/languages/eiffel/SmallEiffel.0.95.N.bs.tar.gz#/SmallEiffel/bin_c/compile_to_c24.c

This is compile_to_c24.c in view mode; [Download] [Up]

/* ANSI C code generated by SmallEiffel. */
/*
-- SmallEiffel  -- Release (- 0.95)    --      FRANCE
-- Copyright (C), 1994 - Dominique COLNET and Suzanne COLLIN 
-- University Henri Poincare' - Nancy 1 - email colnet@loria.fr 
-- CRIN (Centre de Recherche en Informatique de Nancy)
-- FRANCE 
*/
#include "compile_to_c.h"
void se_manifest_strings(void){
ms1606=e2s("argument");
ms1605=e2s("argument_count");
ms1604=e2s("FIXED_ARRAY[");
ms1603=e2s("DICTIONARY[");
ms1602=e2s("make");
ms1601=e2s(")->_");
ms1600=e2s(");\n");
ms1599=e2s(");\n");
ms1598=e2s("/*)*/");
ms1597=e2s("(T0 *)");
ms1596=e2s("/*(IRF4*/");
ms1595=e2s("stdout");
ms1594=e2s("stdin");
ms1593=e2s("stderr");
ms1592=e2s("((int)");
ms1591=e2s("((unsigned char)");
ms1590=e2s(")&&(");
ms1589=e2s(")\174""\174""(");
ms1588=e2s("))\174""\174""(");
ms1587=e2s("(!(");
ms1586=e2s("(float)");
ms1585=e2s("to_real");
ms1584=e2s("sqrt(");
ms1583=e2s("sqrt");
ms1582=e2s("floor(");
ms1581=e2s("floor");
ms1580=e2s("pow(");
ms1579=e2s("^");
ms1578=e2s("to_character");
ms1577=e2s("//");
ms1576=e2s("%");
ms1575=e2s("\\\\");
ms1574=e2s(");\n");
ms1573=e2s(");\n");
ms1572=e2s(");\n");
ms1571=e2s("c_inline_h");
ms1570=e2s("(T0 *)");
ms1569=e2s("RF5/can_be_dropped : Not Yet Implemented.");
ms1568=e2s("RF4/Can be dropped ?");
ms1567=e2s("RF8/can_be_dropped : Not Yet Implemented.");
ms1566=e2s("RF7/can_be_dropped : Not Yet Implemented.");
ms1565=e2s("RF1/can_be_dropped : Not Yet Implemented.");
ms1564=e2s("RF3/can_be_dropped : Not Yet Implemented.");
ms1563=e2s(";\175""\n");
ms1562=e2s("return ");
ms1561=e2s("=R;\175""\n");
ms1560=e2s("=1;\n");
ms1559=e2s("==0)\173""\n");
ms1558=e2s("if (");
ms1557=e2s(";\n");
ms1556=e2s("0*");
ms1555=e2s("extern ");
ms1554=e2s("command_arguments");
ms1553=e2s("io");
ms1552=e2s("std_error");
ms1551=e2s("std_input");
ms1550=e2s("std_output");
ms1549=e2s("\175""\175""\n");
ms1548=e2s("=1;\n");
ms1547=e2s("==0)\173""\n");
ms1546=e2s("if (");
ms1545=e2s("=0;\n");
ms1544=e2s("int ");
ms1543=e2s(";\n");
ms1542=e2s("extern int ");
ms1541=e2s("return R;\n\175""\n");
ms1540=e2s("&(C->_");
ms1539=e2s(" is a deferred feature in ");
ms1538=e2s("Cannot access address of a constant (VZAA).");
ms1537=e2s("c_inline_c");
ms1536=e2s(";\n");
ms1535=e2s("0*");
ms1534=e2s("FEATURE_NAME/Should never be called.");
ms1533=e2s("A once routine must not be undefined (VDUS).");
ms1532=e2s("An attribute must not be undefined (VDUS).");
ms1531=e2s("Same name appears twice.");
ms1530=e2s("typedef struct sTstring T7;\n");
ms1529=e2s("typedef float T4;\n");
ms1528=e2s("typedef void * T8;\n");
ms1527=e2s("typedef int T2;\n");
ms1526=e2s("typedef double T5;\n");
ms1525=e2s("typedef char T3;\n");
ms1524=e2s("typedef int T6;\n");
ms1523=e2s(";\n");
ms1522=e2s(" T");
ms1521=e2s("array");
ms1520=e2s("typedef struct sT");
ms1519=e2s("T0*");
ms1518=e2s("T0*");
ms1517=e2s("float");
ms1516=e2s("int");
ms1515=e2s("double");
ms1514=e2s("char");
ms1513=e2s("int");
ms1512=e2s("*** TYPE_BIT.c_type_in ***");
ms1511=e2s("No creation for NONE.");
ms1510=e2s("Such a simple Type has no creation clause.");
ms1509=e2s("No creation for ANY.");
ms1508=e2s(" (TYPE_GENERIC).");
ms1507=e2s(" does not match with ");
ms1506=e2s(". It must not be so. SmallEiffel limitation :-(.");
ms1505=e2s(" is a subclass of ");
ms1504=e2s(" (VNCB).");
ms1503=e2s(" is not a kind of ");
ms1502=e2s("*_storage;\175"";\n");
ms1501=e2s("\173""int id;int _capacity;int _lower;int _upper;T");
ms1500=e2s("struct sT");
ms1499=e2s("BIT ");
ms1498=e2s("BIT ");
ms1497=e2s("like Current");
ms1496=e2s("Internal Error #1 in TYPE_GENERIC.");
ms1495=e2s("Internal Error #1 in TYPE_STRING.");
ms1494=e2s("Internal Error #1 in TYPE_REAL.");
ms1493=e2s("Internal Error #1 in TYPE_INTEGER.");
ms1492=e2s("Internal Error #1 in TYPE_DOUBLE.");
ms1491=e2s("Internal Error #1 in TYPE_CHARACTER.");
ms1490=e2s("Internal Error #3 in TYPE_CLASS.");
ms1489=e2s("Internal Error #2 in TYPE_CLASS.");
ms1488=e2s("Internal Error #1 in TYPE_CLASS.");
ms1487=e2s("Internal Error #1 in TYPE_BOOLEAN.");
ms1486=e2s("Internal Error #1 in TYPE_ARRAY.");
ms1485=e2s("Internal Error #1 in TYPE_EXPANDED.");
ms1484=e2s("float");
ms1483=e2s("T8");
ms1482=e2s("int");
ms1481=e2s("double");
ms1480=e2s("char");
ms1479=e2s("int");
ms1478=e2s("BIT_N");
ms1477=e2s("item");
ms1476=e2s("Internal Error #1 in TYPE_NONE.");
ms1475=e2s("Class Not found.");
ms1474=e2s("Invalid type.");
ms1473=e2s("STRING must not be expanded.");
ms1472=e2s("STRING not found.");
ms1471=e2s("REAL must be expanded.");
ms1470=e2s("REAL not found.");
ms1469=e2s("void *");
ms1468=e2s("char *");
ms1467=e2s("POINTER must be expanded.");
ms1466=e2s("POINTER not found.");
ms1465=e2s("INTEGER must be expanded.");
ms1464=e2s("INTEGER not found.");
ms1463=e2s("DOUBLE must be expanded.");
ms1462=e2s("DOUBLE not found.");
ms1461=e2s("CHARACTER must be expanded.");
ms1460=e2s("CHARACTER not found.");
ms1459=e2s("BOOLEAN must be expanded.");
ms1458=e2s("BOOLEAN not found.");
ms1457=e2s(") NOYE ..");
ms1456=e2s(" to_runnable(");
ms1455=e2s("Internal Error #1 in PARENT_LIST.");
ms1454=e2s("BASE_CLASS/nyi.");
ms1453=e2s("Bad generic argument.");
ms1452=e2s(" is (not) generic ?");
ms1451=e2s(" must be a positive INTEGER.");
ms1450=e2s("TYPE_BIT_2/NYI");
ms1449=e2s(" must be an INTEGER constant.");
ms1448=e2s(" not found.");
ms1447=e2s("feature ");
ms1446=e2s(" is invalid.");
ms1445=e2s("Procedure found has arguments. ");
ms1444=e2s(" cannot be expanded. ");
ms1443=e2s("Feature found is not a procedure.");
ms1442=e2s(" not found.");
ms1441=e2s("Creation procedure for ");
ms1440=e2s(" cannot be expanded. ");
ms1439=e2s("Expanded class must have no creation procedure, or only one creation procedure with no arguments (VTEC.2).");
ms1438=e2s(" cannot be expanded. ");
ms1437=e2s("A deferred class must not be expanded (VTEC.1).");
ms1436=e2s(" is invalid. ");
ms1435=e2s("Bad anchor.");
ms1434=e2s("Bad anchor. Feature found cannot be an anchor.");
ms1433=e2s("Bad anchor. Feature not found.");
ms1432=e2s("Anchor must not be expanded.");
ms1431=e2s("Only one level of anchoring allowed.");
ms1430=e2s("Bad anchor.");
ms1429=e2s("ANY must not be expanded.");
ms1428=e2s("ANY not found.");
ms1427=e2s("BIT ");
ms1426=e2s("NULL");
ms1425=e2s("TYPE_BIT/NYI (45).");
ms1424=e2s(");\n");
ms1423=e2s(");\n");
ms1422=e2s("/*)*/");
ms1421=e2s("\175""\n");
ms1420=e2s("\173""\n");
ms1419=e2s(";\n");
ms1418=e2s(",\n");
ms1417=e2s("(/*UT*/(void)");
ms1416=e2s(");\n");
ms1415=e2s("Internal Error #2 in SWITCH.");
ms1414=e2s("Internal Error #1 in SWITCH.");
ms1413=e2s(")->_item");
ms1412=e2s("(T0 *)");
ms1411=e2s(")=(");
ms1410=e2s("->_");
ms1409=e2s("((");
ms1408=e2s("/*(IRF3*/");
ms1407=e2s("\175""\n");
ms1406=e2s("rs_unlink();\n");
ms1405=e2s("R");
ms1404=e2s("C");
ms1403=e2s(");\n");
ms1402=e2s("EXP");
ms1401=e2s("BIT");
ms1400=e2s("REF((void **)");
ms1399=e2s("rs_p");
ms1398=e2s(");\n");
ms1397=e2s("rs_link(t");
ms1396=e2s(";\n");
ms1395=e2s(" R=");
ms1394=e2s(" a");
ms1393=e2s("void");
ms1392=e2s("/*C*/");
ms1391=e2s("rT");
ms1390=e2s("void ");
ms1389=e2s("[];\n");
ms1388=e2s("extern char trT");
ms1387=e2s("\";\n");
ms1386=e2s(" of ");
ms1385=e2s("prefix ");
ms1384=e2s("infix ");
ms1383=e2s("[]=\"");
ms1382=e2s("char trT");
ms1381=e2s("Bad CHARACTER value.");
ms1380=e2s("Bad CHARACTER value.");
ms1379=e2s("Bad CHARACTER value.");
ms1378=e2s("Not a good slice.");
ms1377=e2s("Bad INTEGER value.");
ms1376=e2s("Bad INTEGER value.");
ms1375=e2s("Bad INTEGER value.");
ms1374=e2s(") in the same inspect.");
ms1373=e2s("Second occurrence for this value (");
ms1372=e2s(" = NULL;\n\175"";");
ms1371=e2s("\nbreak;\ndefault:\n");
ms1370=e2s(": ");
ms1369=e2s("case ");
ms1368=e2s("id) \173""\n");
ms1367=e2s(")->");
ms1366=e2s(") switch (((T0 *)");
ms1365=e2s(";\nif ((int)");
ms1364=e2s("REVERSE_ASSIGNMENT Not Yet Implemented.");
ms1363=e2s("(T0 *)");
ms1362=e2s("=NULL;\n");
ms1361=e2s(";\n");
ms1360=e2s("Not Yet Implemented (ASSIGNMENT/Reference into Expanded).");
ms1359=e2s(");\n");
ms1358=e2s(";\n");
ms1357=e2s("(T0 *)");
ms1356=e2s("(T0 *)");
ms1355=e2s("=(T0 *)n;\175""");
ms1354=e2s("n");
ms1353=e2s(";\n");
ms1352=e2s(" *n=");
ms1351=e2s("\173""T");
ms1350=e2s("=(T0 *)n;\175""\n");
ms1349=e2s("n");
ms1348=e2s(";\n");
ms1347=e2s(" *n=");
ms1346=e2s("\173""T");
ms1345=e2s(");\n");
ms1344=e2s("=((T0 *)");
ms1343=e2s(");\n");
ms1342=e2s("=((T0 *)");
ms1341=e2s("\175""\n");
ms1340=e2s("\175""\n");
ms1339=e2s(");\n");
ms1338=e2s("v=lvc(c++,v,");
ms1337=e2s(")) \173""\n");
ms1336=e2s("while (!(");
ms1335=e2s("liv");
ms1334=e2s("\173""int c=0;int v=0;\n");
ms1333=e2s("\175""\n");
ms1332=e2s("Invalid inspect (nothing selected).");
ms1331=e2s(");\n");
ms1330=e2s("error1(");
ms1329=e2s(": ;\n");
ms1328=e2s(" l");
ms1327=e2s(")) ");
ms1326=e2s("<=");
ms1325=e2s(")&&(");
ms1324=e2s("<=");
ms1323=e2s("if ((");
ms1322=e2s(";\n");
ms1321=e2s("goto l");
ms1320=e2s(") ");
ms1319=e2s(" == ");
ms1318=e2s("if (");
ms1317=e2s(";\n");
ms1316=e2s("iv");
ms1315=e2s("\173""int ");
ms1314=e2s("E_RETRY/nyi.");
ms1313=e2s("/*FI*/");
ms1312=e2s("\175""\n");
ms1311=e2s("else \173""\n");
ms1310=e2s("/*AE*/\n");
ms1309=e2s("\175""\n");
ms1308=e2s(") \173""\n");
ms1307=e2s(",rs_pop_int(");
ms1306=e2s("if (");
ms1305=e2s("/*AF*/");
ms1304=e2s("\175""\n");
ms1303=e2s("\173""/*AT*/");
ms1302=e2s(" else ");
ms1301=e2s("/*IF*/");
ms1300=e2s("civ");
ms1299=e2s("rs-=8;\n");
ms1298=e2s(" Invalid reverse assignment (VJRV).");
ms1297=e2s(" is not a reference Type.");
ms1296=e2s(" (\"?=\" is not necessary).");
ms1295=e2s(". Simple assignment is allowed");
ms1294=e2s(" is a ");
ms1293=e2s("ASSIGNMENT/Not Yet Implemented.");
ms1292=e2s(".");
ms1291=e2s("Void may not be assigned to an expanded entity. Left hand side is ");
ms1290=e2s("Bad assignment.");
ms1289=e2s("Type mismatch.");
ms1288=e2s("Bad right hand side of assignment.");
ms1287=e2s("Bad left hand side of assignment.");
ms1286=e2s("Bad arguments.");
ms1285=e2s("Procedure found has argument(s).");
ms1284=e2s("Feature found is not a procedure.");
ms1283=e2s("Creation procedure not found.");
ms1282=e2s(" is not in the creation list of ");
ms1281=e2s(" Bad explicit type mark.");
ms1280=e2s("Invalid explicit type.");
ms1279=e2s("You must use a constructor.");
ms1278=e2s(". ");
ms1277=e2s("Creation clause exists for ");
ms1276=e2s(").");
ms1275=e2s("Creation call on formal generic type (");
ms1274=e2s(").");
ms1273=e2s("Creation call on expanded target (");
ms1272=e2s("Cannot create object.");
ms1271=e2s(" is deferred. ");
ms1270=e2s("Bad writable target for creation.");
ms1269=e2s("Invalid loop body.");
ms1268=e2s("This loop has an invalid expression.");
ms1267=e2s("Bad variant for this loop.");
ms1266=e2s("Bab invariant.");
ms1265=e2s("Bad initialisation part.");
ms1264=e2s(" is not allowed.");
ms1263=e2s("Expression must be INTEGER or CHARACTER.");
ms1262=e2s("Empty when clause in inspect.");
ms1261=e2s("Bad inspect.");
ms1260=e2s("Bad when list.");
ms1259=e2s("Bad when clause.");
ms1258=e2s("Empty when clause in inspect.");
ms1257=e2s("Expression of if/elseif must be BOOLEAN.");
ms1256=e2s("Bad BOOLEAN expression.");
ms1255=e2s("Bad instruction.");
ms1254=e2s("Bad check list.");
ms1253=e2s("Bad arguments.");
ms1252=e2s("Bad argument.");
ms1251=e2s("Feature found has argument(s).");
ms1250=e2s("\" here.");
ms1249=e2s(" Cannot use procedure \"");
ms1248=e2s("Feature found is not a procedure.");
ms1247=e2s("Feature found in ");
ms1246=e2s("Bad target.");
ms1245=e2s("))");
ms1244=e2s(")\174""\174""(");
ms1243=e2s("((");
ms1242=e2s("))");
ms1241=e2s(")&&(");
ms1240=e2s("((");
ms1239=e2s(")>(");
ms1238=e2s(")<(");
ms1237=e2s(")>=(");
ms1236=e2s(")<=(");
ms1235=e2s(")!=((T0 *)");
ms1234=e2s("((T0 *)");
ms1233=e2s("((int)");
ms1232=e2s("((int)");
ms1231=e2s("),1)");
ms1230=e2s("),(");
ms1229=e2s("((");
ms1228=e2s("),1)");
ms1227=e2s("((");
ms1226=e2s("])");
ms1225=e2s("),s[");
ms1224=e2s("),&(");
ms1223=e2s("memcmp(&(");
ms1222=e2s(")!=(");
ms1221=e2s(")==((T0 *)");
ms1220=e2s("((T0 *)");
ms1219=e2s("!(");
ms1218=e2s("!(");
ms1217=e2s("),0)");
ms1216=e2s("),(");
ms1215=e2s("((");
ms1214=e2s("),0)");
ms1213=e2s("((");
ms1212=e2s("])");
ms1211=e2s("),s[");
ms1210=e2s("),&(");
ms1209=e2s("!memcmp(&(");
ms1208=e2s(")==(");
ms1207=e2s("rT");
ms1206=e2s("((void *)");
ms1205=e2s("NULL");
ms1204=e2s("E_STRIP/nyi.");
ms1203=e2s("-(");
ms1202=e2s("is_basic_expanded_type");
ms1201=e2s("(T0 *)");
ms1200=e2s("XrT");
ms1199=e2s("]))");
ms1198=e2s("))");
ms1197=e2s(")->id)");
ms1196=e2s("((T0 *)(g[((");
ms1195=e2s("generator");
ms1194=e2s("]))");
ms1193=e2s(")->id");
ms1192=e2s("evobt(");
ms1191=e2s("(rsp();exit(1);)");
ms1190=e2s("Compiler (SmallEiffel/cc/gcc) may fail because of System Validity Problem. Sorry.");
ms1189=e2s(" is concerned. ");
ms1188=e2s("Call on a Void or a bad target.");
ms1187=e2s("->_");
ms1186=e2s(" *)C");
ms1185=e2s("(T");
ms1184=e2s("))");
ms1183=e2s(" *)ci(");
ms1182=e2s("((T");
ms1181=e2s("ivT");
ms1180=e2s("((T0 *)(gt[(");
ms1179=e2s("generating_type");
ms1178=e2s("!(");
ms1177=e2s("0,");
ms1176=e2s("ma(");
ms1175=e2s("((float)");
ms1174=e2s("BIT_N Not Yet Implemented.");
ms1173=e2s("ms");
ms1172=e2s("C->_");
ms1171=e2s("BIT_CONSTANT/nyi.");
ms1170=e2s("Expanded/Reference");
ms1169=e2s("Expanded/Expanded");
ms1168=e2s("Expanded/Expanded");
ms1167=e2s("Reference/Expanded");
ms1166=e2s("Reference/Reference");
ms1165=e2s(" Not Valid. Context of Types interpretation is ");
ms1164=e2s(" Comparison ");
ms1163=e2s("Bad target.");
ms1162=e2s("Bad old expression.");
ms1161=e2s("Conflict between local/feature name (VRLE).");
ms1160=e2s("Bad type.");
ms1159=e2s("Bad arguments.");
ms1158=e2s("Real/Formal argument mismatch (3).");
ms1157=e2s(" It is not Like <argument>.");
ms1156=e2s("It is not Like <feature>.");
ms1155=e2s(" It is not Like Current.");
ms1154=e2s("Cannot pass Void for expanded argument.");
ms1153=e2s("Bad number of arguments.");
ms1152=e2s("Bad number of arguments.");
ms1151=e2s("Bad argument.");
ms1150=e2s("Bad expression.");
ms1149=e2s("Feature not found.");
ms1148=e2s("E_STRIP/nyi.");
ms1147=e2s("Feature found has arguments.");
ms1146=e2s("Feature found has no result.");
ms1145=e2s("\" here.");
ms1144=e2s(" Cannot use feature \"");
ms1143=e2s("Don\'t know how to compute client list  for this feature (internal error). Bad undefine ? Inheritance clash ?");
ms1142=e2s("Don\'t know how to merge two clients list (internal error).");
ms1141=e2s("NYI");
ms1140=e2s("Unable to load ");
ms1139=e2s("Unable to load ");
ms1138=e2s(". RUN_FEATURE information.");
ms1137=e2s(" is not a subclass of ");
ms1136=e2s(" not found when starting look up from ");
ms1135=e2s("Feature ");
ms1134=e2s("Bad target.");
ms1133=e2s("Bad type of element for type ARRAY.");
ms1132=e2s("Bad expression in manifest array.");
ms1131=e2s("Conflict between argument/feature name (VRFA).");
ms1130=e2s(" 2.");
ms1129=e2s(" 1.");
ms1128=e2s("C\'est possible ca (2) ?");
ms1127=e2s("Bad feature name.");
ms1126=e2s("Feature found is not writable.");
ms1125=e2s("Feature not found.");
ms1124=e2s("is_expanded_type");
ms1123=e2s("Cannot produce C code.");
ms1122=e2s("Done.\n");
ms1121=e2s("a.out");
ms1120=e2s("strip ");
ms1119=e2s("emxbind -qs ");
ms1118=e2s(".o");
ms1117=e2s("-o ");
ms1116=e2s("-c ");
ms1115=e2s("\" file.\n");
ms1114=e2s(".make");
ms1113=e2s(".CMD");
ms1112=e2s(".BAT");
ms1111=e2s("Writing \"");
ms1110=e2s("\175""\n");
ms1109=e2s(";\n");
ms1108=e2s("g[");
ms1107=e2s("e2s(");
ms1106=e2s("]=");
ms1105=e2s("gt[");
ms1104=e2s("];\n");
ms1103=e2s("]=g[");
ms1102=e2s("g[");
ms1101=e2s(");\n");
ms1100=e2s("]=e2s(");
ms1099=e2s("g[");
ms1098=e2s("];\n");
ms1097=e2s("]=p[");
ms1096=e2s("p[");
ms1095=e2s(";\n");
ms1094=e2s("]=");
ms1093=e2s("p[");
ms1092=e2s("p[0]=\"???\";\n");
ms1091=e2s(");\n");
ms1090=e2s("]=sizeof(T");
ms1089=e2s("s[");
ms1088=e2s("void se_sz_initialize(void)");
ms1087=e2s("char *");
ms1086=e2s("p");
ms1085=e2s("Tstring *");
ms1084=e2s("g");
ms1083=e2s("Tstring *");
ms1082=e2s("gt");
ms1081=e2s("size_t");
ms1080=e2s("s");
ms1079=e2s("[];\n");
ms1078=e2s("extern ");
ms1077=e2s("];\n");
ms1076=e2s("Define initialize stuff.\n");
ms1075=e2s("Internal stacks size used : ");
ms1074=e2s("Pre-Computed Once Function Call");
ms1073=e2s("Function");
ms1072=e2s("Procedure");
ms1071=e2s("Real Function");
ms1070=e2s("Real Procedure");
ms1069=e2s("Static Expression");
ms1068=e2s("Inlined Function");
ms1067=e2s("Inlined Procedure");
ms1066=e2s("Switched Call");
ms1065=e2s("Check Id Call");
ms1064=e2s("Direct Call");
ms1063=e2s(" (yes it is dangerous).\n");
ms1062=e2s("Calls with a Void target : ");
ms1061=e2s("));\nd->_item=s;\nreturn (T0 *)d;\175""\n");
ms1060=e2s("*)se_new(");
ms1059=e2s(" *d=((");
ms1058=e2s("\173""\n");
ms1057=e2s(";\n");
ms1056=e2s(" s)");
ms1055=e2s("T0*");
ms1054=e2s(" type conversion.\n");
ms1053=e2s(" to ");
ms1052=e2s("Automatic ");
ms1051=e2s("\175""\n");
ms1050=e2s("\173""\n");
ms1049=e2s(";\n");
ms1048=e2s("(T0*s)");
ms1047=e2s("toT");
ms1046=e2s(" type conversion.\n");
ms1045=e2s(" to ");
ms1044=e2s("Automatic ");
ms1043=e2s("Defined Switche");
ms1042=e2s(".\n");
ms1041=e2s("No ");
ms1040=e2s(".\n");
ms1039=e2s(": ");
ms1038=e2s("Total ");
ms1037=e2s("\175""\n");
ms1036=e2s("\175""");
ms1035=e2s("\175"" else \173""\n");
ms1034=e2s(") \173""\n");
ms1033=e2s("if (id <= ");
ms1032=e2s("return ");
ms1031=e2s("vc(C,l,c,f)->id;\n");
ms1030=e2s("((T0*)C)->id;\n");
ms1029=e2s("int id=");
ms1028=e2s(" a");
ms1027=e2s("(int l,int c,int f, void *C");
ms1026=e2s("(void *C");
ms1025=e2s(" XrT");
ms1024=e2s("void ");
ms1023=e2s("exit(1);");
ms1022=e2s("rsp();");
ms1021=e2s("printf(\"Received signal %d (man signal).\\n\",sig);");
ms1020=e2s("void sigrsp(int sig)");
ms1019=e2s("else error2(o,l,c,f);");
ms1018=e2s("if (!o) error1(\"Target is Void.\",l,c,f);");
ms1017=e2s("void evobt(void *o,int l,int c,int f)");
ms1016=e2s("exit(1);");
ms1015=e2s("s2e(gt[id]),s2e(gt[((T0 *)o)->id]));");
ms1014=e2s("printf(\"Expected :%s, Actual :%s.\\n\",");
ms1013=e2s("printf(\"Target is not valid (not the good type).\\n\");");
ms1012=e2s("printf(\"*** Error at Run Time *** : \");");
ms1011=e2s("printf(\"Line : %d column %d in %s.\\n\",l,c,p[f]);");
ms1010=e2s("rsp();");
ms1009=e2s("if (id == (vc(o,l,c,f)->id)) return o;");
ms1008=e2s("T0 *ci(int id,void *o,int l,int c,int f)");
ms1007=e2s("return o;");
ms1006=e2s("if (!o) error1(\"Call with a Void target.\",l,c,f);");
ms1005=e2s("T0 *vc(void *o,int l,int c,int f)");
ms1004=e2s("error1(\"Bad target.\",l,c,f);");
ms1003=e2s("printf(\"Target Type %s not legal.\\n\",s2e(gt[o->id]));");
ms1002=e2s("void error2(T0 *o,int l,int c,int f)");
ms1001=e2s("exit(1);");
ms1000=e2s("printf(\"*** Error at Run Time *** : %s\\n\",m);");
ms999=e2s("printf(\"Line : %d column %d in %s.\\n\",l,c,p[f]);");
ms998=e2s("rsp();");
ms997=e2s("void error1(char *m,int l,int c,int f)");
ms996=e2s("exit(1);");
ms995=e2s("printf(\"*** Error at Run Time *** : %s\\n\",m);");
ms994=e2s("rsp();");
ms993=e2s("void error0(char *m)");
ms992=e2s("exit(1);");
ms991=e2s("printf(\"No trace when using option \\\"-boost\\\"\\n\");");
ms990=e2s("printf(\"Eiffel program crash at run time.\\n\");");
ms989=e2s("void rsp(void)");
ms988=e2s("printf(\"===================== End of Run Stack ==========================\\n\\n\");AF_0;\175""");
ms987=e2s("exit(1);\175""\175""\175""");
ms986=e2s("printf(\"Stack Damaged ... Sorry.\\n\");");
ms985=e2s("default:\173""");
ms984=e2s("continue;\175""");
ms983=e2s("printf(\"Class Invariant of %s\\n\",*(char **)sp);");
ms982=e2s("case doingInvariantId:\173""");
ms981=e2s("printf(\"(%s)\\n\",*(char **)sp);continue;\175""");
ms980=e2s("case doingWhatId:\173""");
ms979=e2s("continue;\175""");
ms978=e2s("printf(\"file %s \",p[*(int *)sp]);");
ms977=e2s("case pathId:\173""");
ms976=e2s("continue;\175""");
ms975=e2s("printf(\"column %d \",*(int *)sp);");
ms974=e2s("case columnId:\173""");
ms973=e2s("continue;\175""");
ms972=e2s("printf(\"line %d \",*(int *)sp);");
ms971=e2s("case lineId:\173""");
ms970=e2s("printf(\"%f\\n\",**(double **)sp);continue;\175""");
ms969=e2s("case doubleId:\173""");
ms968=e2s("continue;\175""");
ms967=e2s("printf(\"%f\\n\",(double)**(float **)sp);");
ms966=e2s("case realId:\173""");
ms965=e2s("else printf(\"false\\n\");continue;\175""");
ms964=e2s("if (**(int **)sp) printf(\"true\\n\");");
ms963=e2s("case booleanId:\173""");
ms962=e2s("printf(\"\'%c\'\\n\",**(char **)sp);continue;\175""");
ms961=e2s("case characterId:\173""");
ms960=e2s("printf(\"%d\\n\",**(int **)sp);continue;\175""");
ms959=e2s("case integerId:\173""");
ms958=e2s("printf(\"expanded object\\n\");continue;\175""");
ms957=e2s("case expandedId:\173""");
ms956=e2s("else printf(\"Void\\n\");continue;\175""");
ms955=e2s("if (o) \173""ANYprint(o,o); printf(\"\\n\");\175""");
ms954=e2s("case referenceId:\173""void *o=(**(T0 ***)sp);");
ms953=e2s("continue;\175""");
ms952=e2s("printf(\"External POINTER `%p\'.\\n\",**(void ***)sp);");
ms951=e2s("case pointerId:\173""");
ms950=e2s("continue;\175""");
ms949=e2s("printf(\"%s = \",(char *)*sp);");
ms948=e2s("case nameId:\173""");
ms947=e2s("continue;\175""");
ms946=e2s("printf(\"------ %s\\n\",(char *)*sp);");
ms945=e2s("printf(\"==============================================================\\n\");");
ms944=e2s("case featureTagId:\173""");
ms943=e2s("case linkId: continue;");
ms942=e2s("switch ((int)*sp++)\173""");
ms941=e2s("if (sp > rs_top) break;");
ms940=e2s("if (sp >= rs) break;");
ms939=e2s("sp++;");
ms938=e2s("while (1) \173""");
ms937=e2s("\173""void **sp=(rs_bot-1);");
ms936=e2s("printf(\"Final Run Stack :\\n\");");
ms935=e2s("printf(\"Eiffel program crash at run time.\\n\");");
ms934=e2s("AF_1;");
ms933=e2s("void rsp(void)");
ms932=e2s("return ((T0*)a);");
ms931=e2s("va_end(pa);\175""");
ms930=e2s("store+=s[eid];\175""\175""");
ms929=e2s("memcpy(*((char**)va_arg(pa,T0 *)),store,s[eid]);");
ms928=e2s("while (argc--)\173""");
ms927=e2s("store+=sizeof(double);\175""break;");
ms926=e2s("while (argc--)\173""*((double*)store)=va_arg(pa,double);");
ms925=e2s("case 5:");
ms924=e2s("store+=sizeof(float);\175""break;");
ms923=e2s("while (argc--)\173""*((float*)store)=va_arg(pa,double);");
ms922=e2s("case 4:");
ms921=e2s("store+=sizeof(char);\175""break;");
ms920=e2s("while (argc--)\173""*((char*)store)=((char)va_arg(pa,int));");
ms919=e2s("case 3:");
ms918=e2s("store+=sizeof(int);\175""break;");
ms917=e2s("while (argc--)\173""*((int*)store)=va_arg(pa,int);");
ms916=e2s("case 2:case 6:");
ms915=e2s("store+=sizeof(char*);\175""break;");
ms914=e2s("while (argc--)\173""*((char**)store)=va_arg(pa,char*);");
ms913=e2s("case 0:");
ms912=e2s("switch (eid)\173""");
ms911=e2s("a->_storage=(T0**)store;");
ms910=e2s("else store=(char*)malloc(argc*(sizeof(char*)));");
ms909=e2s("if (eid) store=(char*)malloc(argc*(s[eid]));");
ms908=e2s("if (argc) \173""va_start(pa,argc);");
ms907=e2s("a->_storage=NULL;");
ms906=e2s("a->_upper=argc;");
ms905=e2s("a->_lower=1;");
ms904=e2s("a->_capacity=argc;");
ms903=e2s("char* store=0;");
ms902=e2s("Tarray *a=((Tarray *)se_new(aid));");
ms901=e2s("va_list pa;");
ms900=e2s("T0 *ma(int aid,int eid,int argc,...)");
ms899=e2s("return s;");
ms898=e2s("strcpy(s->_storage,e);\175""");
ms897=e2s("s->_storage=(char *)malloc(sizeof(char)*s->_capacity);");
ms896=e2s("s->_count=(s->_capacity)-1;");
ms895=e2s("s->_capacity=strlen(e)+1;");
ms894=e2s("if (e!=NULL) \173""");
ms893=e2s("Tstring *s=(Tstring*)se_new(7);");
ms892=e2s("Tstring *e2s(char *e)");
ms891=e2s("return e;");
ms890=e2s("e[s->_count]=\'\\0\';");
ms889=e2s("memcpy(e,s->_storage,s->_count);");
ms888=e2s("char *e=(char*)malloc((s->_count)+1);");
ms887=e2s("char *s2e(Tstring *s)");
ms886=e2s("Define used basics.\n");
ms885=e2s(".\n");
ms884=e2s("Order of includes : ");
ms883=e2s("\175""\n");
ms882=e2s(");\n");
ms881=e2s("\"\"");
ms880=e2s("\" is not an INTEGER.\n");
ms879=e2s("STRING.to_integer: \"");
ms878=e2s("\\\'");
ms877=e2s("\\\"");
ms876=e2s("\\\\");
ms875=e2s("\\n");
ms874=e2s("=e2s(");
ms873=e2s("ms");
ms872=e2s("void se_manifest_strings(void)");
ms871=e2s("Tstring *ms");
ms870=e2s(".\n");
ms869=e2s("Manifest string used: ");
ms868=e2s("exit(0);\175""\175""\n");
ms867=e2s("rsp();\175""");
ms866=e2s("printf(\"\\n***Internal SmallEiffel Stack Error.\\n\");");
ms865=e2s("if (rs != rs_bot)\173""");
ms864=e2s("(n);\n");
ms863=e2s("ivT");
ms862=e2s("\nTotal: ");
ms861=e2s("=R;\175""/*PCO*/\n");
ms860=e2s("oR");
ms859=e2s("ens");
ms858=e2s(";\n");
ms857=e2s("NULL");
ms856=e2s(" _");
ms855=e2s(" R;\n");
ms854=e2s("req_last_chance=1;\n");
ms853=e2s("\175""\n");
ms852=e2s("req_last_result=1;\n");
ms851=e2s("if (!req_last_result) \173""");
ms850=e2s("req_last_result=1;\n");
ms849=e2s("req_last_chance=0;\n");
ms848=e2s("req");
ms847=e2s("req_last_chance=1;\n");
ms846=e2s("Pre-Computed Once Function(s) :");
ms845=e2s("n");
ms844=e2s("rs_lb=NULL;");
ms843=e2s("rs_top=rs_bot+rs_init_size-1;");
ms842=e2s("rs=rs_bot=(void **)malloc(rs_init_size*sizeof(void **));");
ms841=e2s("#define rs_init_size 16384");
ms840=e2s("se_manifest_strings();\n");
ms839=e2s("signal(SIGKILL,sigrsp);\n");
ms838=e2s("signal(SIGQUIT,sigrsp);\n");
ms837=e2s("signal(SIGINT,sigrsp);\n");
ms836=e2s("\".\nCurrently handled system :\n");
ms835=e2s("Unknow system name in file\n\"");
ms834=e2s("Amiga");
ms833=e2s("OS2");
ms832=e2s("DOS");
ms831=e2s("Windows");
ms830=e2s("UNIX");
ms829=e2s("\".\n");
ms828=e2s("Unable to find system name file\n\"");
ms827=e2s("system.se");
ms826=e2s("bin");
ms825=e2s("Macintosh");
ms824=e2s("se_argv=argv;");
ms823=e2s("se_argc=argc;");
ms822=e2s(";\n");
ms821=e2s("))");
ms820=e2s("*)se_new(");
ms819=e2s("((T");
ms818=e2s(" *n=");
ms817=e2s("se_sz_initialize();\173""");
ms816=e2s("void main(int argc,char *argv[])\173""");
ms815=e2s("char **se_argv");
ms814=e2s("int se_argc");
ms813=e2s("Define main function.\n");
ms812=e2s(".\n");
ms811=e2s("/* Cecil End */\n");
ms810=e2s(", ");
ms809=e2s("\175""\n");
ms808=e2s(";\n");
ms807=e2s(",a");
ms806=e2s("(T");
ms805=e2s("_px");
ms804=e2s("_ix");
ms803=e2s("rT");
ms801=e2s("return ");
ms800=e2s(".");
ms799=e2s("Empty Cecil function ");
ms798=e2s(" not created.");
ms797=e2s("void *");
ms796=e2s("void *");
ms795=e2s("void ");
ms794=e2s("T0 *");
ms793=e2s("/* Cecil prototypes : */\n");
ms792=e2s("Define Cecil for : ");
ms791=e2s("rs-=2;return C;\175""\n");
ms790=e2s("=0;\175""\n");
ms789=e2s("af_");
ms788=e2s(");\n");
ms787=e2s("ac_");
ms786=e2s(";\n");
ms785=e2s("0,0,0");
ms784=e2s("rs_pPOS(tag_pos_");
ms783=e2s("=1;\n");
ms782=e2s(")\173""af_");
ms781=e2s("if (!af_");
ms780=e2s("inv");
ms779=e2s("];\n");
ms778=e2s("*rs++=(void *)doingInvariantId;*rs++=(void *)p[");
ms777=e2s(" *C)");
ms776=e2s("(T");
ms775=e2s(" *ivT");
ms774=e2s("T");
ms773=e2s("Compiling routines for :\n");
ms772=e2s("Reference Types:\n");
ms771=e2s("\175"";\n");
ms770=e2s(" _");
ms769=e2s("T0*");
ms768=e2s("int id;");
ms767=e2s("struct sT");
ms766=e2s("Expanded Types:\n");
ms765=e2s(".\n");
ms764=e2s("Types really used (object created): ");
ms763=e2s(".\n");
ms762=e2s("Total Types defined : ");
ms761=e2s(";\n");
ms760=e2s(" T");
ms759=e2s("typedef struct sT");
ms758=e2s("Compiling to C Types :\n");
ms757=e2s(".\n");
ms756=e2s("/* User\'s Macro End */\n");
ms755=e2s("/* User\'s Macro-Definitions : */\n");
ms754=e2s("Define Users\'s C Macro.\n");
ms753=e2s("0 AF_CIV_0 AF_LIV_0 AF_INV_0 AF_ENS_0 AF_REQ_0");
ms752=e2s("1 AF_CIV_1 AF_LIV_1 AF_INV_1 AF_ENS_1 AF_REQ_1");
ms751=e2s("CIV_0 ");
ms750=e2s("CIV_1 ");
ms749=e2s("CIV_0 af_civ=0;");
ms748=e2s("CIV_1 af_civ=1;");
ms747=e2s("rs-=8;");
ms746=e2s("if (!v) error0(\"Check Assertion Violated.\");");
ms745=e2s("void ac_civ(int v)");
ms744=e2s("int af_civ");
ms743=e2s("LIV_0 ");
ms742=e2s("LIV_1 ");
ms741=e2s("LIV_0 af_liv=0;");
ms740=e2s("LIV_1 af_liv=1;");
ms739=e2s("exit(1);");
ms738=e2s("printf(\"*** Error at Run Time *** : Bad Loop Variant.\\n\");");
ms737=e2s("else \173""rs-=8;return lv2;\175""");
ms736=e2s("printf(\"Loop Body Count = %d (done)\\nNew Variant = %d\\nPrevious Variant = %d\\n\",lc,lv2,lv1);\175""");
ms735=e2s("rsp();");
ms734=e2s("else if ((lv2 < 0)\174""\174""(lv2 >= lv1))\173""");
ms733=e2s("else \173""rs-=8;return lv2;\175""\175""");
ms732=e2s("printf(\"Bad First Variant Value = %d\\n\",lv2);\175""");
ms731=e2s("rsp();");
ms730=e2s("if (lc==0)\173""if (lv2 < 0)\173""");
ms729=e2s("int lvc(int lc,int lv1,int lv2)");
ms728=e2s("rs-=8;");
ms727=e2s("if (!v) error0(\"Loop Invariant Violation.\");");
ms726=e2s("void ac_liv(int v)");
ms725=e2s("int af_liv");
ms724=e2s("INV_0 ");
ms723=e2s("INV_1 ");
ms722=e2s("INV_0 af_inv=0;");
ms721=e2s("INV_1 af_inv=1;");
ms720=e2s("rs-=8;");
ms719=e2s("if (!v) error0(\"Class Invariant Violation.\");");
ms718=e2s("void ac_inv(int v)");
ms717=e2s("int af_inv");
ms716=e2s("ENS_0 ");
ms715=e2s("ENS_1 ");
ms714=e2s("ENS_0 af_ens=0;");
ms713=e2s("ENS_1 af_ens=1;");
ms712=e2s("rs-=8;");
ms711=e2s("if (!v) error0(\"Ensure Assertion Violated.\");");
ms710=e2s("void ac_ens(int v)");
ms709=e2s("int af_ens");
ms708=e2s("REQ_0 ");
ms707=e2s("REQ_1 ");
ms706=e2s("REQ_0 af_req=0;");
ms705=e2s("REQ_1 af_req=1;");
ms704=e2s("#define AF_");
ms703=e2s("rs-=8;");
ms702=e2s("req_last_result=req_last_result&&v;");
ms701=e2s("error0(\"Require Assertion Violated.\");");
ms700=e2s("if (!v && req_last_chance)");
ms699=e2s("void ac_req(int v)");
ms698=e2s("int af_req");
ms697=e2s(";\n");
ms696=e2s(";\n");
ms695=e2s("extern ");
ms694=e2s("int req_last_result");
ms693=e2s("int req_last_chance");
ms692=e2s("*rs++=(void *)e;");
ms691=e2s("*rs++=(void *)expandedId;");
ms690=e2s("*rs++=(void *)n;");
ms689=e2s("*rs++=(void *)nameId;");
ms688=e2s("rs_need(4);");
ms687=e2s("void rs_pEXP(void *e,char *n)");
ms686=e2s("*rs++=(void *)r;");
ms685=e2s("*rs++=(void *)referenceId;");
ms684=e2s("*rs++=(void *)n;");
ms683=e2s("*rs++=(void *)nameId;");
ms682=e2s("rs_need(4);");
ms681=e2s("void rs_pREF(void **r,char *n)");
ms680=e2s("*rs++=(void *)p;");
ms679=e2s("*rs++=(void *)pointerId;");
ms678=e2s("*rs++=(void *)n;");
ms677=e2s("*rs++=(void *)nameId;");
ms676=e2s("rs_need(4);");
ms675=e2s("void rs_pPOI(void*p,char *n)");
ms674=e2s("*rs++=(void *)d;");
ms673=e2s("*rs++=(void *)doubleId;");
ms672=e2s("*rs++=(void *)n;");
ms671=e2s("*rs++=(void *)nameId;");
ms670=e2s("rs_need(4);");
ms669=e2s("void rs_pDOU(double *d,char *n)");
ms668=e2s("*rs++=(void *)r;");
ms667=e2s("*rs++=(void *)realId;");
ms666=e2s("*rs++=(void *)n;");
ms665=e2s("*rs++=(void *)nameId;");
ms664=e2s("rs_need(4);");
ms663=e2s("void rs_pREA(float *r,char *n)");
ms662=e2s("*rs++=(void *)b;");
ms661=e2s("*rs++=(void *)booleanId;");
ms660=e2s("*rs++=(void *)n;");
ms659=e2s("*rs++=(void *)nameId;");
ms658=e2s("rs_need(4);");
ms657=e2s("void rs_pBOO(int *b,char *n)");
ms656=e2s("*rs++=(void *)c;");
ms655=e2s("*rs++=(void *)characterId;");
ms654=e2s("*rs++=(void *)n;");
ms653=e2s("*rs++=(void *)nameId;");
ms652=e2s("rs_need(4);");
ms651=e2s("void rs_pCHA(char *c,char *n)");
ms650=e2s("*rs++=(void *)i;");
ms649=e2s("*rs++=(void *)integerId;");
ms648=e2s("*rs++=(void *)n;");
ms647=e2s("*rs++=(void *)nameId;");
ms646=e2s("rs_need(4);");
ms645=e2s("void rs_pINT(int *i,char *n)");
ms644=e2s("return e;");
ms643=e2s("rs-=8;");
ms642=e2s("int rs_pop_int(int e)");
ms641=e2s("*rs++=(void *)tp;");
ms640=e2s("*rs++=(void *)doingWhatId;");
ms639=e2s("*rs++=(void *)f;");
ms638=e2s("*rs++=(void *)pathId;");
ms637=e2s("*rs++=(void *)c;");
ms636=e2s("*rs++=(void *)columnId;");
ms635=e2s("*rs++=(void *)l;");
ms634=e2s("*rs++=(void *)lineId;");
ms633=e2s("rs_need(8);");
ms632=e2s("void rs_pPOS(char* tp,int l,int c,int f)");
ms631=e2s("rs_lb=rs_lb-(int)(*rs_lb);");
ms630=e2s("rs=rs_lb-1;");
ms629=e2s("void rs_unlink(void)");
ms628=e2s("*rs++=(void *)tag;");
ms627=e2s("*rs++=(void *)featureTagId;");
ms626=e2s("rs_lb=rs++;");
ms625=e2s("*rs=(void *)(rs-rs_lb);");
ms624=e2s("*rs++=(void *)linkId;");
ms623=e2s("rs_need(4);");
ms622=e2s("void rs_link(char *tag)");
ms621=e2s("rs_bot=new_rs_bot;\175""");
ms620=e2s("rs_lb=new_rs_bot+(rs_lb-rs_bot);");
ms619=e2s("rs=new_rs_bot+(rs-rs_bot);");
ms618=e2s("rs_top=new_rs_bot+new_size-1;");
ms617=e2s("if (new_rs_bot==NULL) error0(\"Stack Overflow.\");");
ms616=e2s("return;\175""");
ms615=e2s("rs_top=rs_bot+new_size-1;");
ms614=e2s("if (new_rs_bot==rs_bot) \173""");
ms613=e2s("printf(\"New size for stack is %d\\n\",new_size);");
ms612=e2s("void **new_rs_bot=(void **)realloc(rs_bot,new_size*sizeof(void **));");
ms611=e2s("\173""int new_size=(rs_top-rs_bot+1)*2;");
ms610=e2s("error0(\"Stack Overflow.\");\175""");
ms609=e2s("if ((rs_top-rs_bot)>262144) \173""");
ms608=e2s("printf(\"Stack must grow.\\n\");");
ms607=e2s("if (rs+size < rs_top) return;");
ms606=e2s("void rs_need(int size)");
ms605=e2s("void **rs_top");
ms604=e2s("void **rs_lb");
ms603=e2s("void **rs");
ms602=e2s("void **rs_bot");
ms601=e2s(";\n");
ms600=e2s(";\n");
ms599=e2s("extern ");
ms598=e2s("tag_pos_6");
ms597=e2s("variant exp.");
ms596=e2s("tag_pos_5");
ms595=e2s("creation call");
ms594=e2s("tag_pos_4");
ms593=e2s("assertion");
ms592=e2s("tag_pos_3");
ms591=e2s("instruction");
ms590=e2s("tag_pos_2");
ms589=e2s("boolean exp.");
ms588=e2s("tag_pos_1");
ms587=e2s("assignment");
ms586=e2s("[];\n");
ms585=e2s("extern char ");
ms584=e2s("\";\n");
ms583=e2s("[]=\"");
ms582=e2s("char ");
ms581=e2s("doingInvariant");
ms580=e2s("doingWhat");
ms579=e2s("path");
ms578=e2s("line");
ms577=e2s("column");
ms576=e2s("name");
ms575=e2s("featureTag");
ms574=e2s("link");
ms573=e2s("reference");
ms572=e2s("expanded");
ms571=e2s("pointer");
ms570=e2s("double");
ms569=e2s("real");
ms568=e2s("boolean");
ms567=e2s("character");
ms566=e2s("integer");
ms565=e2s("general");
ms564=e2s("Id ");
ms563=e2s("#define ");
ms562=e2s("general");
ms561=e2s(" T");
ms560=e2s("#define T");
ms559=e2s("return n;");
ms558=e2s("n->id=id;");
ms557=e2s("memset(n,0,sz);");
ms556=e2s("T0 *n=malloc(sz);");
ms555=e2s("int sz=s[id];");
ms554=e2s("T0 *se_new(int id)");
ms553=e2s("\175""\n");
ms552=e2s("\173""\n");
ms551=e2s(";\n");
ms550=e2s("struct sTarray\173""int id;int _capacity;int _lower;int _upper;T0**_storage;\175"";");
ms549=e2s("typedef struct sTarray Tarray;");
ms548=e2s("struct sTstring\173""int id;int _count;char *_storage;int _capacity;\175"";");
ms547=e2s("typedef struct sTstring Tstring;");
ms546=e2s("struct sT0\173""int id;\175"";");
ms545=e2s("typedef struct sT0 T0;");
ms544=e2s("<float.h>");
ms543=e2s("<limits.h>");
ms542=e2s("<stdarg.h>");
ms541=e2s("<stddef.h>");
ms540=e2s("<signal.h>");
ms539=e2s("<stdlib.h>");
ms538=e2s("<string.h>");
ms537=e2s("<stdio.h>");
ms536=e2s("\n");
ms535=e2s("#include ");
ms534=e2s("-lm");
ms533=e2s("<math.h>");
ms532=e2s("\"\n");
ms531=e2s("#include \"");
ms530=e2s("*/\n");
ms529=e2s("/* ANSI C code generated by SmallEiffel. */\n/*\n");
ms528=e2s(".c");
ms527=e2s(".h");
ms526=e2s("No <root class>.");
ms525=e2s("\".\n");
ms524=e2s("Cannot write in file \"");
ms523=e2s("w");
ms522=e2s("Base class parsed : ");
ms521=e2s(" features).\n");
ms520=e2s("End of Falling Down (approx. ");
ms519=e2s(" features).\n");
ms518=e2s("Starting Falling Down (approx. ");
ms517=e2s("SMALL_EIFFEL/error handler not empty.\n");
ms516=e2s("print");
ms515=e2s("Internal Error #1 in RUN_CLASS.");
ms514=e2s(" in class ");
ms513=e2s("There is no feature ");
ms512=e2s(").");
ms511=e2s("Bad instruction (when interpreted in ");
ms510=e2s("Bad declaration.");
ms509=e2s(" must not have arguments.");
ms508=e2s("Creation procedure ");
ms507=e2s("Invalid Root (not a procedure).");
ms506=e2s(". Missing redefine ?");
ms505=e2s("Invalid redefinition in ");
ms504=e2s("Incompatible headings for redefinition.");
ms503=e2s(".");
ms502=e2s(" Cannot inherit thoses features in ");
ms501=e2s(".");
ms500=e2s(" Cannot inherit thoses features in ");
ms499=e2s("Incompatible number of arguments.");
ms498=e2s("One has argument(s) but not the other.");
ms497=e2s("One has Result but not the other.");
ms496=e2s("Cannot redefine a frozen feature.");
ms495=e2s("Constant feature cannot be redefined.");
ms494=e2s("Inheritance clash (or somthing is  Not Yet Implemented) ?");
ms493=e2s("Incompatible headings.");
ms492=e2s("Incompatible headings.");
ms491=e2s("Incompatible headings.");
ms490=e2s(" Cannot merge thoses features.");
ms489=e2s("Incompatible types in ");
ms488=e2s("Bad number of arguments.");
ms487=e2s(" Cannot merge thoses features.");
ms486=e2s("Incompatible number of arguments.");
ms485=e2s("One has argument(s) but not the other.");
ms484=e2s("One has Result but not the other.");
ms483=e2s("Multiple select for feature ");
ms482=e2s("It is not a feature of the parent.");
ms481=e2s("\".");
ms480=e2s("\" in \"");
ms479=e2s("Problem with undefine of \"");
ms478=e2s("A frozen feature must not be undefined (VDUS).");
ms477=e2s("Cannot load base class for ");
ms476=e2s("BASE_CLASS / does_not_understand.");
ms475=e2s(" is not BOOLEAN.");
ms474=e2s("Type ");
ms473=e2s("Bad Assertion.");
ms472=e2s("Class Not found.");
ms471=e2s(". Invalid Root.");
ms470=e2s(" has no feature ");
ms469=e2s("foo :-)");
ms468=e2s(" is not a Valid Root.");
ms467=e2s("Creation Call not allowed.");
ms466=e2s(" is not allowed to use feature.");
ms465=e2s(". Loop in ");
ms464=e2s("Cyclic inheritance graph. Start from ");
ms463=e2s(" does not belong to a creation clause of ");
ms462=e2s(")");
ms461=e2s(" in ");
ms460=e2s(", column ");
ms459=e2s("line ");
ms458=e2s(" (");
ms457=e2s(" has no creation clause.");
ms456=e2s(")");
ms455=e2s(" (file ");
ms454=e2s("class ");
ms453=e2s("make");
ms452=e2s(" cannot be a root class since it is a deferred class.");
ms451=e2s(" cannot be a root class since it is a generic class.");
ms450=e2s("Cannot load root class ");
ms449=e2s("Cannot load class.");
ms448=e2s("Cannot find class.");
ms447=e2s("Parsing :\n");
ms446=e2s("-- SmallEiffel  -- Release (- 0.95)    --      FRANCE\n-- Copyright (C), 1994 - Dominique COLNET and Suzanne COLLIN \n-- University Henri Poincare\' - Nancy 1 - email colnet@loria.fr \n-- CRIN (Centre de Recherche en Informatique de Nancy)\n-- FRANCE \n");
ms445=e2s("gcc");
ms444=e2s("compile_to_c: flag \"-o\" appear twice.");
ms443=e2s("-o");
ms442=e2s("-l");
ms441=e2s("-cc");
ms440=e2s("-no_strip");
ms439=e2s("-debug_check");
ms438=e2s("-all_check");
ms437=e2s("-loop_check");
ms436=e2s("-invariant_check");
ms435=e2s("-ensure_check");
ms434=e2s("-require_check");
ms433=e2s("-no_check");
ms432=e2s(").\n");
ms431=e2s("****** Too many errors (");
ms430=e2s("Error");
ms429=e2s("------\n");
ms428=e2s("\n");
ms427=e2s("SmallEiffel cannot load base class : ");
ms426=e2s("^\n");
ms425=e2s(" :\n");
ms424=e2s(" (");
ms423=e2s("\".");
ms422=e2s(" does not contains class \"");
ms421=e2s("File \"");
ms420=e2s("Unable to load class.");
ms419=e2s("Cannot redefine unexistant feature (VDRS.1).");
ms418=e2s("Parent have not this feature.");
ms417=e2s("Redefinition not found.");
ms416=e2s("Feature not found in corresponding parent.");
ms415=e2s("Feature not found in corresponding parent.");
ms414=e2s("Double definition of feature ");
ms413=e2s("Internal Error #2 in POSITION.");
ms412=e2s("Internal Error #1 in POSITION.");
ms411=e2s(" warning(s).\n");
ms410=e2s("*** ");
ms409=e2s("\" aborted.\n");
ms408=e2s("Load class \"");
ms407=e2s(" error(s). ");
ms406=e2s("*** ");
ms405=e2s("Keyword \"end\" expected at the end of a class.");
ms404=e2s("Must not put important comment after end of a class.");
ms403=e2s("End of text expected.");
ms402=e2s("invariant");
ms401=e2s("Attribute must not have formal arguments.");
ms400=e2s("Bad feature definition.");
ms399=e2s("A routine must be ended with \"end\".");
ms398=e2s("rescue");
ms397=e2s("Deferred feature must not have rescue compound.");
ms396=e2s("rescue");
ms395=e2s("ensure");
ms394=e2s("Routine body expected.");
ms393=e2s("once routine body");
ms392=e2s("once");
ms391=e2s("routine body");
ms390=e2s("Right hand side expression expected for assignment.");
ms389=e2s("Must not affect a formal argument.");
ms388=e2s("Must not affect `Void\'.");
ms387=e2s("Must not affect `Current\'.");
ms386=e2s("\')\' expected.");
ms385=e2s("Bad creation (procedure name expected).");
ms384=e2s("Bad creation (writable expected).");
ms383=e2s("A formal argument is not a writable variable.");
ms382=e2s("Current is not a writable variable.");
ms381=e2s("Bad creation (\'!\' expected).");
ms380=e2s("Bad creation (type or \'!\' expected).");
ms379=e2s("Explicit creation type mark must not be anchored.");
ms378=e2s("loop body");
ms377=e2s("Keyword \"loop\" expected (in a loop).");
ms376=e2s("loop");
ms375=e2s("Keyword \"until\" expected (in a loop).");
ms374=e2s("Boolean expression expected (until).");
ms373=e2s("until");
ms372=e2s("Variant (INTEGER) Expression Expected.");
ms371=e2s("variant");
ms370=e2s("invariant");
ms369=e2s("from part of a loop");
ms368=e2s("from");
ms367=e2s("Added \"end\" for inspect instruction.");
ms366=e2s("else of inspect");
ms365=e2s("when item");
ms364=e2s("when item");
ms363=e2s("Error in inspect.");
ms362=e2s("when item");
ms361=e2s("when");
ms360=e2s("Expression expected (\"inspect ... \").");
ms359=e2s("inspect");
ms358=e2s("\"retry\" cannot be outside of a rescue clause.");
ms357=e2s("retry");
ms356=e2s("Keyword \"end\".");
ms355=e2s("else part");
ms354=e2s("In \"elseif ... then ...\".");
ms353=e2s("elseif");
ms352=e2s("In \"if ... then ...\".");
ms351=e2s("then part");
ms350=e2s("Added \"then\".");
ms349=e2s("if");
ms348=e2s("debug");
ms347=e2s("\" expected.");
ms346=e2s("). Instruction or keyword \"");
ms345=e2s("In compound (");
ms344=e2s("\")\" expected to end debug string list.");
ms343=e2s("Empty debug key list (deleted).");
ms342=e2s("debug");
ms341=e2s("Keyword \"end\" expected at the end of check clause.");
ms340=e2s("Empty check instruction removed.");
ms339=e2s("do");
ms338=e2s("Alias name of external expected.");
ms337=e2s("alias");
ms336=e2s("\" not yet implemented.");
ms335=e2s("Interface with langage \"");
ms334=e2s("C");
ms333=e2s("CWC");
ms332=e2s("CSE");
ms331=e2s("External langage name expected.");
ms330=e2s("external");
ms329=e2s("deferred");
ms328=e2s("Bad local variable list.");
ms327=e2s("Substitute with \";\".");
ms326=e2s("Same identifier appears twice (local/formal).");
ms325=e2s("Substitute with \",\".");
ms324=e2s("Same identifier appears twice (local/formal).");
ms323=e2s("local");
ms322=e2s("Expression expected after \'implies\'.");
ms321=e2s(">");
ms320=e2s(">");
ms319=e2s("<");
ms318=e2s("<");
ms317=e2s(">=");
ms316=e2s(">=");
ms315=e2s("<=");
ms314=e2s("<=");
ms313=e2s("/=");
ms312=e2s("/=");
ms311=e2s("=");
ms310=e2s("=");
ms309=e2s("\\\\");
ms308=e2s("\\\\");
ms307=e2s("//");
ms306=e2s("//");
ms305=e2s("*");
ms304=e2s("*");
ms303=e2s("^");
ms302=e2s("^");
ms301=e2s("Syntax Error.");
ms300=e2s("Expression expected after \"old\".");
ms299=e2s("Added brackets for manifest constant before dot.");
ms298=e2s("Expression expected.");
ms297=e2s("\')\' expected in expression.");
ms296=e2s("An expression has a result value. This is not an instruction.");
ms295=e2s("Identifier expected after a dot.");
ms294=e2s("\')\' expected to end arguments list.");
ms293=e2s("Empty argument list (deleted).");
ms292=e2s("This name must not appear after a dot.");
ms291=e2s("Void");
ms290=e2s("`Result\' must only be used inside a function.");
ms289=e2s("Result");
ms288=e2s("\'(\' expected to begin a strip list.");
ms287=e2s("\')\' expected to end a strip expression.");
ms286=e2s("strip");
ms285=e2s("Expression \"old\" can be used in ensure clause only.");
ms284=e2s("old");
ms283=e2s("Bad use of prefix operator. ");
ms282=e2s("- (prefix)");
ms281=e2s("+ (prefix)");
ms280=e2s("\" expected.");
ms279=e2s("Right hand side expression of \"");
ms278=e2s("End of manifest array expected.");
ms277=e2s("require");
ms276=e2s("Obsolete manifest string expected.");
ms275=e2s("obsolete");
ms274=e2s("This constant feature should have a result type (INTEGER).");
ms273=e2s("The type of this constant feature should be INTEGER  or REAL.");
ms272=e2s("INTEGER_CONSTANT/nyi.");
ms271=e2s("This constant feature should have a result type (REAL).");
ms270=e2s("The type of this constant feature should be REAL.");
ms269=e2s("REAL_CONSTANT/nyi.");
ms268=e2s("REAL truncated to INTEGER");
ms267=e2s("The type of this constant feature should be BIT.");
ms266=e2s("The type of this constant feature should be STRING.");
ms264=e2s("C=a1;");
ms263=e2s("The type of this constant feature should be CHARACTER.");
ms262=e2s("The type of this constant feature should be BOOLEAN.");
ms261=e2s("Unique feature must have INTEGER type.");
ms260=e2s("Unique feature must have a result type.");
ms259=e2s("unique");
ms258=e2s("is");
ms257=e2s("Type mark expected.");
ms256=e2s("Circular anchored definition.");
ms255=e2s("Empty formal argument list (deleted).");
ms254=e2s("Bad formal aguments list.");
ms253=e2s("Substitute with \";\".");
ms252=e2s("Deleted extra separator.");
ms251=e2s("Synonym feature name expected.");
ms250=e2s("Frozen feature name synonym expected.");
ms249=e2s("frozen");
ms248=e2s("frozen");
ms247=e2s("feature");
ms246=e2s("Empty creation list (deleted).");
ms245=e2s("Inheritance option not at a good place. The good order is: \"rename... export... undefine... redefine... select...\".");
ms244=e2s("select");
ms243=e2s("redefine");
ms242=e2s("undefine");
ms241=e2s("export");
ms240=e2s("rename");
ms239=e2s("select");
ms238=e2s("redefine");
ms237=e2s("undefine");
ms236=e2s("Added \";\".");
ms235=e2s("Same feature name appears twice.");
ms234=e2s("Feature name expected.");
ms233=e2s("all");
ms232=e2s("Deleted extra semi-colon.");
ms231=e2s("Same Class Name appears twice.");
ms230=e2s("Bad clients list.");
ms229=e2s("Unexpected bracket.");
ms228=e2s("Unexpected comma (deleted).");
ms227=e2s("export");
ms226=e2s("Unexpected \";\" to end rename list.");
ms225=e2s("Second identifier of a \"rename\" pair expected.");
ms224=e2s("New name and old name should be different.");
ms223=e2s("as");
ms222=e2s("rename");
ms221=e2s("\" because it is not yet implemented (sorry).");
ms220=e2s("You cannot inherit from \"");
ms219=e2s("A class cannot inherit itself.");
ms218=e2s("inherit");
ms217=e2s("Manifest string expected for \"obsolete\" clause.");
ms216=e2s("obsolete");
ms215=e2s("Class name appears twice in formal generic list (VCFG-2).");
ms214=e2s("Empty formal generic list (deleted).");
ms213=e2s("Constraint Class name expected.");
ms212=e2s("Bad generic list.");
ms211=e2s("Added \",\".");
ms210=e2s("Empty generic list (deleted).");
ms209=e2s("Type mark expected.");
ms208=e2s("Deleted extra coma.");
ms207=e2s("Bad use of predefined type ARRAY.");
ms206=e2s("ARRAY[");
ms205=e2s("Expected constant for BIT_N type declaration.");
ms204=e2s("Must find a class type after \"expanded\".");
ms203=e2s("expanded ");
ms202=e2s("Anchor expected. An anchor could be `Current\', a feature name or an argument name.");
ms201=e2s("like ");
ms200=e2s("like ");
ms199=e2s("Current");
ms198=e2s("like");
ms197=e2s("Name of the current class expected.");
ms196=e2s("Cannot write such a class.");
ms195=e2s("BIT");
ms194=e2s("DOUBLE_REF");
ms193=e2s("DOUBLE");
ms192=e2s("REAL_REF");
ms191=e2s("REAL");
ms190=e2s("INTEGER_REF");
ms189=e2s("INTEGER");
ms188=e2s("FIXED_ARRAY");
ms187=e2s("CHARACTER_REF");
ms186=e2s("CHARACTER");
ms185=e2s("BOOLEAN_REF");
ms184=e2s("BOOLEAN");
ms183=e2s("STRING");
ms182=e2s("ARRAY");
ms181=e2s("POINTER_REF");
ms180=e2s("POINTER");
ms179=e2s("NONE");
ms178=e2s("GENERAL");
ms177=e2s("ANY");
ms176=e2s("Class name must use only uppercase letters.");
ms175=e2s("Keyword \"class\" expected.");
ms174=e2s("class");
ms173=e2s("deferred");
ms172=e2s("A class cannot be expanded and deferred.");
ms171=e2s("deferred");
ms170=e2s("Index value expected (\"indexing ...\").");
ms169=e2s("It is not an integer value.");
ms168=e2s("REAL_CONSTANT/nyi.");
ms167=e2s("Exponent of a real value expected.");
ms166=e2s("Underscore in fractionnal part must group 3 digits.");
ms165=e2s("Underscore in number must group 3 digits.");
ms164=e2s("In extended form of manifest string. Bad character before \'%\'.");
ms163=e2s("In extended form of manifest string.Bad character after \'%\'.");
ms162=e2s("Unknown special character.");
ms161=e2s("Unexpected new line in manifest string.");
ms160=e2s("Unknown special character.");
ms159=e2s("Three digit is enought for an ascii code.");
ms158=e2s("Bad (empty ?) ascii code.");
ms157=e2s("Unexpected character in ascii code.");
ms156=e2s("Bad character constant.");
ms155=e2s("false");
ms154=e2s("true");
ms153=e2s("Identifier must use only lowercase letters.");
ms152=e2s("when");
ms151=e2s("variant");
ms150=e2s("until");
ms149=e2s("unique");
ms148=e2s("undefine");
ms147=e2s("true");
ms146=e2s("then");
ms145=e2s("strip");
ms144=e2s("separate");
ms143=e2s("select");
ms142=e2s("retry");
ms141=e2s("rescue");
ms140=e2s("require");
ms139=e2s("rename");
ms138=e2s("redefine");
ms137=e2s("prefix");
ms136=e2s("once");
ms135=e2s("old");
ms134=e2s("obsolete");
ms133=e2s("loop");
ms132=e2s("local");
ms131=e2s("like");
ms130=e2s("is");
ms129=e2s("invariant");
ms128=e2s("inspect");
ms127=e2s("inherit");
ms126=e2s("infix");
ms125=e2s("indexing");
ms124=e2s("if");
ms123=e2s("frozen");
ms122=e2s("from");
ms121=e2s("feature");
ms120=e2s("false");
ms119=e2s("external");
ms118=e2s("export");
ms117=e2s("expanded");
ms116=e2s("ensure");
ms115=e2s("end");
ms114=e2s("elseif");
ms113=e2s("do");
ms112=e2s("deferred");
ms111=e2s("debug");
ms110=e2s("creation");
ms109=e2s("class");
ms108=e2s("check");
ms107=e2s("as");
ms106=e2s("all");
ms105=e2s("alias");
ms104=e2s("Character \'%\"\' inserted.");
ms103=e2s("Infix operator name expected.");
ms102=e2s("or else");
ms101=e2s("else");
ms100=e2s("or");
ms99=e2s("and then");
ms98=e2s("then");
ms97=e2s("and");
ms96=e2s("implies");
ms95=e2s("xor");
ms94=e2s("^");
ms93=e2s("<");
ms92=e2s(">");
ms91=e2s("/");
ms90=e2s("*");
ms89=e2s("\\\\");
ms88=e2s("//");
ms87=e2s(">=");
ms86=e2s("<=");
ms85=e2s("Character \'%\"\' inserted after \"infix\".");
ms84=e2s("infix");
ms83=e2s("Character \'%\"\' inserted.");
ms82=e2s("Prefix operator name expected.");
ms81=e2s("-");
ms80=e2s("+");
ms79=e2s("***");
ms78=e2s("not");
ms77=e2s("Character \'%\"\' inserted after \"prefix\".");
ms76=e2s("Warning");
ms75=e2s("prefix");
ms74=e2s("indexing");
ms73=e2s("FOO");
ms72=e2s("\".");
ms71=e2s("Cannot read file : \"");
ms70=e2s("Correct previous error(s) first.");
ms69=e2s("\". ");
ms68=e2s("set to \"");
ms67=e2s("not set. ");
ms66=e2s("\" is\n");
ms65=e2s("Environment Variable \"");
ms64=e2s("\nLoading path is :\n");
ms63=e2s("\". ");
ms62=e2s("Unable to find file for class \"");
ms61=e2s("\".");
ms60=e2s("Bad \"rename.se\" file.\nCannot open \"");
ms58=e2s(".\n");
ms57=e2s("\" and \n\"");
ms56=e2s("\" in \"rename.se\" files.\nClash for \n\"");
ms55=e2s("Multiple entry for \"");
ms54=e2s("rename.se");
ms53=e2s("                                                    ");
ms52=e2s("lib_test");
ms51=e2s("lib_show");
ms50=e2s("lib_std");
ms49=e2s("\".\n");
ms48=e2s("Cannot read file \"");
ms47=e2s("loadpath.se");
ms46=e2s(".e");
ms45=e2s("                                                    ");
ms44=e2s("Internal Error #1 in SMALL_EIFFEL.");
ms43=e2s("Fatal Error");
ms42=e2s(" in ");
ms41=e2s(" column ");
ms40=e2s("0123456789");
ms39=e2s("Line ");
ms38=e2s(" : ");
ms37=e2s("****** ");
ms36=e2s(".");
ms35=e2s(". Bad flag ");
ms34=e2s("compile_to_c: level is already set to ");
ms33=e2s("-boost");
ms32=e2s(".c");
ms30=e2s(".o");
ms28=e2s("compile_to_c");
ms25=e2s("r");
ms24=e2s("\".\n");
ms23=e2s("Unable to find help file \"");
ms21=e2s(".hlp");
ms20=e2s("man");
ms19=e2s("/usr/local/logiciel/SmallEiffel");
ms15=e2s("SmallEiffel");
ms9=e2s("Bad use of command `compile_to_c\'.\n");
ms5=e2s("Error while writing character.");
}

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.