home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Amiga 13 / MA_Cover_13.bin / source / c / apl / at.c < prev    next >
Encoding:
C/C++ Source or Header  |  1999-11-23  |  5.2 KB  |  279 lines
  1. /*
  2.  * Declarations of all functions (required by Version 7 C
  3.  * for the array to be set up without warning messages)
  4.  */
  5.  
  6.     extern ex_abs();
  7.     extern ex_add();
  8.     extern ex_and();
  9.     extern ex_ap();
  10.     extern ex_arg1();
  11.     extern ex_arg2();
  12.     extern ex_asgn();
  13.     extern ex_auto();
  14.     extern ex_base();
  15.     extern ex_botch();
  16.     extern ex_br();
  17.     extern ex_br0();
  18.     extern ex_cat();
  19.     extern ex_catk();
  20.     extern ex_ceil();
  21.     extern ex_chdir();
  22.     extern ex_cir();
  23.     extern ex_close();
  24.     extern ex_com();
  25.     extern ex_com0();
  26.     extern ex_comb();
  27.     extern ex_comk();
  28.     extern ex_creat();
  29.     extern ex_crp();
  30.     extern ex_ddom();
  31.     extern ex_deal();
  32.     extern ex_dfmt();
  33.     extern ex_dibm();
  34.     extern ex_diot();
  35.     extern ex_div();
  36.     extern ex_drho();
  37.     extern ex_drop();
  38.     extern ex_dtrn();
  39.     extern ex_dup();
  40.     extern ex_elid();
  41.     extern ex_eps();
  42.     extern ex_eq();
  43.     extern ex_exd();
  44.     extern ex_exd0();
  45.     extern ex_exdk();
  46.     extern ex_exec();
  47.     extern ex_exit();
  48.     extern ex_exp();
  49.     extern ex_fac();
  50.     extern ex_fdef();
  51.     extern ex_float();
  52.     extern ex_nl();
  53.     extern ex_floor();
  54.     extern ex_fork();
  55.     extern ex_fun();
  56.     extern ex_gdd();
  57.     extern ex_gddk();
  58.     extern ex_gdu();
  59.     extern ex_gduk();
  60.     extern ex_ge();
  61.     extern ex_gt();
  62.     extern ex_hprint();
  63.     extern ex_ibr();
  64.     extern ex_ibr0();
  65.     extern ex_immed();
  66.     extern ex_index();
  67.     extern ex_iprod();
  68.     extern ex_kill();
  69.     extern ex_label();
  70.     extern ex_le();
  71.     extern ex_log();
  72.     extern ex_loge();
  73.     extern ex_lt();
  74.     extern ex_max();
  75.     extern ex_mdom();
  76.     extern ex_menc();
  77.     extern ex_meps();
  78.     extern ex_mfmt();
  79.     extern ex_mibm();
  80.     extern ex_min();
  81.     extern ex_minus();
  82.     extern ex_miot();
  83.     extern ex_mod();
  84.     extern ex_mrho();
  85.     extern ex_mtrn();
  86.     extern ex_mul();
  87.     extern ex_nand();
  88.     extern ex_nc();
  89.     extern ex_ne();
  90.     extern ex_nilret();
  91.     extern ex_nor();
  92.     extern ex_not();
  93.     extern ex_open();
  94.     extern ex_oprod();
  95.     extern ex_or();
  96.     extern ex_pi();
  97.     extern ex_pipe();
  98.     extern ex_plus();
  99.     extern ex_print();
  100.     extern ex_pwr();
  101.     extern ex_rand();
  102.     extern ex_rav();
  103.     extern ex_ravk();
  104.     extern ex_rd();
  105.     extern ex_read();
  106.     extern ex_recip();
  107.     extern ex_red();
  108.     extern ex_red0();
  109.     extern ex_redk();
  110.     extern ex_rep();
  111.     extern ex_rest();
  112.     extern ex_rev();
  113.     extern ex_rev0();
  114.     extern ex_revk();
  115.     extern ex_rot();
  116.     extern ex_rot0();
  117.     extern ex_rotk();
  118.     extern ex_run();
  119.     extern ex_scan();
  120.     extern ex_scn0();
  121.     extern ex_scnk();
  122.     extern ex_seek();
  123.     extern ex_sgn();
  124.     extern ex_signl();
  125.     extern ex_sub();
  126.     extern ex_take();
  127.     extern ex_unlink();
  128.     extern ex_wait();
  129.     extern ex_write();
  130.  
  131.  
  132. int (*exop[])() = {
  133.  
  134.     0,             /* 0 */
  135.     ex_add,     /* 1 */
  136.     ex_plus,     /* 2 */
  137.     ex_sub,     /* 3 */
  138.     ex_minus,     /* 4 */
  139.     ex_mul,     /* 5 */
  140.     ex_sgn,     /* 6 */
  141.     ex_div,     /* 7 */
  142.     ex_recip,     /* 8 */
  143.     ex_mod,     /* 9 */
  144.     ex_abs,     /* 10 */
  145.     ex_min,     /* 11 */
  146.     ex_floor,     /* 12 */
  147.     ex_max,     /* 13 */
  148.     ex_ceil,     /* 14 */
  149.     ex_pwr,     /* 15 */
  150.     ex_exp,     /* 16 */
  151.     ex_log,     /* 17 */
  152.     ex_loge,     /* 18 */
  153.     ex_cir,     /* 19 */
  154.     ex_pi,         /* 20 */
  155.     ex_comb,     /* 21 */
  156.     ex_fac,     /* 22 */
  157.     ex_deal,     /* 23 */
  158.     ex_rand,     /* 24 */
  159.     ex_drho,     /* 25 */
  160.     ex_mrho,     /* 26 */
  161.     ex_diot,     /* 27 */
  162.     ex_miot,     /* 28 */
  163.     ex_rot0,     /* 29 */
  164.     ex_rev0,     /* 30 */
  165.     ex_dtrn,     /* 31 */
  166.     ex_mtrn,     /* 32 */
  167.     ex_dibm,     /* 33 */
  168.     ex_mibm,     /* 34 */
  169.     ex_gdu,     /* 35 */
  170.     ex_gduk,     /* 36 */
  171.     ex_gdd,     /* 37 */
  172.     ex_gddk,     /* 38 */
  173.     ex_exd,     /* 39 */
  174.     ex_scan,     /* 40 */
  175.     ex_exdk,     /* 41 */
  176.     ex_scnk,     /* 42 */
  177.     ex_iprod,     /* 43 */
  178.     ex_oprod,     /* 44 */
  179.     0,             /* 45 */
  180.     0,             /* 46 */
  181.     ex_br0,     /* 47 */
  182.     ex_br,         /* 48 */
  183.     ex_ddom,     /* 49 */
  184.     ex_mdom,     /* 50 */
  185.     ex_com,     /* 51 */
  186.     ex_red,     /* 52 */
  187.     ex_comk,     /* 53 */
  188.     ex_redk,     /* 54 */
  189.     ex_rot,     /* 55 */
  190.     ex_rev,     /* 56 */
  191.     ex_rotk,     /* 57 */
  192.     ex_revk,     /* 58 */
  193.     ex_cat,     /* 59 */
  194.     ex_rav,     /* 60 */
  195.     ex_catk,     /* 61 */
  196.     ex_ravk,     /* 62 */
  197.     ex_print,     /* 63 */
  198.     0,             /* 64 */
  199.     ex_elid,     /* 65 */
  200.     0,             /* 66 */
  201.     0,             /* 67 */
  202.     ex_index,     /* 68 */
  203.     ex_hprint,     /* 69 */
  204.     0,             /* 70 */
  205.     ex_lt,         /* 71 */
  206.     ex_le,         /* 72 */
  207.     ex_gt,         /* 73 */
  208.     ex_ge,         /* 74 */
  209.     ex_eq,         /* 75 */
  210.     ex_ne,         /* 76 */
  211.     ex_and,     /* 77 */
  212.     ex_or,         /* 78 */
  213.     ex_nand,     /* 79 */
  214.     ex_nor,     /* 80 */
  215.     ex_not,     /* 81 */
  216.     ex_eps,     /* 82 */
  217.     ex_meps,     /* 83 */
  218.     ex_rep,     /* 84 */
  219.     ex_take,     /* 85 */
  220.     ex_drop,     /* 86 */
  221.     ex_exd0,     /* 87 */
  222.     ex_asgn,     /* 88 */
  223.     ex_immed,     /* 89 */
  224.     0,             /* 90 */
  225.     0,             /* 91 */
  226.     ex_fun,     /* 92 */
  227.     ex_arg1,     /* 93 */
  228.     ex_arg2,     /* 94 */
  229.     ex_auto,     /* 95 */
  230.     ex_rest,     /* 96 */
  231.     ex_com0,     /* 97 */
  232.     ex_red0,     /* 98 */
  233.     ex_exd0,     /* 99 */
  234.     ex_scn0,     /*100 */
  235.     ex_base,     /*101 */
  236.     ex_menc,     /*102            monadic encod   */
  237.     ex_label,     /*103 */
  238.     0,             /*104 */
  239.     0,             /*105 */
  240.     0,             /*106 */
  241.     0,             /*107 */
  242.     0,             /*108 */
  243.     0,             /*109 */
  244.     0,             /*110 */
  245.     0,             /*111 */
  246.     ex_run,     /*112 */
  247.     ex_fork,     /*113 */
  248.     ex_wait,     /*114 */
  249.     ex_exec,     /*115 */
  250.     ex_fdef,     /*116 */
  251.     ex_exit,     /*117 */
  252.     ex_pipe,     /*118 */
  253.     ex_chdir,     /*119 */
  254.     ex_open,     /*120 */
  255.     ex_close,     /*121 */
  256.     ex_read,     /*122 */
  257.     ex_write,     /*123 */
  258.     ex_creat,     /*124 */
  259.     ex_seek,     /*125 */
  260.     ex_unlink,     /*126 */
  261.     ex_rd,         /*127 */
  262.     ex_dup,     /*128 */
  263.     ex_ap,         /*129 */
  264.     ex_kill,     /*130 */
  265.     ex_crp,     /*131 */
  266.     ex_dfmt,     /*132 */
  267.     ex_mfmt,     /*133 */
  268.     ex_nc,         /*134 */
  269.     ex_nilret,     /*135 */
  270.     ex_botch,     /*136            XQUAD--never executed  */
  271.     ex_ibr,     /*137 */
  272.     ex_ibr0,     /*138 */
  273.     ex_botch,     /*139            RVAL--in a1.c  */
  274.     ex_signl,     /*140 */
  275.     ex_float,     /*141 */
  276.     ex_nl,        /*142 */
  277.     ex_botch,     /*143 */
  278. };
  279.