cvsuser 03/11/18 23:31:26
Modified: imcc imclexer.c imcparser.c
Log:
Generated files.
Revision Changes Path
1.82 +76 -76 parrot/imcc/imclexer.c
Index: imclexer.c
===================================================================
RCS file: /cvs/public/parrot/imcc/imclexer.c,v
retrieving revision 1.81
retrieving revision 1.82
diff -u -w -r1.81 -r1.82
--- imclexer.c 18 Nov 2003 21:33:40 -0000 1.81
+++ imclexer.c 19 Nov 2003 07:31:25 -0000 1.82
@@ -408,7 +408,7 @@
8, 79, 0, 95, 0, 0, 0, 0, 0, 71,
0, 96, 80, 92, 89, 89, 89, 89, 89, 89,
89, 89, 89, 89, 89, 89, 89, 91, 0, 0,
- 68, 75, 78, 77, 69, 86, 90, 88, 13, 90,
+ 68, 75, 78, 77, 69, 90, 86, 88, 13, 90,
90, 90, 90, 90, 90, 90, 90, 48, 90, 90,
90, 90, 90, 90, 90, 90, 90, 90, 72, 73,
0, 89, 89, 89, 89, 89, 109, 104, 109, 0,
@@ -507,8 +507,8 @@
static yyconst int yy_meta[56] =
{ 0,
- 1, 1, 2, 1, 1, 1, 3, 1, 4, 1,
- 1, 1, 1, 1, 1, 5, 5, 5, 6, 1,
+ 1, 1, 2, 1, 1, 1, 3, 4, 5, 1,
+ 1, 1, 1, 1, 1, 6, 6, 6, 4, 1,
1, 1, 7, 7, 8, 8, 8, 8, 8, 1,
8, 7, 7, 7, 7, 7, 7, 8, 8, 8,
8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
@@ -534,7 +534,7 @@
1808, 1808, 433, 1808, 601, 607, 616, 619, 623, 1808,
1773, 1808, 1808, 627, 0, 1737, 206, 1739, 365, 1740,
1737, 1735, 28, 248, 614, 1742, 59, 633, 415, 0,
- 1808, 1808, 1808, 1808, 1755, 1757, 292, 1756, 645, 507,
+ 1808, 1808, 1808, 1808, 1755, 292, 1757, 1756, 645, 507,
568, 646, 647, 658, 659, 661, 663, 335, 664, 666,
667, 678, 670, 682, 683, 687, 685, 699, 1808, 1808,
1734, 408, 1729, 1740, 431, 1727, 719, 1808, 723, 1751,
@@ -583,8 +583,8 @@
1576, 1573, 0, 1576, 1566, 1568, 1564, 1569, 1570, 0,
0, 0, 1278, 1292, 1293, 1294, 1295, 1296, 1297, 1313,
- 1314, 1319, 1559, 1281, 1325, 1582, 333, 1095, 1564, 0,
- 1579, 1575, 1329, 1505, 1808, 1527, 1519, 1480, 0, 1503,
+ 1314, 1319, 1559, 1281, 1325, 1582, 333, 1095, 1561, 0,
+ 1587, 1580, 1329, 1505, 1808, 1527, 1519, 1480, 0, 1506,
1502, 1333, 1295, 1340, 1349, 1352, 1355, 1443, 1435, 1415,
1401, 0, 1410, 1402, 1402, 1400, 1408, 0, 1355, 1356,
1357, 1358, 727, 1432, 1429, 1387, 1415, 0, 1157, 1428,
@@ -597,8 +597,8 @@
0, 1020, 937, 901, 867, 1402, 0, 834, 831, 734,
678, 1405, 565, 527, 488, 0, 1406, 354, 260, 0,
152, 0, 0, 1808, 1448, 1456, 1464, 1472, 1480, 1488,
- 1490, 1495, 1497, 1502, 1506, 1514, 1522, 1530, 1538, 1546,
- 1554, 1562, 1570, 1574, 1578, 1581, 1583, 1587, 1591
+ 1490, 1495, 1497, 1501, 1506, 1514, 1522, 1530, 1538, 1546,
+ 1554, 1562, 1570, 1573, 1576, 1580, 1582, 1587, 1592
} ;
static yyconst short int yy_def[750] =
@@ -620,7 +620,7 @@
724, 724, 729, 724, 729, 724, 724, 724, 724, 724,
730, 724, 724, 724, 744, 744, 744, 744, 744, 744,
744, 744, 744, 744, 744, 744, 744, 724, 724, 745,
- 724, 724, 724, 724, 724, 724, 732, 724, 732, 732,
+ 724, 724, 724, 724, 724, 732, 724, 724, 732, 732,
732, 732, 732, 732, 732, 732, 732, 732, 732, 732,
732, 732, 732, 732, 732, 732, 732, 732, 724, 724,
724, 744, 744, 744, 744, 744, 724, 724, 724, 746,
@@ -708,25 +708,25 @@
73, 73, 73, 73, 73, 73, 73, 73, 73, 73,
73, 73, 73, 73, 73, 75, 73, 73, 73, 73,
73, 73, 62, 62, 81, 82, 164, 165, 83, 144,
- 144, 144, 84, 332, 85, 166, 86, 87, 88, 88,
+ 144, 144, 84, 332, 85, 167, 86, 87, 88, 88,
115, 116, 117, 115, 723, 168, 93, 89, 89, 89,
89, 144, 144, 144, 113, 114, 114, 216, 335, 208,
158, 144, 144, 144, 158, 144, 144, 144, 90, 81,
- 82, 253, 254, 83, 91, 166, 210, 84, 159, 85,
+ 82, 253, 254, 83, 91, 167, 210, 84, 159, 85,
217, 86, 87, 88, 88, 168, 208, 92, 115, 116,
- 117, 115, 89, 89, 89, 89, 278, 160, 166, 279,
- 166, 170, 113, 114, 114, 169, 169, 169, 168, 166,
- 168, 166, 221, 90, 94, 338, 166, 222, 95, 168,
- 96, 168, 97, 98, 99, 99, 168, 173, 166, 288,
- 166, 289, 171, 100, 100, 100, 100, 166, 168, 166,
- 168, 172, 166, 166, 722, 174, 230, 168, 175, 168,
+ 117, 115, 89, 89, 89, 89, 278, 160, 167, 279,
+ 167, 170, 113, 114, 114, 169, 169, 169, 168, 167,
+ 168, 167, 221, 90, 94, 338, 167, 222, 95, 168,
+ 96, 168, 97, 98, 99, 99, 168, 173, 167, 288,
+ 167, 289, 171, 100, 100, 100, 100, 167, 168, 167,
+ 168, 172, 167, 167, 722, 174, 230, 168, 175, 168,
- 166, 231, 168, 168, 101, 94, 102, 184, 166, 95,
+ 167, 231, 168, 168, 101, 94, 102, 184, 167, 95,
168, 96, 188, 97, 98, 99, 99, 178, 168, 176,
180, 134, 177, 179, 100, 100, 100, 100, 181, 183,
- 193, 185, 166, 182, 239, 186, 151, 643, 194, 240,
- 332, 195, 168, 166, 135, 101, 94, 187, 253, 254,
+ 193, 185, 167, 182, 239, 186, 151, 643, 194, 240,
+ 332, 195, 168, 167, 135, 101, 94, 187, 253, 254,
104, 208, 105, 168, 106, 107, 108, 108, 201, 186,
197, 198, 199, 197, 334, 109, 109, 109, 109, 193,
332, 196, 220, 220, 220, 151, 130, 194, 130, 130,
@@ -740,18 +740,18 @@
124, 125, 126, 126, 208, 223, 220, 220, 220, 324,
280, 127, 127, 127, 127, 223, 220, 220, 220, 144,
144, 144, 135, 224, 326, 493, 158, 232, 232, 232,
- 166, 235, 128, 119, 120, 141, 292, 121, 129, 237,
+ 167, 235, 128, 119, 120, 141, 292, 121, 129, 237,
168, 122, 225, 123, 159, 124, 125, 126, 126, 158,
232, 232, 232, 233, 233, 233, 127, 127, 127, 127,
238, 238, 238, 160, 241, 238, 238, 238, 244, 244,
- 244, 158, 144, 144, 144, 166, 332, 128, 146, 332,
+ 244, 158, 144, 144, 144, 167, 332, 128, 146, 332,
147, 332, 148, 149, 150, 168, 151, 152, 153, 154,
720, 155, 156, 157, 146, 492, 147, 419, 192, 149,
150, 303, 151, 152, 153, 154, 336, 155, 156, 157,
241, 238, 238, 238, 247, 248, 253, 254, 134, 158,
144, 144, 144, 249, 250, 251, 249, 719, 242, 249,
- 250, 251, 249, 332, 253, 256, 166, 159, 257, 253,
+ 250, 251, 249, 332, 253, 256, 167, 159, 257, 253,
254, 135, 253, 260, 253, 254, 168, 243, 420, 269,
261, 332, 262, 262, 262, 332, 160, 253, 254, 253,
@@ -760,13 +760,13 @@
268, 263, 272, 272, 272, 554, 264, 266, 216, 339,
135, 273, 273, 273, 274, 274, 274, 270, 275, 275,
275, 158, 144, 144, 144, 290, 267, 291, 296, 296,
- 296, 217, 217, 166, 166, 166, 297, 344, 344, 292,
- 302, 302, 302, 168, 168, 168, 166, 166, 297, 166,
- 208, 166, 166, 208, 166, 166, 168, 168, 166, 168,
- 306, 168, 168, 307, 168, 168, 166, 607, 168, 305,
- 166, 166, 308, 166, 494, 166, 168, 312, 358, 358,
+ 296, 217, 217, 167, 167, 167, 297, 344, 344, 292,
+ 302, 302, 302, 168, 168, 168, 167, 167, 297, 167,
+ 208, 167, 167, 208, 167, 167, 168, 168, 167, 168,
+ 306, 168, 168, 307, 168, 168, 167, 607, 168, 305,
+ 167, 167, 308, 167, 494, 167, 168, 312, 358, 358,
- 168, 168, 309, 168, 310, 168, 134, 166, 166, 315,
+ 168, 168, 309, 168, 310, 168, 134, 167, 167, 315,
311, 313, 716, 317, 253, 254, 314, 168, 168, 316,
197, 198, 199, 197, 197, 198, 199, 197, 318, 135,
321, 643, 319, 674, 320, 337, 337, 337, 208, 322,
@@ -789,62 +789,62 @@
274, 274, 274, 275, 275, 275, 371, 389, 390, 298,
298, 369, 369, 369, 296, 296, 296, 711, 369, 369,
- 372, 393, 297, 166, 394, 394, 394, 369, 369, 369,
- 369, 369, 369, 168, 297, 166, 166, 166, 166, 166,
- 166, 166, 166, 166, 166, 168, 168, 168, 168, 168,
- 168, 168, 168, 168, 168, 166, 166, 344, 344, 710,
- 395, 166, 399, 166, 400, 168, 168, 396, 398, 402,
- 397, 168, 208, 168, 166, 166, 401, 404, 166, 166,
+ 372, 393, 297, 167, 394, 394, 394, 369, 369, 369,
+ 369, 369, 369, 168, 297, 167, 167, 167, 167, 167,
+ 167, 167, 167, 167, 167, 168, 168, 168, 168, 168,
+ 168, 168, 168, 168, 168, 167, 167, 344, 344, 710,
+ 395, 167, 399, 167, 400, 168, 168, 396, 398, 402,
+ 397, 168, 208, 168, 167, 167, 401, 404, 167, 167,
358, 358, 403, 429, 168, 168, 709, 430, 168, 168,
423, 342, 342, 342, 424, 253, 254, 500, 501, 343,
405, 407, 406, 408, 435, 686, 411, 409, 436, 410,
427, 343, 687, 428, 428, 428, 356, 356, 356, 441,
253, 254, 439, 442, 357, 440, 440, 440, 253, 256,
- 253, 254, 257, 253, 254, 166, 357, 253, 254, 253,
- 254, 332, 166, 253, 254, 168, 366, 366, 366, 253,
+ 253, 254, 257, 253, 254, 167, 357, 253, 254, 253,
+ 254, 332, 167, 253, 254, 168, 366, 366, 366, 253,
254, 444, 168, 446, 367, 258, 447, 447, 447, 445,
- 166, 208, 368, 368, 489, 708, 367, 394, 394, 394,
- 168, 448, 394, 394, 394, 449, 166, 707, 166, 450,
- 166, 166, 166, 166, 166, 558, 168, 469, 168, 166,
- 168, 168, 168, 168, 168, 166, 166, 166, 166, 168,
- 332, 166, 166, 472, 166, 168, 168, 168, 168, 644,
+ 167, 208, 368, 368, 489, 708, 367, 394, 394, 394,
+ 168, 448, 394, 394, 394, 449, 167, 707, 167, 450,
+ 167, 167, 167, 167, 167, 558, 168, 469, 168, 167,
+ 168, 168, 168, 168, 168, 167, 167, 167, 167, 168,
+ 332, 167, 167, 472, 167, 168, 168, 168, 168, 644,
470, 168, 168, 491, 168, 473, 332, 471, 474, 479,
476, 332, 475, 208, 477, 428, 428, 428, 480, 481,
478, 428, 428, 428, 606, 482, 440, 440, 440, 556,
483, 440, 440, 440, 253, 254, 253, 254, 253, 254,
- 166, 253, 254, 253, 254, 253, 254, 166, 253, 254,
- 168, 447, 447, 447, 447, 447, 447, 168, 166, 530,
- 531, 649, 532, 677, 166, 166, 166, 537, 168, 166,
- 208, 512, 511, 533, 168, 168, 168, 166, 166, 168,
- 513, 515, 514, 166, 166, 166, 166, 168, 168, 542,
- 538, 166, 557, 168, 168, 168, 168, 253, 254, 539,
+ 167, 253, 254, 253, 254, 253, 254, 167, 253, 254,
+ 168, 447, 447, 447, 447, 447, 447, 168, 167, 530,
+ 531, 649, 532, 677, 167, 167, 167, 537, 168, 167,
+ 208, 512, 511, 533, 168, 168, 168, 167, 167, 168,
+ 513, 515, 514, 167, 167, 167, 167, 168, 168, 542,
+ 538, 167, 557, 168, 168, 168, 168, 253, 254, 539,
540, 168, 705, 541, 253, 254, 543, 253, 254, 253,
- 254, 704, 549, 166, 166, 545, 544, 546, 547, 253,
- 254, 577, 550, 168, 168, 548, 166, 166, 166, 701,
- 166, 166, 253, 254, 166, 166, 168, 168, 168, 593,
- 168, 168, 575, 573, 168, 168, 574, 166, 166, 576,
- 166, 166, 332, 166, 602, 602, 602, 168, 168, 208,
+ 254, 704, 549, 167, 167, 545, 544, 546, 547, 253,
+ 254, 577, 550, 168, 168, 548, 167, 167, 167, 701,
+ 167, 167, 253, 254, 167, 167, 168, 168, 168, 593,
+ 168, 168, 575, 573, 168, 168, 574, 167, 167, 576,
+ 167, 167, 332, 167, 602, 602, 602, 168, 168, 208,
168, 168, 598, 168, 594, 625, 595, 702, 604, 596,
605, 700, 605, 605, 703, 597, 608, 600, 601, 599,
- 613, 613, 613, 622, 622, 622, 166, 332, 253, 254,
+ 613, 613, 613, 622, 622, 622, 167, 332, 253, 254,
253, 254, 253, 254, 253, 254, 168, 253, 254, 332,
- 166, 166, 166, 166, 166, 166, 699, 627, 627, 627,
+ 167, 167, 167, 167, 167, 167, 699, 627, 627, 627,
168, 168, 168, 168, 168, 168, 647, 643, 644, 624,
- 623, 166, 166, 645, 697, 626, 605, 642, 605, 605,
+ 623, 167, 167, 645, 697, 626, 605, 642, 605, 605,
657, 168, 168, 651, 602, 602, 602, 656, 696, 641,
639, 640, 253, 254, 613, 613, 613, 695, 622, 622,
622, 253, 254, 658, 253, 254, 659, 253, 254, 660,
- 654, 694, 674, 166, 166, 166, 166, 253, 254, 693,
+ 654, 694, 674, 167, 167, 167, 167, 253, 254, 693,
627, 627, 627, 168, 168, 168, 168, 253, 254, 658,
- 166, 679, 253, 254, 659, 253, 254, 166, 692, 680,
- 168, 166, 672, 166, 253, 254, 166, 168, 673, 671,
+ 167, 679, 253, 254, 659, 253, 254, 167, 692, 680,
+ 168, 167, 672, 167, 253, 254, 167, 168, 673, 671,
- 670, 168, 166, 168, 253, 254, 168, 688, 166, 166,
- 166, 166, 168, 166, 166, 685, 684, 690, 168, 168,
+ 670, 168, 167, 168, 253, 254, 168, 688, 167, 167,
+ 167, 167, 168, 167, 167, 685, 684, 690, 168, 168,
168, 168, 683, 168, 168, 691, 689, 682, 681, 675,
655, 678, 650, 332, 676, 675, 644, 712, 669, 717,
668, 667, 666, 665, 664, 663, 698, 706, 80, 80,
@@ -852,18 +852,18 @@
93, 93, 93, 93, 103, 103, 103, 103, 103, 103,
103, 103, 118, 118, 118, 118, 118, 118, 118, 118,
133, 662, 133, 133, 133, 133, 133, 133, 141, 661,
- 141, 141, 141, 141, 141, 141, 145, 145, 167, 167,
+ 141, 141, 141, 141, 141, 141, 145, 145, 166, 166,
- 167, 167, 167, 200, 200, 202, 655, 654, 202, 202,
- 207, 207, 207, 207, 213, 653, 213, 213, 213, 213,
+ 166, 166, 166, 200, 200, 202, 655, 202, 202, 207,
+ 654, 207, 207, 207, 213, 653, 213, 213, 213, 213,
213, 213, 215, 644, 215, 215, 215, 215, 215, 215,
218, 643, 218, 218, 218, 218, 218, 218, 235, 235,
652, 235, 235, 235, 235, 235, 236, 236, 236, 236,
236, 236, 236, 236, 252, 252, 252, 252, 252, 252,
252, 252, 255, 255, 255, 255, 255, 255, 255, 255,
- 259, 259, 259, 259, 259, 259, 259, 259, 276, 650,
- 276, 276, 299, 649, 299, 328, 328, 328, 328, 330,
- 330, 331, 331, 331, 331, 417, 417, 417, 417, 648,
+ 259, 259, 259, 259, 259, 259, 259, 259, 276, 276,
+ 276, 299, 299, 328, 650, 328, 328, 328, 330, 330,
+ 331, 649, 331, 331, 331, 417, 648, 417, 417, 417,
332, 646, 638, 637, 636, 635, 634, 633, 632, 631,
630, 629, 628, 621, 620, 619, 618, 617, 616, 615,
@@ -883,7 +883,7 @@
385, 384, 383, 382, 381, 380, 379, 378, 377, 376,
375, 374, 373, 362, 361, 355, 354, 353, 351, 350,
349, 348, 347, 341, 340, 219, 207, 208, 332, 329,
- 327, 286, 325, 323, 167, 301, 300, 293, 285, 284,
+ 327, 286, 325, 323, 166, 301, 300, 293, 285, 284,
283, 280, 277, 142, 246, 245, 191, 234, 142, 229,
228, 227, 219, 214, 191, 208, 142, 163, 191, 190,
@@ -931,8 +931,8 @@
50, 154, 42, 9, 9, 9, 9, 46, 52, 47,
50, 42, 49, 48, 719, 44, 97, 46, 45, 47,
- 167, 97, 49, 48, 9, 10, 10, 50, 51, 10,
- 167, 10, 52, 10, 10, 10, 10, 47, 51, 46,
+ 166, 97, 49, 48, 9, 10, 10, 50, 51, 10,
+ 166, 10, 52, 10, 10, 10, 10, 47, 51, 46,
48, 94, 46, 47, 10, 10, 10, 10, 48, 49,
58, 51, 59, 48, 106, 51, 58, 607, 58, 106,
204, 58, 59, 178, 94, 10, 11, 51, 120, 120,
@@ -1063,16 +1063,16 @@
729, 629, 729, 729, 729, 729, 729, 729, 730, 628,
730, 730, 730, 730, 730, 730, 731, 731, 732, 732,
- 732, 732, 732, 733, 733, 734, 621, 620, 734, 734,
- 735, 735, 735, 735, 736, 618, 736, 736, 736, 736,
+ 732, 732, 732, 733, 733, 734, 621, 734, 734, 735,
+ 620, 735, 735, 735, 736, 618, 736, 736, 736, 736,
736, 736, 737, 617, 737, 737, 737, 737, 737, 737,
738, 616, 738, 738, 738, 738, 738, 738, 739, 739,
614, 739, 739, 739, 739, 739, 740, 740, 740, 740,
740, 740, 740, 740, 741, 741, 741, 741, 741, 741,
741, 741, 742, 742, 742, 742, 742, 742, 742, 742,
- 743, 743, 743, 743, 743, 743, 743, 743, 744, 612,
- 744, 744, 745, 611, 745, 746, 746, 746, 746, 747,
- 747, 748, 748, 748, 748, 749, 749, 749, 749, 609,
+ 743, 743, 743, 743, 743, 743, 743, 743, 744, 744,
+ 744, 745, 745, 746, 612, 746, 746, 746, 747, 747,
+ 748, 611, 748, 748, 748, 749, 609, 749, 749, 749,
606, 603, 589, 588, 587, 586, 585, 584, 582, 581,
580, 579, 578, 571, 570, 569, 568, 567, 566, 565,
@@ -1092,7 +1092,7 @@
289, 288, 287, 286, 285, 284, 283, 282, 281, 280,
279, 278, 277, 246, 245, 240, 239, 234, 231, 230,
229, 228, 227, 222, 221, 218, 208, 207, 202, 200,
- 196, 194, 193, 191, 168, 166, 165, 156, 152, 151,
+ 196, 194, 193, 191, 168, 167, 165, 156, 152, 151,
150, 148, 146, 141, 111, 110, 102, 101, 95, 92,
91, 90, 84, 82, 78, 73, 68, 57, 55, 54,
1.96 +5 -5 parrot/imcc/imcparser.c
Index: imcparser.c
===================================================================
RCS file: /cvs/public/parrot/imcc/imcparser.c,v
retrieving revision 1.95
retrieving revision 1.96
diff -u -w -r1.95 -r1.96
--- imcparser.c 17 Nov 2003 00:49:01 -0000 1.95
+++ imcparser.c 19 Nov 2003 07:31:25 -0000 1.96
@@ -1968,7 +1968,7 @@
SymReg * r;
Instruction *i;
- sprintf(name, "#pcc_sub_call_%d", line - 1);
+ sprintf(name, "_#pcc_sub_call_%d", line - 1);
yyval.sr = r = mk_pcc_sub(str_dup(name), 0);
r->pcc_sub->prototyped = yyvsp[-1].t;
/* this mid rule action has the semantic value of the
@@ -2094,7 +2094,7 @@
if (!ins || !ins->r[1] || ins->r[1]->type != VT_PCC_SUB)
fataly(EX_SOFTWARE, sourcefile, line,
"pcc_return not inside pcc subroutine\n");
- sprintf(name, "#pcc_sub_ret_%d", line - 1);
+ sprintf(name, "_#pcc_sub_ret_%d", line - 1);
yyval.sr = r = mk_pcc_sub(str_dup(name), 0);
i = iLABEL(cur_unit, r);
i->type = ITPCCSUB | ITLABEL;
@@ -2117,7 +2117,7 @@
fataly(EX_SOFTWARE, sourcefile, line,
"pcc_yield not inside pcc subroutine\n");
ins->r[1]->pcc_sub->calls_a_sub = 1;
- sprintf(name, "#pcc_sub_yield_%d", line - 1);
+ sprintf(name, "_#pcc_sub_yield_%d", line - 1);
yyval.sr = r = mk_pcc_sub(str_dup(name), 0);
i = iLABEL(cur_unit, r);
i->type = ITPCCSUB | ITLABEL | ITPCCYIELD;
@@ -2575,7 +2575,7 @@
char name[128];
SymReg * r;
Instruction *i;
- sprintf(name, "#pcc_sub_call_%d", line - 1);
+ sprintf(name, "_#pcc_sub_call_%d", line - 1);
r = mk_pcc_sub(str_dup(name), 0);
current_call = i = iLABEL(cur_unit, r);
i->type = ITCALL | ITPCCSUB;
@@ -2601,7 +2601,7 @@
char name[128];
SymReg * r;
Instruction *i;
- sprintf(name, "#pcc_sub_call_%d", line - 1);
+ sprintf(name, "_#pcc_sub_call_%d", line - 1);
r = mk_pcc_sub(str_dup(name), 0);
current_call = i = iLABEL(cur_unit, r);
i->type = ITCALL | ITPCCSUB;