home *** CD-ROM | disk | FTP | other *** search
/ Amiga ACS 1998 #4 / amigaacscoverdisc1998-041998.iso / utilities / shareware / dev / ppcsmalleiffel / source.lha / bin_c / short34.c < prev    next >
Encoding:
C/C++ Source or Header  |  1998-01-16  |  25.4 KB  |  1,067 lines
  1. /*
  2. -- ANSI C code generated by :
  3. -- SmallEiffel The GNU Eiffel Compiler -- Release (- 0.82)      --
  4. -- Copyright (C), 1994-98 - LORIA - UHP - CRIN - INRIA - FRANCE --
  5. -- Dominique COLNET and Suzanne COLLIN -    colnet@loria.fr     --
  6. --                 http://www.loria.fr/SmallEiffel              --
  7. */
  8. #include "short.h"
  9. void se_msi30(void){
  10. ms134_818=se_ms(9,"when item");
  11. ms133_818=se_ms(9,"when item");
  12. ms142_818=se_ms(17,"Error in inspect.");
  13. ms132_818=se_ms(9,"when item");
  14. ms101_818=se_ms(36,"Added \"end\" for inspect instruction.");
  15. ms100_818=se_ms(15,"else of inspect");
  16. ms30_818=se_ms(45,"\"retry\" cannot be outside of a rescue clause.");
  17. ms126_818=se_ms(25,"In \"elseif ... then ...\".");
  18. ms125_818=se_ms(21,"In \"if ... then ...\".");
  19. ms127_818=se_ms(13,"Added \"then\".");
  20. ms128_818=se_ms(9,"then part");
  21. ms144_818=se_ms(10,"Added \";\".");
  22. ms61_818=se_ms(20,"Keyword \"end\" added.");
  23. ms60_818=se_ms(9,"else part");
  24. ms69_818=se_ms(31,"Empty debug key list (deleted).");
  25. ms70_818=se_ms(38,"\")\" expected to end debug string list.");
  26. ms71_818=se_ms(5,"debug");
  27. ms48_818=se_ms(32,"Empty check instruction removed.");
  28. ms49_818=se_ms(50,"Keyword \"end\" expected at the end of check clause.");
  29. ms57_818=se_ms(13,"In compound (");
  30. }
  31. void se_msi31(void){
  32. ms58_818=se_ms(27,"). Instruction or keyword \"");
  33. ms59_818=se_ms(11,"\" expected.");
  34. ms6_355=se_ms(47,"Deferred feature must not have rescue compound.");
  35. ms7_505=se_ms(58,"This constant feature should have a result type (INTEGER).");
  36. ms6_505=se_ms(61,"The type of this constant feature should be INTEGER  or REAL.");
  37. ms9_505=se_ms(55,"This constant feature should have a result type (REAL).");
  38. ms8_505=se_ms(49,"The type of this constant feature should be REAL.");
  39. ms4_505=se_ms(48,"The type of this constant feature should be BIT.");
  40. ms10_505=se_ms(51,"The type of this constant feature should be STRING.");
  41. ms5_505=se_ms(54,"The type of this constant feature should be CHARACTER.");
  42. ms3_505=se_ms(52,"The type of this constant feature should be BOOLEAN.");
  43. ms11_505=se_ms(39,"Unique feature must have a result type.");
  44. ms12_505=se_ms(38,"Unique feature must have INTEGER type.");
  45. ms149_818=se_ms(17,"Bad clients list.");
  46. ms56_818=se_ms(19,"Unexpected bracket.");
  47. ms153_818=se_ms(45,"Class name should use only uppercase letters.");
  48. ms1_46=se_ms(30,"Same Class Name appears twice.");
  49. ms119_818=se_ms(36,"Expression expected after \'implies\'.");
  50. ms1_517=se_ms(2,"/=");
  51. ms121_818=se_ms(2,"\\\\");
  52. }
  53. void se_msi32(void){
  54. ms1_453=se_ms(2,"\\\\");
  55. ms120_818=se_ms(2,"//");
  56. ms1_460=se_ms(2,"//");
  57. ms122_818=se_ms(1,"^");
  58. ms1_618=se_ms(13,"Syntax Error.");
  59. ms76_818=se_ms(51,"Expression \"old\" can be used in ensure clause only.");
  60. ms77_818=se_ms(32,"Expression expected after \"old\".");
  61. ms80_818=se_ms(48,"Added brackets for manifest constant before dot.");
  62. ms69_470=se_ms(27,"It is not an integer value.");
  63. ms158_818=se_ms(21,"Unexpected character.");
  64. ms29_818=se_ms(34,"Exponent of a real value expected.");
  65. ms139_818=se_ms(51,"Underscore in fractionnal part must group 3 digits.");
  66. ms147_818=se_ms(41,"Underscore in number must group 3 digits.");
  67. ms185_470=se_ms(2,"0.");
  68. ms28_818=se_ms(62,"In extended form of manifest string. Bad character before \'%\'.");
  69. ms27_818=se_ms(60,"In extended form of manifest string.Bad character after \'%\'.");
  70. ms26_818=se_ms(26,"Unknown special character.");
  71. ms146_818=se_ms(39,"Unexpected new line in manifest string.");
  72. ms1_805=se_ms(2,"ms");
  73. ms24_818=se_ms(26,"Unknown special character.");
  74. }
  75. void se_msi33(void){
  76. ms21_818=se_ms(35,"Unexpected character in ascii code.");
  77. ms23_818=se_ms(41,"Three digit is enought for an ascii code.");
  78. ms22_818=se_ms(25,"Bad (empty ?) ascii code.");
  79. ms148_818=se_ms(23,"Bad character constant.");
  80. ms79_818=se_ms(20,"Expression expected.");
  81. ms78_818=se_ms(27,"\')\' expected in expression.");
  82. ms135_818=se_ms(61,"An expression has a result value. This is not an instruction.");
  83. ms34_818=se_ms(32,"Identifier expected after a dot.");
  84. ms33_818=se_ms(38,"This name must not appear after a dot.");
  85. ms155_818=se_ms(41,"Feature name expected after \'$\' (VUAR.4).");
  86. ms152_818=se_ms(45,"`Result\' must only be used inside a function.");
  87. ms31_818=se_ms(30,"Empty argument list (deleted).");
  88. ms32_818=se_ms(35,"\')\' expected to end arguments list.");
  89. ms124_818=se_ms(35,"\'(\' expected to begin a strip list.");
  90. ms140_818=se_ms(22,"Feature name expected.");
  91. ms150_818=se_ms(19,"Deleted extra coma.");
  92. ms143_818=se_ms(10,"Added \",\".");
  93. ms145_818=se_ms(27,"Unexpected comma (deleted).");
  94. ms96_818=se_ms(38,"Character \'%\"\' inserted after \"infix\".");
  95. ms97_818=se_ms(29,"Infix operator name expected.");
  96. }
  97. void se_msi34(void){
  98. ms47_818=se_ms(1,"^");
  99. ms46_818=se_ms(2,"\\\\");
  100. ms45_818=se_ms(2,"//");
  101. ms2_902=se_ms(4,"_px_");
  102. ms98_818=se_ms(24,"Character \'%\"\' inserted.");
  103. ms110_818=se_ms(39,"Character \'%\"\' inserted after \"prefix\".");
  104. ms111_818=se_ms(30,"Prefix operator name expected.");
  105. ms112_818=se_ms(24,"Character \'%\"\' inserted.");
  106. ms1_953=se_ms(32,"Same feature name appears twice.");
  107. ms123_818=se_ms(39,"\')\' expected to end a strip expression.");
  108. ms75_818=se_ms(28,"Bad use of prefix operator. ");
  109. ms74_818=se_ms(10,"- (prefix)");
  110. ms73_818=se_ms(10,"+ (prefix)");
  111. ms11_818=se_ms(31,"Right hand side expression of \"");
  112. ms12_818=se_ms(11,"\" expected.");
  113. ms1_902=se_ms(4,"_ix_");
  114. ms72_818=se_ms(31,"End of manifest array expected.");
  115. ms159_818=se_ms(45,"Identifier should use only lowercase letters.");
  116. ms52_470=se_ms(4,"when");
  117. ms51_470=se_ms(7,"variant");
  118. }
  119. void se_msi35(void){
  120. ms48_470=se_ms(8,"undefine");
  121. ms49_470=se_ms(6,"unique");
  122. ms50_470=se_ms(5,"until");
  123. ms46_470=se_ms(4,"then");
  124. ms47_470=se_ms(4,"true");
  125. ms43_470=se_ms(6,"select");
  126. ms44_470=se_ms(8,"separate");
  127. ms45_470=se_ms(5,"strip");
  128. ms38_470=se_ms(8,"redefine");
  129. ms39_470=se_ms(6,"rename");
  130. ms40_470=se_ms(7,"require");
  131. ms41_470=se_ms(6,"rescue");
  132. ms42_470=se_ms(5,"retry");
  133. ms37_470=se_ms(6,"prefix");
  134. ms33_470=se_ms(8,"obsolete");
  135. ms34_470=se_ms(3,"old");
  136. ms35_470=se_ms(4,"once");
  137. ms30_470=se_ms(4,"like");
  138. ms31_470=se_ms(5,"local");
  139. ms32_470=se_ms(4,"loop");
  140. }
  141. void se_msi36(void){
  142. ms21_470=se_ms(2,"if");
  143. ms22_470=se_ms(8,"indexing");
  144. ms23_470=se_ms(5,"infix");
  145. ms24_470=se_ms(7,"inherit");
  146. ms25_470=se_ms(7,"inspect");
  147. ms27_470=se_ms(2,"is");
  148. ms17_470=se_ms(5,"false");
  149. ms18_470=se_ms(7,"feature");
  150. ms19_470=se_ms(4,"from");
  151. ms20_470=se_ms(6,"frozen");
  152. ms10_470=se_ms(4,"else");
  153. ms11_470=se_ms(6,"elseif");
  154. ms13_470=se_ms(6,"ensure");
  155. ms14_470=se_ms(8,"expanded");
  156. ms15_470=se_ms(6,"export");
  157. ms16_470=se_ms(8,"external");
  158. ms7_470=se_ms(5,"debug");
  159. ms8_470=se_ms(8,"deferred");
  160. ms9_470=se_ms(2,"do");
  161. ms4_470=se_ms(5,"check");
  162. }
  163. void se_msi37(void){
  164. ms5_470=se_ms(5,"class");
  165. ms6_470=se_ms(8,"creation");
  166. ms1_470=se_ms(5,"alias");
  167. ms2_470=se_ms(3,"all");
  168. ms3_470=se_ms(2,"as");
  169. ms26_470=se_ms(9,"invariant");
  170. ms53_818=se_ms(45,"Keyword \"end\" expected at the end of a class.");
  171. ms68_470=se_ms(25,"Deleted extra semi-colon.");
  172. ms52_818=se_ms(21,"End of text expected.");
  173. ms12_470=se_ms(3,"end");
  174. ms9_818=se_ms(13," warning(s).\n");
  175. ms10_818=se_ms(11," error(s).\n");
  176. ms4_818=se_ms(12,"Load class \"");
  177. ms5_818=se_ms(11,"\" aborted.\n");
  178. ms135_470=se_ms(6,"File \"");
  179. ms6_818=se_ms(27,"\" does not contains class \"");
  180. ms2_627=se_ms(30,"Internal Error #2 in POSITION.");
  181. ms1_627=se_ms(30,"Internal Error #1 in POSITION.");
  182. ms11_359=se_ms(29,"Double definition of feature ");
  183. ms67_470=se_ms(1,".");
  184. }
  185. void se_msi38(void){
  186. ms3_683=se_ms(5,"Error");
  187. ms5_683=se_ms(17,"Too many errors.\n");
  188. ms3_644=se_ms(42,"Cannot rename inexistant feature (VHRC.1).");
  189. ms4_644=se_ms(46,"Multiple rename for the same feature (VHRC.2).");
  190. ms9_877=se_ms(44,"Cannot undefine unexistant feature (VDUS.1).");
  191. ms10_877=se_ms(23,"Redefinition not found.");
  192. ms11_877=se_ms(44,"Cannot redefine unexistant feature (VDRS.1).");
  193. ms16_877=se_ms(40,"Cannot select unexistant feature (VMSS).");
  194. ms15_877=se_ms(41,"Missing select clause for those features.");
  195. ms14_877=se_ms(35,"Select conflict for those features.");
  196. ms2_473=se_ms(5,"ARRAY");
  197. ms3_473=se_ms(3,"BIT");
  198. ms4_473=se_ms(5,"BIT_N");
  199. ms5_473=se_ms(9,"BIT_N_REF");
  200. ms6_473=se_ms(7,"BOOLEAN");
  201. ms7_473=se_ms(11,"BOOLEAN_REF");
  202. ms8_473=se_ms(9,"CHARACTER");
  203. ms9_473=se_ms(13,"CHARACTER_REF");
  204. ms10_473=se_ms(10,"DICTIONARY");
  205. ms11_473=se_ms(6,"DOUBLE");
  206. }
  207. void se_msi39(void){
  208. ms12_473=se_ms(10,"DOUBLE_REF");
  209. ms13_473=se_ms(11,"FIXED_ARRAY");
  210. ms14_473=se_ms(7,"GENERAL");
  211. ms15_473=se_ms(7,"INTEGER");
  212. ms16_473=se_ms(11,"INTEGER_REF");
  213. ms17_473=se_ms(6,"MEMORY");
  214. ms18_473=se_ms(12,"NATIVE_ARRAY");
  215. ms19_473=se_ms(4,"NONE");
  216. ms20_473=se_ms(8,"PLATFORM");
  217. ms21_473=se_ms(7,"POINTER");
  218. ms22_473=se_ms(11,"POINTER_REF");
  219. ms23_473=se_ms(4,"REAL");
  220. ms24_473=se_ms(8,"REAL_REF");
  221. ms25_473=se_ms(6,"STRING");
  222. ms26_473=se_ms(13,"STD_FILE_READ");
  223. ms27_473=se_ms(3,"and");
  224. ms28_473=se_ms(8,"and then");
  225. ms29_473=se_ms(1,"@");
  226. ms30_473=se_ms(2,"\\\\");
  227. ms31_473=se_ms(1,"=");
  228. }
  229. void se_msi40(void){
  230. ms32_473=se_ms(2,">=");
  231. ms33_473=se_ms(1,">");
  232. ms34_473=se_ms(7,"implies");
  233. ms35_473=se_ms(2,"<=");
  234. ms36_473=se_ms(1,"<");
  235. ms37_473=se_ms(1,"-");
  236. ms38_473=se_ms(1,"*");
  237. ms39_473=se_ms(2,"/=");
  238. ms40_473=se_ms(3,"not");
  239. ms41_473=se_ms(2,"or");
  240. ms42_473=se_ms(7,"or else");
  241. ms43_473=se_ms(1,"+");
  242. ms44_473=se_ms(1,"^");
  243. ms45_473=se_ms(3,"@<<");
  244. ms46_473=se_ms(3,"@>>");
  245. ms47_473=se_ms(1,"/");
  246. ms48_473=se_ms(2,"//");
  247. ms49_473=se_ms(1,"#");
  248. ms50_473=se_ms(3,"xor");
  249. ms51_473=se_ms(5,"blank");
  250. }
  251. void se_msi41(void){
  252. ms52_473=se_ms(5,"bit_n");
  253. ms53_473=se_ms(12,"Boolean_bits");
  254. ms54_473=se_ms(6,"calloc");
  255. ms55_473=se_ms(8,"capacity");
  256. ms56_473=se_ms(14,"Character_bits");
  257. ms57_473=se_ms(9,"clear_all");
  258. ms58_473=se_ms(12,"compile_to_c");
  259. ms59_473=se_ms(14,"compile_to_jvm");
  260. ms60_473=se_ms(5,"count");
  261. ms61_473=se_ms(5,"crash");
  262. ms62_473=se_ms(4,"code");
  263. ms63_473=se_ms(11,"conforms_to");
  264. ms64_473=se_ms(4,"copy");
  265. ms65_473=se_ms(10,"c_inline_c");
  266. ms66_473=se_ms(10,"c_inline_h");
  267. ms67_473=se_ms(11,"Double_bits");
  268. ms68_473=se_ms(12,"double_floor");
  269. ms69_473=se_ms(13,"die_with_code");
  270. ms70_473=se_ms(14,"element_sizeof");
  271. ms71_473=se_ms(8,"eof_code");
  272. }
  273. void se_msi42(void){
  274. ms72_473=se_ms(6,"fclose");
  275. ms73_473=se_ms(4,"feof");
  276. ms74_473=se_ms(5,"floor");
  277. ms75_473=se_ms(12,"flush_stream");
  278. ms76_473=se_ms(4,"free");
  279. ms77_473=se_ms(12,"from_pointer");
  280. ms78_473=se_ms(15,"generating_type");
  281. ms79_473=se_ms(9,"generator");
  282. ms80_473=se_ms(2,"io");
  283. ms81_473=se_ms(12,"Integer_bits");
  284. ms82_473=se_ms(22,"is_basic_expanded_type");
  285. ms83_473=se_ms(16,"is_expanded_type");
  286. ms84_473=se_ms(8,"is_equal");
  287. ms85_473=se_ms(11,"is_not_void");
  288. ms86_473=se_ms(4,"item");
  289. ms87_473=se_ms(5,"lower");
  290. ms88_473=se_ms(6,"malloc");
  291. ms89_473=se_ms(4,"make");
  292. ms90_473=se_ms(22,"Minimum_character_code");
  293. ms91_473=se_ms(14,"Minimum_double");
  294. }
  295. void se_msi43(void){
  296. ms92_473=se_ms(15,"Minimum_integer");
  297. ms93_473=se_ms(12,"Minimum_real");
  298. ms94_473=se_ms(22,"Maximum_character_code");
  299. ms95_473=se_ms(14,"Maximum_double");
  300. ms96_473=se_ms(15,"Maximum_integer");
  301. ms97_473=se_ms(12,"Maximum_real");
  302. ms98_473=se_ms(11,"object_size");
  303. ms99_473=se_ms(12,"Pointer_bits");
  304. ms100_473=se_ms(12,"pointer_size");
  305. ms101_473=se_ms(5,"print");
  306. ms102_473=se_ms(8,"print_on");
  307. ms103_473=se_ms(20,"print_run_time_stack");
  308. ms104_473=se_ms(3,"put");
  309. ms105_473=se_ms(5,"put_0");
  310. ms106_473=se_ms(5,"put_1");
  311. ms107_473=se_ms(9,"read_byte");
  312. ms108_473=se_ms(9,"Real_bits");
  313. ms109_473=se_ms(7,"realloc");
  314. ms110_473=se_ms(7,"se_argc");
  315. ms111_473=se_ms(7,"se_argv");
  316. }
  317. void se_msi44(void){
  318. ms112_473=se_ms(9,"se_getenv");
  319. ms113_473=se_ms(9,"se_remove");
  320. ms114_473=se_ms(9,"se_rename");
  321. ms115_473=se_ms(16,"se_string2double");
  322. ms116_473=se_ms(9,"se_system");
  323. ms117_473=se_ms(8,"sfr_open");
  324. ms118_473=se_ms(8,"sfw_open");
  325. ms119_473=se_ms(14,"sprintf_double");
  326. ms120_473=se_ms(15,"sprintf_pointer");
  327. ms121_473=se_ms(13,"standard_copy");
  328. ms122_473=se_ms(17,"standard_is_equal");
  329. ms123_473=se_ms(13,"standard_twin");
  330. ms124_473=se_ms(6,"stderr");
  331. ms125_473=se_ms(5,"stdin");
  332. ms126_473=se_ms(6,"stdout");
  333. ms127_473=se_ms(9,"std_error");
  334. ms128_473=se_ms(9,"std_input");
  335. ms129_473=se_ms(10,"std_output");
  336. ms130_473=se_ms(7,"storage");
  337. ms131_473=se_ms(6,"to_bit");
  338. }
  339. void se_msi45(void){
  340. ms132_473=se_ms(12,"to_character");
  341. ms133_473=se_ms(9,"to_double");
  342. ms134_473=se_ms(10,"to_integer");
  343. ms135_473=se_ms(10,"to_pointer");
  344. ms136_473=se_ms(7,"to_real");
  345. ms137_473=se_ms(12,"trace_switch");
  346. ms138_473=se_ms(20,"truncated_to_integer");
  347. ms139_473=se_ms(4,"twin");
  348. ms140_473=se_ms(5,"upper");
  349. ms141_473=se_ms(13,"with_capacity");
  350. ms142_473=se_ms(10,"write_byte");
  351. ms143_473=se_ms(7,"Current");
  352. ms144_473=se_ms(23,"NATIVE_ARRAY[CHARACTER]");
  353. ms145_473=se_ms(12,"like Current");
  354. ms146_473=se_ms(6,"Result");
  355. ms147_473=se_ms(4,"Void");
  356. ms1_473=se_ms(3,"ANY");
  357. ms10_393=se_ms(27,"Bad comment to end a class.");
  358. ms19_605=se_ms(27,"Cyclic inheritance graph : ");
  359. ms20_605=se_ms(2,", ");
  360. }
  361. void se_msi46(void){
  362. ms21_605=se_ms(5,", ...");
  363. ms66_470=se_ms(16,"Class not found.");
  364. ms6_605=se_ms(56,"Deferred class should not have creation clause (VGCP.1).");
  365. ms2_683=se_ms(7,"Warning");
  366. ms10_604=se_ms(35,"Bad \"rename.se\" file.\nCannot open \"");
  367. ms137_470=se_ms(2,"\".");
  368. ms13_604=se_ms(9,"rename.se");
  369. ms14_604=se_ms(20,"Multiple entry for \"");
  370. ms15_604=se_ms(36,"\" in \"rename.se\" files.\nClash for \n\"");
  371. ms16_604=se_ms(8,"\" and \n\"");
  372. ms17_604=se_ms(2,".\n");
  373. ms25_364=se_ms(2,".e");
  374. ms11_604=se_ms(31,"Unable to find file for class \"");
  375. ms12_604=se_ms(3,"\". ");
  376. ms62_604=se_ms(19,"\nLoading path is :\n");
  377. ms2_604=se_ms(11,"loadpath.se");
  378. ms3_604=se_ms(9,"loadpath.");
  379. ms4_604=se_ms(23,"No default path (file \"");
  380. ms5_604=se_ms(14,"\" not found).\n");
  381. }
  382. void se_msi47(void){
  383. ms63_604=se_ms(22,"Environment Variable \"");
  384. ms64_604=se_ms(5,"\" is\n");
  385. ms66_604=se_ms(8,"set to \"");
  386. ms67_604=se_ms(3,"\". ");
  387. ms65_604=se_ms(9,"not set. ");
  388. ms7_604=se_ms(21,"Unable to load class.");
  389. ms6_604=se_ms(34,"Internal Error #1 in SMALL_EIFFEL.");
  390. ms4_683=se_ms(11,"Fatal Error");
  391. ms75_470=se_ms(7,"****** ");
  392. ms6_683=se_ms(3," : ");
  393. ms3_627=se_ms(5,"Line ");
  394. ms4_627=se_ms(8," column ");
  395. ms5_627=se_ms(4," in ");
  396. ms6_627=se_ms(2," (");
  397. ms7_627=se_ms(3," :\n");
  398. ms9_627=se_ms(37,"SmallEiffel cannot load base class : ");
  399. ms10_627=se_ms(1,"\n");
  400. ms8_627=se_ms(2,"^\n");
  401. ms7_683=se_ms(7,"------\n");
  402. ms1_673=se_ms(7,"hook811");
  403. }
  404. void se_msi48(void){
  405. ms2_673=se_ms(10,"invariant\n");
  406. ms5_673=se_ms(7,"hook813");
  407. ms6_673=se_ms(0,"");
  408. ms7_673=se_ms(7,"hook814");
  409. ms8_673=se_ms(6,"   -- ");
  410. ms9_673=se_ms(7,"hook815");
  411. ms10_673=se_ms(1,"\n");
  412. ms11_673=se_ms(7,"hook816");
  413. ms12_673=se_ms(0,"");
  414. ms3_673=se_ms(7,"hook812");
  415. ms4_673=se_ms(0,"");
  416. ms15_673=se_ms(7,"hook818");
  417. ms16_673=se_ms(0,"");
  418. ms17_673=se_ms(7,"hook819");
  419. ms18_673=se_ms(3,"   ");
  420. ms19_673=se_ms(7,"hook820");
  421. ms20_673=se_ms(0,"");
  422. ms21_673=se_ms(7,"hook821");
  423. ms22_673=se_ms(0,"");
  424. ms23_673=se_ms(7,"hook822");
  425. }
  426. void se_msi49(void){
  427. ms24_673=se_ms(2,": ");
  428. ms25_673=se_ms(7,"hook823");
  429. ms26_673=se_ms(0,"");
  430. ms27_673=se_ms(7,"hook824");
  431. ms28_673=se_ms(0,"");
  432. ms29_673=se_ms(7,"hook825");
  433. ms30_673=se_ms(1,";");
  434. ms31_673=se_ms(7,"hook826");
  435. ms32_673=se_ms(1,"\n");
  436. ms33_673=se_ms(7,"hook827");
  437. ms34_673=se_ms(0,"");
  438. ms35_673=se_ms(7,"hook828");
  439. ms36_673=se_ms(4," -- ");
  440. ms37_673=se_ms(7,"hook829");
  441. ms38_673=se_ms(1,"\n");
  442. ms39_673=se_ms(7,"hook830");
  443. ms40_673=se_ms(0,"");
  444. ms41_673=se_ms(7,"hook831");
  445. ms42_673=se_ms(0,"");
  446. ms43_673=se_ms(7,"hook819");
  447. }
  448. void se_msi50(void){
  449. ms44_673=se_ms(3,"   ");
  450. ms45_673=se_ms(7,"hook820");
  451. ms46_673=se_ms(0,"");
  452. ms47_673=se_ms(7,"hook821");
  453. ms48_673=se_ms(0,"");
  454. ms49_673=se_ms(7,"hook822");
  455. ms50_673=se_ms(2,": ");
  456. ms51_673=se_ms(7,"hook823");
  457. ms52_673=se_ms(0,"");
  458. ms53_673=se_ms(7,"hook824");
  459. ms54_673=se_ms(0,"");
  460. ms55_673=se_ms(7,"hook832");
  461. ms56_673=se_ms(1,";");
  462. ms57_673=se_ms(7,"hook826");
  463. ms58_673=se_ms(1,"\n");
  464. ms59_673=se_ms(7,"hook827");
  465. ms60_673=se_ms(0,"");
  466. ms61_673=se_ms(7,"hook828");
  467. ms62_673=se_ms(4," -- ");
  468. ms63_673=se_ms(7,"hook829");
  469. }
  470. void se_msi51(void){
  471. ms64_673=se_ms(1,"\n");
  472. ms65_673=se_ms(7,"hook830");
  473. ms66_673=se_ms(0,"");
  474. ms67_673=se_ms(7,"hook831");
  475. ms68_673=se_ms(0,"");
  476. ms1_490=se_ms(4,"Btag");
  477. ms2_490=se_ms(4,"Utag");
  478. ms3_490=se_ms(1,"_");
  479. ms4_490=se_ms(4,"Atag");
  480. ms1_393=se_ms(4,"BECL");
  481. ms6_393=se_ms(8,"cl_quote");
  482. ms7_393=se_ms(1,"\'");
  483. ms4_393=se_ms(8,"op_quote");
  484. ms5_393=se_ms(1,"`");
  485. ms2_393=se_ms(8,"Ucomment");
  486. ms3_393=se_ms(1,"_");
  487. ms8_393=se_ms(4,"AECL");
  488. ms69_673=se_ms(7,"hook833");
  489. ms70_673=se_ms(0,"");
  490. ms13_673=se_ms(7,"hook817");
  491. }
  492. void se_msi52(void){
  493. ms14_673=se_ms(0,"");
  494. ms71_673=se_ms(7,"hook834");
  495. ms72_673=se_ms(0,"");
  496. ms19_580=se_ms(7,"hook800");
  497. ms20_580=se_ms(7,"hook900");
  498. ms25_580=se_ms(7,"hook903");
  499. ms26_580=se_ms(7,"end of ");
  500. ms23_580=se_ms(7,"hook902");
  501. ms24_580=se_ms(16,"end of deferred ");
  502. ms21_580=se_ms(7,"hook901");
  503. ms22_580=se_ms(16,"end of expanded ");
  504. ms27_580=se_ms(7,"hook904");
  505. ms3_881=se_ms(7,"open_sb");
  506. ms4_881=se_ms(1,"[");
  507. ms31_580=se_ms(3,"Bcn");
  508. ms32_580=se_ms(3,"Ucn");
  509. ms33_580=se_ms(1,"_");
  510. ms34_580=se_ms(3,"Acn");
  511. ms2_33=se_ms(5,"arrow");
  512. ms3_33=se_ms(2,"->");
  513. }
  514. void se_msi53(void){
  515. ms1_291=se_ms(3,"Btm");
  516. ms2_291=se_ms(3,"Atm");
  517. ms5_881=se_ms(7,"fgl_sep");
  518. ms6_881=se_ms(1,",");
  519. ms7_881=se_ms(8,"close_sb");
  520. ms8_881=se_ms(1,"]");
  521. ms28_580=se_ms(7,"hook905");
  522. ms29_580=se_ms(1,"\n");
  523. ms30_580=se_ms(7,"hook999");
  524. ms1_737=se_ms(28,"Bad use of command `short\'.\n");
  525. ms2_737=se_ms(5,"short");
  526. ms2_364=se_ms(3,"man");
  527. ms126_470=se_ms(3,"sys");
  528. ms3_306=se_ms(18,"Try to read file \"");
  529. ms4_306=se_ms(3,"\".\n");
  530. ms20_364=se_ms(21,"Unable to find file\n\"");
  531. ms127_470=se_ms(9,"system.se");
  532. ms21_364=se_ms(14,"\" using path \"");
  533. ms121_470=se_ms(11,"SmallEiffel");
  534. ms1_364=se_ms(31,"/usr/local/logiciel/SmallEiffel");
  535. }
  536. void se_msi54(void){
  537. ms24_364=se_ms(11,"System is \"");
  538. ms22_364=se_ms(29,"Unknown system name in file\n\"");
  539. ms23_364=se_ms(36,"\".\nCurrently handled system names :\n");
  540. ms13_364=se_ms(5,"Amiga");
  541. ms14_364=se_ms(3,"DOS");
  542. ms15_364=se_ms(9,"Macintosh");
  543. ms16_364=se_ms(3,"OS2");
  544. ms18_364=se_ms(3,"VMS");
  545. ms19_364=se_ms(7,"Windows");
  546. ms17_364=se_ms(4,"UNIX");
  547. ms39_364=se_ms(4,".txt");
  548. ms3_364=se_ms(26,"Unable to find help file \"");
  549. ms242_470=se_ms(3,"\".\n");
  550. }
  551. T7*se_ms(int c,char*e){
  552. T7*s=malloc(sizeof(T7));
  553. s->_count=c;
  554. s->_capacity=c+1;
  555. s->_storage=malloc(c+1);
  556. memcpy(s->_storage,e,c);
  557. return s;}
  558. T7*e2s(char*e){
  559. return se_ms(strlen(e),e);}
  560. char*s2e(T7*s){
  561. char*e=malloc(1+s->_count);
  562. memcpy(e,s->_storage,s->_count);
  563. e[s->_count]='\0';
  564. return e;}
  565. void*se_ma65(int argc,...){
  566. T65*m;
  567. va_list pa;
  568. T0**s;
  569. m=malloc(sizeof(*m));
  570. *m=M65;
  571. if(argc){
  572. s=malloc(argc*sizeof(*s));
  573. m->_storage=s;
  574. m->_capacity=argc;
  575. m->_lower=1;
  576. m->_upper=argc;
  577. va_start(pa,argc);
  578. while(argc--){
  579. *(s++)=((void*)(va_arg(pa,char*)));
  580. }
  581. va_end(pa);
  582. }
  583. return m;}
  584. void*se_ma901(int argc,...){
  585. T901*m;
  586. va_list pa;
  587. T0**s;
  588. m=malloc(sizeof(*m));
  589. *m=M901;
  590. if(argc){
  591. s=malloc(argc*sizeof(*s));
  592. m->_storage=s;
  593. m->_capacity=argc;
  594. m->_lower=1;
  595. m->_upper=argc;
  596. va_start(pa,argc);
  597. while(argc--){
  598. *(s++)=((void*)(va_arg(pa,char*)));
  599. }
  600. va_end(pa);
  601. }
  602. return m;}
  603. void*se_ma263(int argc,...){
  604. T263*m;
  605. va_list pa;
  606. T0**s;
  607. m=malloc(sizeof(*m));
  608. *m=M263;
  609. if(argc){
  610. s=malloc(argc*sizeof(*s));
  611. m->_storage=s;
  612. m->_capacity=argc;
  613. m->_lower=1;
  614. m->_upper=argc;
  615. va_start(pa,argc);
  616. while(argc--){
  617. *(s++)=((void*)(va_arg(pa,char*)));
  618. }
  619. va_end(pa);
  620. }
  621. return m;}
  622. void*se_ma522(int argc,...){
  623. T522*m;
  624. va_list pa;
  625. T0**s;
  626. m=malloc(sizeof(*m));
  627. *m=M522;
  628. if(argc){
  629. s=malloc(argc*sizeof(*s));
  630. m->_storage=s;
  631. m->_capacity=argc;
  632. m->_lower=1;
  633. m->_upper=argc;
  634. va_start(pa,argc);
  635. while(argc--){
  636. *(s++)=((void*)(va_arg(pa,char*)));
  637. }
  638. va_end(pa);
  639. }
  640. return m;}
  641. void*se_ma587(int argc,...){
  642. T587*m;
  643. va_list pa;
  644. T0**s;
  645. m=malloc(sizeof(*m));
  646. *m=M587;
  647. if(argc){
  648. s=malloc(argc*sizeof(*s));
  649. m->_storage=s;
  650. m->_capacity=argc;
  651. m->_lower=1;
  652. m->_upper=argc;
  653. va_start(pa,argc);
  654. while(argc--){
  655. *(s++)=((void*)(va_arg(pa,char*)));
  656. }
  657. va_end(pa);
  658. }
  659. return m;}
  660. void*se_ma396(int argc,...){
  661. T396*m;
  662. va_list pa;
  663. T0**s;
  664. m=malloc(sizeof(*m));
  665. *m=M396;
  666. if(argc){
  667. s=malloc(argc*sizeof(*s));
  668. m->_storage=s;
  669. m->_capacity=argc;
  670. m->_lower=1;
  671. m->_upper=argc;
  672. va_start(pa,argc);
  673. while(argc--){
  674. *(s++)=((void*)(va_arg(pa,char*)));
  675. }
  676. va_end(pa);
  677. }
  678. return m;}
  679. void*se_ma848(int argc,...){
  680. T848*m;
  681. va_list pa;
  682. T0**s;
  683. m=malloc(sizeof(*m));
  684. *m=M848;
  685. if(argc){
  686. s=malloc(argc*sizeof(*s));
  687. m->_storage=s;
  688. m->_capacity=argc;
  689. m->_lower=1;
  690. m->_upper=argc;
  691. va_start(pa,argc);
  692. while(argc--){
  693. *(s++)=((void*)(va_arg(pa,char*)));
  694. }
  695. va_end(pa);
  696. }
  697. return m;}
  698. void*se_ma147(int argc,...){
  699. T147*m;
  700. va_list pa;
  701. T0**s;
  702. m=malloc(sizeof(*m));
  703. *m=M147;
  704. if(argc){
  705. s=malloc(argc*sizeof(*s));
  706. m->_storage=s;
  707. m->_capacity=argc;
  708. m->_lower=1;
  709. m->_upper=argc;
  710. va_start(pa,argc);
  711. while(argc--){
  712. *(s++)=((void*)(va_arg(pa,char*)));
  713. }
  714. va_end(pa);
  715. }
  716. return m;}
  717. void*se_ma855(int argc,...){
  718. T855*m;
  719. va_list pa;
  720. T0**s;
  721. m=malloc(sizeof(*m));
  722. *m=M855;
  723. if(argc){
  724. s=malloc(argc*sizeof(*s));
  725. m->_storage=s;
  726. m->_capacity=argc;
  727. m->_lower=1;
  728. m->_upper=argc;
  729. va_start(pa,argc);
  730. while(argc--){
  731. *(s++)=((void*)(va_arg(pa,char*)));
  732. }
  733. va_end(pa);
  734. }
  735. return m;}
  736. void*se_ma26(int argc,...){
  737. T26*m;
  738. va_list pa;
  739. T0**s;
  740. m=malloc(sizeof(*m));
  741. *m=M26;
  742. if(argc){
  743. s=malloc(argc*sizeof(*s));
  744. m->_storage=s;
  745. m->_capacity=argc;
  746. m->_lower=1;
  747. m->_upper=argc;
  748. va_start(pa,argc);
  749. while(argc--){
  750. *(s++)=((void*)(va_arg(pa,char*)));
  751. }
  752. va_end(pa);
  753. }
  754. return m;}
  755. void*se_ma733(int argc,...){
  756. T733*m;
  757. va_list pa;
  758. T0**s;
  759. m=malloc(sizeof(*m));
  760. *m=M733;
  761. if(argc){
  762. s=malloc(argc*sizeof(*s));
  763. m->_storage=s;
  764. m->_capacity=argc;
  765. m->_lower=1;
  766. m->_upper=argc;
  767. va_start(pa,argc);
  768. while(argc--){
  769. *(s++)=((void*)(va_arg(pa,char*)));
  770. }
  771. va_end(pa);
  772. }
  773. return m;}
  774. void*se_ma96(int argc,...){
  775. T96*m;
  776. va_list pa;
  777. T0**s;
  778. m=malloc(sizeof(*m));
  779. *m=M96;
  780. if(argc){
  781. s=malloc(argc*sizeof(*s));
  782. m->_storage=s;
  783. m->_capacity=argc;
  784. m->_lower=1;
  785. m->_upper=argc;
  786. va_start(pa,argc);
  787. while(argc--){
  788. *(s++)=((void*)(va_arg(pa,char*)));
  789. }
  790. va_end(pa);
  791. }
  792. return m;}
  793. void*se_ma608(int argc,...){
  794. T608*m;
  795. va_list pa;
  796. T0**s;
  797. m=malloc(sizeof(*m));
  798. *m=M608;
  799. if(argc){
  800. s=malloc(argc*sizeof(*s));
  801. m->_storage=s;
  802. m->_capacity=argc;
  803. m->_lower=1;
  804. m->_upper=argc;
  805. va_start(pa,argc);
  806. while(argc--){
  807. *(s++)=((void*)(va_arg(pa,char*)));
  808. }
  809. va_end(pa);
  810. }
  811. return m;}
  812. void*se_ma419(int argc,...){
  813. T419*m;
  814. va_list pa;
  815. T0**s;
  816. m=malloc(sizeof(*m));
  817. *m=M419;
  818. if(argc){
  819. s=malloc(argc*sizeof(*s));
  820. m->_storage=s;
  821. m->_capacity=argc;
  822. m->_lower=1;
  823. m->_upper=argc;
  824. va_start(pa,argc);
  825. while(argc--){
  826. *(s++)=((void*)(va_arg(pa,char*)));
  827. }
  828. va_end(pa);
  829. }
  830. return m;}
  831. void*se_ma552(int argc,...){
  832. T552*m;
  833. va_list pa;
  834. T0**s;
  835. m=malloc(sizeof(*m));
  836. *m=M552;
  837. if(argc){
  838. s=malloc(argc*sizeof(*s));
  839. m->_storage=s;
  840. m->_capacity=argc;
  841. m->_lower=1;
  842. m->_upper=argc;
  843. va_start(pa,argc);
  844. while(argc--){
  845. *(s++)=((void*)(va_arg(pa,char*)));
  846. }
  847. va_end(pa);
  848. }
  849. return m;}
  850. void*se_ma681(int argc,...){
  851. T681*m;
  852. va_list pa;
  853. T0**s;
  854. m=malloc(sizeof(*m));
  855. *m=M681;
  856. if(argc){
  857. s=malloc(argc*sizeof(*s));
  858. m->_storage=s;
  859. m->_capacity=argc;
  860. m->_lower=1;
  861. m->_upper=argc;
  862. va_start(pa,argc);
  863. while(argc--){
  864. *(s++)=((void*)(va_arg(pa,char*)));
  865. }
  866. va_end(pa);
  867. }
  868. return m;}
  869. void*se_ma235(int argc,...){
  870. T235*m;
  871. va_list pa;
  872. T0**s;
  873. m=malloc(sizeof(*m));
  874. *m=M235;
  875. if(argc){
  876. s=malloc(argc*sizeof(*s));
  877. m->_storage=s;
  878. m->_capacity=argc;
  879. m->_lower=1;
  880. m->_upper=argc;
  881. va_start(pa,argc);
  882. while(argc--){
  883. *(s++)=((void*)(va_arg(pa,char*)));
  884. }
  885. va_end(pa);
  886. }
  887. return m;}
  888. void*se_ma429(int argc,...){
  889. T429*m;
  890. va_list pa;
  891. T2*s;
  892. m=malloc(sizeof(*m));
  893. *m=M429;
  894. if(argc){
  895. s=malloc(argc*sizeof(*s));
  896. m->_storage=s;
  897. m->_capacity=argc;
  898. m->_lower=1;
  899. m->_upper=argc;
  900. va_start(pa,argc);
  901. while(argc--){
  902. *(s++)=va_arg(pa,int);
  903. }
  904. va_end(pa);
  905. }
  906. return m;}
  907. void*se_ma495(int argc,...){
  908. T495*m;
  909. va_list pa;
  910. T0**s;
  911. m=malloc(sizeof(*m));
  912. *m=M495;
  913. if(argc){
  914. s=malloc(argc*sizeof(*s));
  915. m->_storage=s;
  916. m->_capacity=argc;
  917. m->_lower=1;
  918. m->_upper=argc;
  919. va_start(pa,argc);
  920. while(argc--){
  921. *(s++)=((void*)(va_arg(pa,char*)));
  922. }
  923. va_end(pa);
  924. }
  925. return m;}
  926. void*se_ma948(int argc,...){
  927. T948*m;
  928. va_list pa;
  929. T0**s;
  930. m=malloc(sizeof(*m));
  931. *m=M948;
  932. if(argc){
  933. s=malloc(argc*sizeof(*s));
  934. m->_storage=s;
  935. m->_capacity=argc;
  936. m->_lower=1;
  937. m->_upper=argc;
  938. va_start(pa,argc);
  939. while(argc--){
  940. *(s++)=((void*)(va_arg(pa,char*)));
  941. }
  942. va_end(pa);
  943. }
  944. return m;}
  945. void*se_ma52(int argc,...){
  946. T52*m;
  947. va_list pa;
  948. T0**s;
  949. m=malloc(sizeof(*m));
  950. *m=M52;
  951. if(argc){
  952. s=malloc(argc*sizeof(*s));
  953. m->_storage=s;
  954. m->_capacity=argc;
  955. m->_lower=1;
  956. m->_upper=argc;
  957. va_start(pa,argc);
  958. while(argc--){
  959. *(s++)=((void*)(va_arg(pa,char*)));
  960. }
  961. va_end(pa);
  962. }
  963. return m;}
  964. void*se_ma247(int argc,...){
  965. T247*m;
  966. va_list pa;
  967. T0**s;
  968. m=malloc(sizeof(*m));
  969. *m=M247;
  970. if(argc){
  971. s=malloc(argc*sizeof(*s));
  972. m->_storage=s;
  973. m->_capacity=argc;
  974. m->_lower=1;
  975. m->_upper=argc;
  976. va_start(pa,argc);
  977. while(argc--){
  978. *(s++)=((void*)(va_arg(pa,char*)));
  979. }
  980. va_end(pa);
  981. }
  982. return m;}
  983. void*se_ma764(int argc,...){
  984. T764*m;
  985. va_list pa;
  986. T0**s;
  987. m=malloc(sizeof(*m));
  988. *m=M764;
  989. if(argc){
  990. s=malloc(argc*sizeof(*s));
  991. m->_storage=s;
  992. m->_capacity=argc;
  993. m->_lower=1;
  994. m->_upper=argc;
  995. va_start(pa,argc);
  996. while(argc--){
  997. *(s++)=((void*)(va_arg(pa,char*)));
  998. }
  999. va_end(pa);
  1000. }
  1001. return m;}
  1002. void*se_ma381(int argc,...){
  1003. T381*m;
  1004. va_list pa;
  1005. T0**s;
  1006. m=malloc(sizeof(*m));
  1007. *m=M381;
  1008. if(argc){
  1009. s=malloc(argc*sizeof(*s));
  1010. m->_storage=s;
  1011. m->_capacity=argc;
  1012. m->_lower=1;
  1013. m->_upper=argc;
  1014. va_start(pa,argc);
  1015. while(argc--){
  1016. *(s++)=((void*)(va_arg(pa,char*)));
  1017. }
  1018. va_end(pa);
  1019. }
  1020. return m;}
  1021. void*se_ma701(int argc,...){
  1022. T701*m;
  1023. va_list pa;
  1024. T0**s;
  1025. m=malloc(sizeof(*m));
  1026. *m=M701;
  1027. if(argc){
  1028. s=malloc(argc*sizeof(*s));
  1029. m->_storage=s;
  1030. m->_capacity=argc;
  1031. m->_lower=1;
  1032. m->_upper=argc;
  1033. va_start(pa,argc);
  1034. while(argc--){
  1035. *(s++)=((void*)(va_arg(pa,char*)));
  1036. }
  1037. va_end(pa);
  1038. }
  1039. return m;}
  1040. void*se_ma382(int argc,...){
  1041. T382*m;
  1042. va_list pa;
  1043. T0**s;
  1044. m=malloc(sizeof(*m));
  1045. *m=M382;
  1046. if(argc){
  1047. s=malloc(argc*sizeof(*s));
  1048. m->_storage=s;
  1049. m->_capacity=argc;
  1050. m->_lower=1;
  1051. m->_upper=argc;
  1052. va_start(pa,argc);
  1053. while(argc--){
  1054. *(s++)=((void*)(va_arg(pa,char*)));
  1055. }
  1056. va_end(pa);
  1057. }
  1058. return m;}
  1059. void rsp(void){
  1060. printf("Eiffel program crash at run time.\n");
  1061. printf("No trace when using option \"-boost\"\n");}
  1062. void sigrsp(int sig){
  1063. printf("Received signal %d (man signal).\n",sig);
  1064. rsp();
  1065. exit(1);}
  1066.  
  1067.