home *** CD-ROM | disk | FTP | other *** search
/ NOVA - For the NeXT Workstation / NOVA - For the NeXT Workstation.iso / Apps / Utilities / Other / TimeMon / TimeMonWraps.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-12-26  |  13.0 KB  |  398 lines
  1. /* TimeMonWraps.c generated from TimeMonWraps.psw
  2.    by unix pswrap V1.009  Wed Apr 19 17:50:24 PDT 1989
  3.  */
  4.  
  5. #include <dpsclient/dpsfriends.h>
  6. #include <string.h>
  7.  
  8. #line 1 "TimeMonWraps.psw"
  9. /*
  10.   TimeMonWraps.psw
  11.  
  12.     Drawing code for use by the Percentages class.
  13.  
  14.   Copyright 1991 Scott Hess.  Permission to use, copy, modify, and
  15.   distribute this software and its documentation for any purpose
  16.   and without fee is hereby granted, provided that this copyright
  17.   notice appear in all copies.  The copyright notice need not appear
  18.   on binary-only distributions - just in source code.
  19.   
  20.   Scott Hess makes no representations about the suitability of this
  21.   software for any purpose.  It is provided "as is" without express
  22.   or implied warranty.
  23. */
  24. #line 25 "TimeMonWraps.c"
  25. void drawInit( void )
  26. {
  27.   typedef struct {
  28.     unsigned char tokenType;
  29.     unsigned char topLevelCount;
  30.     unsigned short nBytes;
  31.  
  32.     DPSBinObjGeneric obj0;
  33.     DPSBinObjGeneric obj1;
  34.     DPSBinObjGeneric obj2;
  35.     DPSBinObjGeneric obj3;
  36.     DPSBinObjGeneric obj4;
  37.     DPSBinObjGeneric obj5;
  38.     DPSBinObjGeneric obj6;
  39.     DPSBinObjGeneric obj7;
  40.     DPSBinObjGeneric obj8;
  41.     DPSBinObjGeneric obj9;
  42.     DPSBinObjGeneric obj10;
  43.     DPSBinObjReal obj11;
  44.     DPSBinObjGeneric obj12;
  45.     DPSBinObjGeneric obj13;
  46.     DPSBinObjGeneric obj14;
  47.     DPSBinObjGeneric obj15;
  48.     DPSBinObjGeneric obj16;
  49.     DPSBinObjGeneric obj17;
  50.     DPSBinObjGeneric obj18;
  51.     DPSBinObjGeneric obj19;
  52.     DPSBinObjGeneric obj20;
  53.     DPSBinObjGeneric obj21;
  54.     DPSBinObjGeneric obj22;
  55.     DPSBinObjReal obj23;
  56.     DPSBinObjGeneric obj24;
  57.     DPSBinObjGeneric obj25;
  58.     DPSBinObjGeneric obj26;
  59.     DPSBinObjGeneric obj27;
  60.     DPSBinObjGeneric obj28;
  61.     DPSBinObjGeneric obj29;
  62.     DPSBinObjGeneric obj30;
  63.     DPSBinObjGeneric obj31;
  64.     DPSBinObjGeneric obj32;
  65.     DPSBinObjGeneric obj33;
  66.     DPSBinObjGeneric obj34;
  67.     DPSBinObjGeneric obj35;
  68.     DPSBinObjGeneric obj36;
  69.     DPSBinObjReal obj37;
  70.     DPSBinObjGeneric obj38;
  71.     DPSBinObjGeneric obj39;
  72.     DPSBinObjGeneric obj40;
  73.     DPSBinObjGeneric obj41;
  74.     DPSBinObjGeneric obj42;
  75.     DPSBinObjGeneric obj43;
  76.     DPSBinObjGeneric obj44;
  77.     DPSBinObjGeneric obj45;
  78.     DPSBinObjGeneric obj46;
  79.     DPSBinObjGeneric obj47;
  80.     DPSBinObjGeneric obj48;
  81.     DPSBinObjGeneric obj49;
  82.     DPSBinObjGeneric obj50;
  83.     DPSBinObjReal obj51;
  84.     DPSBinObjGeneric obj52;
  85.     DPSBinObjGeneric obj53;
  86.     DPSBinObjGeneric obj54;
  87.     DPSBinObjGeneric obj55;
  88.     DPSBinObjGeneric obj56;
  89.     DPSBinObjGeneric obj57;
  90.     DPSBinObjGeneric obj58;
  91.     DPSBinObjGeneric obj59;
  92.     DPSBinObjGeneric obj60;
  93.     DPSBinObjGeneric obj61;
  94.     DPSBinObjGeneric obj62;
  95.     DPSBinObjGeneric obj63;
  96.     DPSBinObjGeneric obj64;
  97.     DPSBinObjGeneric obj65;
  98.     DPSBinObjGeneric obj66;
  99.     DPSBinObjGeneric obj67;
  100.     DPSBinObjReal obj68;
  101.     DPSBinObjGeneric obj69;
  102.     DPSBinObjGeneric obj70;
  103.     DPSBinObjGeneric obj71;
  104.     DPSBinObjGeneric obj72;
  105.     DPSBinObjGeneric obj73;
  106.     DPSBinObjGeneric obj74;
  107.     DPSBinObjGeneric obj75;
  108.     DPSBinObjGeneric obj76;
  109.     DPSBinObjGeneric obj77;
  110.     DPSBinObjGeneric obj78;
  111.     DPSBinObjGeneric obj79;
  112.     DPSBinObjReal obj80;
  113.     DPSBinObjGeneric obj81;
  114.     DPSBinObjGeneric obj82;
  115.     DPSBinObjGeneric obj83;
  116.     DPSBinObjGeneric obj84;
  117.     DPSBinObjGeneric obj85;
  118.     DPSBinObjGeneric obj86;
  119.     DPSBinObjGeneric obj87;
  120.     DPSBinObjGeneric obj88;
  121.     DPSBinObjGeneric obj89;
  122.     DPSBinObjGeneric obj90;
  123.     DPSBinObjGeneric obj91;
  124.     DPSBinObjGeneric obj92;
  125.     DPSBinObjGeneric obj93;
  126.     DPSBinObjReal obj94;
  127.     DPSBinObjGeneric obj95;
  128.     DPSBinObjGeneric obj96;
  129.     DPSBinObjGeneric obj97;
  130.     DPSBinObjGeneric obj98;
  131.     DPSBinObjGeneric obj99;
  132.     DPSBinObjGeneric obj100;
  133.     DPSBinObjGeneric obj101;
  134.     DPSBinObjGeneric obj102;
  135.     DPSBinObjGeneric obj103;
  136.     DPSBinObjGeneric obj104;
  137.     DPSBinObjGeneric obj105;
  138.     DPSBinObjGeneric obj106;
  139.     DPSBinObjGeneric obj107;
  140.     } _dpsQ;
  141.   static const _dpsQ _dpsStat = {
  142.     DPS_DEF_TOKENTYPE, 8, 868,
  143.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* _doDrawArc1 */
  144.     {DPS_EXEC|DPS_ARRAY, 0, 43, 520},
  145.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 14},    /* bind */
  146.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  147.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* _doDrawArc2 */
  148.     {DPS_EXEC|DPS_ARRAY, 0, 57, 64},
  149.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 14},    /* bind */
  150.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  151.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* rad */
  152.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},    /* exch */
  153.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  154.     {DPS_LITERAL|DPS_REAL, 0, 0, 1.0},
  155.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 150},    /* setgray */
  156.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  157.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  158.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  159.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  160.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  161.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* rad */
  162.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  163.     {DPS_LITERAL|DPS_INT, 0, 0, 360},
  164.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 5},    /* arc */
  165.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 66},    /* fill */
  166.     {DPS_LITERAL|DPS_REAL, 0, 0, 0.666},
  167.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 150},    /* setgray */
  168.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  169.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  170.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  171.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  172.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  173.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* rad */
  174.     {DPS_LITERAL|DPS_INT, 0, 0, 90},
  175.     {DPS_LITERAL|DPS_INT, 0, 0, 4},
  176.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},    /* index */
  177.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 6},    /* arcn */
  178.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 66},    /* fill */
  179.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},    /* pop */
  180.     {DPS_LITERAL|DPS_REAL, 0, 0, 0.333},
  181.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 150},    /* setgray */
  182.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  183.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  184.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  185.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  186.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  187.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* rad */
  188.     {DPS_LITERAL|DPS_INT, 0, 0, 90},
  189.     {DPS_LITERAL|DPS_INT, 0, 0, 4},
  190.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},    /* index */
  191.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 6},    /* arcn */
  192.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 66},    /* fill */
  193.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},    /* pop */
  194.     {DPS_LITERAL|DPS_REAL, 0, 0, 0.0},
  195.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 150},    /* setgray */
  196.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  197.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  198.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  199.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  200.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  201.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* rad */
  202.     {DPS_LITERAL|DPS_INT, 0, 0, 90},
  203.     {DPS_LITERAL|DPS_INT, 0, 0, 4},
  204.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},    /* index */
  205.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 6},    /* arcn */
  206.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 66},    /* fill */
  207.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},    /* pop */
  208.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* rad */
  209.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},    /* exch */
  210.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  211.     {DPS_LITERAL|DPS_REAL, 0, 0, 1.0},
  212.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 150},    /* setgray */
  213.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  214.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  215.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  216.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  217.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  218.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* rad */
  219.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  220.     {DPS_LITERAL|DPS_INT, 0, 0, 360},
  221.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 5},    /* arc */
  222.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 66},    /* fill */
  223.     {DPS_LITERAL|DPS_REAL, 0, 0, 0.333},
  224.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 150},    /* setgray */
  225.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  226.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  227.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  228.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  229.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  230.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* rad */
  231.     {DPS_LITERAL|DPS_INT, 0, 0, 90},
  232.     {DPS_LITERAL|DPS_INT, 0, 0, 4},
  233.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},    /* index */
  234.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 6},    /* arcn */
  235.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 66},    /* fill */
  236.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},    /* pop */
  237.     {DPS_LITERAL|DPS_REAL, 0, 0, 0.0},
  238.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 150},    /* setgray */
  239.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  240.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  241.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  242.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  243.     {DPS_LITERAL|DPS_INT, 0, 0, 24},
  244.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* rad */
  245.     {DPS_LITERAL|DPS_INT, 0, 0, 90},
  246.     {DPS_LITERAL|DPS_INT, 0, 0, 4},
  247.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},    /* index */
  248.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 6},    /* arcn */
  249.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 66},    /* fill */
  250.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},    /* pop */
  251.     }; /* _dpsQ */
  252.   _dpsQ _dpsF;    /* local copy  */
  253.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  254.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  255.   static long int _dpsCodes[11] = {-1};
  256.   {
  257. if (_dpsCodes[0] < 0) {
  258.     static const char * const _dps_names[] = {
  259.     "_doDrawArc1",
  260.     "_doDrawArc2",
  261.     "rad",
  262.     (char *) 0 ,
  263.     (char *) 0 ,
  264.     (char *) 0 ,
  265.     (char *) 0 ,
  266.     (char *) 0 ,
  267.     (char *) 0 ,
  268.     (char *) 0 ,
  269.     (char *) 0 };
  270.     long int *_dps_nameVals[11];
  271.     _dps_nameVals[0] = &_dpsCodes[0];
  272.     _dps_nameVals[1] = &_dpsCodes[1];
  273.     _dps_nameVals[2] = &_dpsCodes[2];
  274.     _dps_nameVals[3] = &_dpsCodes[3];
  275.     _dps_nameVals[4] = &_dpsCodes[4];
  276.     _dps_nameVals[5] = &_dpsCodes[5];
  277.     _dps_nameVals[6] = &_dpsCodes[6];
  278.     _dps_nameVals[7] = &_dpsCodes[7];
  279.     _dps_nameVals[8] = &_dpsCodes[8];
  280.     _dps_nameVals[9] = &_dpsCodes[9];
  281.     _dps_nameVals[10] = &_dpsCodes[10];
  282.  
  283.     DPSMapNames(_dpsCurCtxt, 11, _dps_names, _dps_nameVals);
  284.     }
  285.   }
  286.  
  287.   _dpsF = _dpsStat;    /* assign automatic variable */
  288.  
  289.   _dpsP[0].val.nameVal = _dpsCodes[0];
  290.   _dpsP[4].val.nameVal = _dpsCodes[1];
  291.   _dpsP[8].val.nameVal = _dpsCodes[2];
  292.   _dpsP[101].val.nameVal = _dpsCodes[3];
  293.   _dpsP[87].val.nameVal = _dpsCodes[4];
  294.   _dpsP[75].val.nameVal = _dpsCodes[5];
  295.   _dpsP[65].val.nameVal = _dpsCodes[6];
  296.   _dpsP[58].val.nameVal = _dpsCodes[7];
  297.   _dpsP[44].val.nameVal = _dpsCodes[8];
  298.   _dpsP[30].val.nameVal = _dpsCodes[9];
  299.   _dpsP[18].val.nameVal = _dpsCodes[10];
  300.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,868);
  301. }
  302. #line 70 "TimeMonWraps.psw"
  303.  
  304.     /* These cover for the pre-loaded procedures. */
  305. #line 306 "TimeMonWraps.c"
  306. void drawArc1(double radius, double bdeg, double ddeg)
  307. {
  308.   typedef struct {
  309.     unsigned char tokenType;
  310.     unsigned char topLevelCount;
  311.     unsigned short nBytes;
  312.  
  313.     DPSBinObjReal obj0;
  314.     DPSBinObjReal obj1;
  315.     DPSBinObjReal obj2;
  316.     DPSBinObjGeneric obj3;
  317.     } _dpsQ;
  318.   static const _dpsQ _dpsStat = {
  319.     DPS_DEF_TOKENTYPE, 4, 36,
  320.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: bdeg */
  321.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: ddeg */
  322.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: radius */
  323.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* _doDrawArc1 */
  324.     }; /* _dpsQ */
  325.   _dpsQ _dpsF;    /* local copy  */
  326.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  327.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  328.   static long int _dpsCodes[1] = {-1};
  329.   {
  330. if (_dpsCodes[0] < 0) {
  331.     static const char * const _dps_names[] = {
  332.     "_doDrawArc1"};
  333.     long int *_dps_nameVals[1];
  334.     _dps_nameVals[0] = &_dpsCodes[0];
  335.  
  336.     DPSMapNames(_dpsCurCtxt, 1, _dps_names, _dps_nameVals);
  337.     }
  338.   }
  339.  
  340.   _dpsF = _dpsStat;    /* assign automatic variable */
  341.  
  342.   _dpsP[2].val.realVal = radius;
  343.   _dpsP[0].val.realVal = bdeg;
  344.   _dpsP[1].val.realVal = ddeg;
  345.   _dpsP[3].val.nameVal = _dpsCodes[0];
  346.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,36);
  347. }
  348. #line 74 "TimeMonWraps.psw"
  349.  
  350. #line 351 "TimeMonWraps.c"
  351. void drawArc2(double radius, double bdeg, double ddeg, double ldeg)
  352. {
  353.   typedef struct {
  354.     unsigned char tokenType;
  355.     unsigned char topLevelCount;
  356.     unsigned short nBytes;
  357.  
  358.     DPSBinObjReal obj0;
  359.     DPSBinObjReal obj1;
  360.     DPSBinObjReal obj2;
  361.     DPSBinObjReal obj3;
  362.     DPSBinObjGeneric obj4;
  363.     } _dpsQ;
  364.   static const _dpsQ _dpsStat = {
  365.     DPS_DEF_TOKENTYPE, 5, 44,
  366.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: bdeg */
  367.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: ddeg */
  368.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: ldeg */
  369.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: radius */
  370.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* _doDrawArc2 */
  371.     }; /* _dpsQ */
  372.   _dpsQ _dpsF;    /* local copy  */
  373.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  374.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  375.   static long int _dpsCodes[1] = {-1};
  376.   {
  377. if (_dpsCodes[0] < 0) {
  378.     static const char * const _dps_names[] = {
  379.     "_doDrawArc2"};
  380.     long int *_dps_nameVals[1];
  381.     _dps_nameVals[0] = &_dpsCodes[0];
  382.  
  383.     DPSMapNames(_dpsCurCtxt, 1, _dps_names, _dps_nameVals);
  384.     }
  385.   }
  386.  
  387.   _dpsF = _dpsStat;    /* assign automatic variable */
  388.  
  389.   _dpsP[3].val.realVal = radius;
  390.   _dpsP[0].val.realVal = bdeg;
  391.   _dpsP[1].val.realVal = ddeg;
  392.   _dpsP[2].val.realVal = ldeg;
  393.   _dpsP[4].val.nameVal = _dpsCodes[0];
  394.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,44);
  395. }
  396. #line 77 "TimeMonWraps.psw"
  397.  
  398.