/[gcl]/gcl/lsp/japi.c
ViewVC logotype

Diff of /gcl/lsp/japi.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by mjthomas, Sat Feb 22 06:16:54 2003 UTC revision 1.2 by mjthomas, Tue Feb 25 05:16:56 2003 UTC
# Line 1484  static void L125() Line 1484  static void L125()
1484          vs_top=(vs_base=old_base)+1;          vs_top=(vs_base=old_base)+1;
1485          vs_base[0]=make_fixnum(x);          vs_base[0]=make_fixnum(x);
1486  }  }
1487  /*      function definition for J_GETPARENTID   */  /*      function definition for J_GETPOS        */
1488    
1489  static void L126()  static void L126()
1490  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1491            check_arg(3);
1492            j_getpos(
1493            object_to_int(vs_base[0]),
1494            object_to_int(vs_base[1]),
1495            object_to_int(vs_base[2]));
1496            vs_top=(vs_base=old_base)+1;
1497            vs_base[0]=Cnil;
1498    }
1499    /*      function definition for J_GETPARENTID   */
1500    
1501    static void L127()
1502    {       object *old_base=vs_base;
1503          int x;          int x;
1504          check_arg(1);          check_arg(1);
1505          x=          x=
# Line 1498  static void L126() Line 1510  static void L126()
1510  }  }
1511  /*      function definition for J_SETFOCUS      */  /*      function definition for J_SETFOCUS      */
1512    
1513  static void L127()  static void L128()
1514  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1515          check_arg(1);          check_arg(1);
1516          j_setfocus(          j_setfocus(
# Line 1508  static void L127() Line 1520  static void L127()
1520  }  }
1521  /*      function definition for J_HASFOCUS      */  /*      function definition for J_HASFOCUS      */
1522    
1523  static void L128()  static void L129()
1524  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1525          int x;          int x;
1526          check_arg(1);          check_arg(1);
# Line 1520  static void L128() Line 1532  static void L128()
1532  }  }
1533  /*      function definition for J_GETSTRINGWIDTH        */  /*      function definition for J_GETSTRINGWIDTH        */
1534    
1535  static void L129()  static void L130()
1536  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1537          int x;          int x;
1538          check_arg(2);          check_arg(2);
# Line 1533  static void L129() Line 1545  static void L129()
1545  }  }
1546  /*      function definition for J_GETFONTHEIGHT */  /*      function definition for J_GETFONTHEIGHT */
1547    
1548  static void L130()  static void L131()
1549  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1550          int x;          int x;
1551          check_arg(1);          check_arg(1);
# Line 1545  static void L130() Line 1557  static void L130()
1557  }  }
1558  /*      function definition for J_GETFONTASCENT */  /*      function definition for J_GETFONTASCENT */
1559    
1560  static void L131()  static void L132()
1561  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1562          int x;          int x;
1563          check_arg(1);          check_arg(1);
# Line 1557  static void L131() Line 1569  static void L131()
1569  }  }
1570  /*      function definition for J_KEYLISTENER   */  /*      function definition for J_KEYLISTENER   */
1571    
1572  static void L132()  static void L133()
1573  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1574          int x;          int x;
1575          check_arg(1);          check_arg(1);
# Line 1569  static void L132() Line 1581  static void L132()
1581  }  }
1582  /*      function definition for J_GETKEYCODE    */  /*      function definition for J_GETKEYCODE    */
1583    
1584  static void L133()  static void L134()
1585  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1586          int x;          int x;
1587          check_arg(1);          check_arg(1);
# Line 1581  static void L133() Line 1593  static void L133()
1593  }  }
1594  /*      function definition for J_GETKEYCHAR    */  /*      function definition for J_GETKEYCHAR    */
1595    
1596  static void L134()  static void L135()
1597  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1598          int x;          int x;
1599          check_arg(1);          check_arg(1);
# Line 1593  static void L134() Line 1605  static void L134()
1605  }  }
1606  /*      function definition for J_MOUSELISTENER */  /*      function definition for J_MOUSELISTENER */
1607    
1608  static void L135()  static void L136()
1609  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1610          int x;          int x;
1611          check_arg(2);          check_arg(2);
# Line 1606  static void L135() Line 1618  static void L135()
1618  }  }
1619  /*      function definition for J_GETMOUSEX     */  /*      function definition for J_GETMOUSEX     */
1620    
1621  static void L136()  static void L137()
1622  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1623          int x;          int x;
1624          check_arg(1);          check_arg(1);
# Line 1618  static void L136() Line 1630  static void L136()
1630  }  }
1631  /*      function definition for J_GETMOUSEY     */  /*      function definition for J_GETMOUSEY     */
1632    
1633  static void L137()  static void L138()
1634  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1635          int x;          int x;
1636          check_arg(1);          check_arg(1);
# Line 1628  static void L137() Line 1640  static void L137()
1640          vs_top=(vs_base=old_base)+1;          vs_top=(vs_base=old_base)+1;
1641          vs_base[0]=make_fixnum(x);          vs_base[0]=make_fixnum(x);
1642  }  }
1643    /*      function definition for J_GETMOUSEPOS   */
1644    
1645    static void L139()
1646    {       object *old_base=vs_base;
1647            check_arg(3);
1648            j_getmousepos(
1649            object_to_int(vs_base[0]),
1650            object_to_int(vs_base[1]),
1651            object_to_int(vs_base[2]));
1652            vs_top=(vs_base=old_base)+1;
1653            vs_base[0]=Cnil;
1654    }
1655  /*      function definition for J_GETMOUSEBUTTON        */  /*      function definition for J_GETMOUSEBUTTON        */
1656    
1657  static void L138()  static void L140()
1658  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1659          int x;          int x;
1660          check_arg(1);          check_arg(1);
# Line 1642  static void L138() Line 1666  static void L138()
1666  }  }
1667  /*      function definition for J_FOCUSLISTENER */  /*      function definition for J_FOCUSLISTENER */
1668    
1669  static void L139()  static void L141()
1670  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1671          int x;          int x;
1672          check_arg(1);          check_arg(1);
# Line 1654  static void L139() Line 1678  static void L139()
1678  }  }
1679  /*      function definition for J_COMPONENTLISTENER     */  /*      function definition for J_COMPONENTLISTENER     */
1680    
1681  static void L140()  static void L142()
1682  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1683          int x;          int x;
1684          check_arg(2);          check_arg(2);
# Line 1667  static void L140() Line 1691  static void L140()
1691  }  }
1692  /*      function definition for J_WINDOWLISTENER        */  /*      function definition for J_WINDOWLISTENER        */
1693    
1694  static void L141()  static void L143()
1695  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1696          int x;          int x;
1697          check_arg(2);          check_arg(2);
# Line 1680  static void L141() Line 1704  static void L141()
1704  }  }
1705  /*      function definition for J_SETFLOWLAYOUT */  /*      function definition for J_SETFLOWLAYOUT */
1706    
1707  static void L142()  static void L144()
1708  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1709          check_arg(2);          check_arg(2);
1710          j_setflowlayout(          j_setflowlayout(
# Line 1691  static void L142() Line 1715  static void L142()
1715  }  }
1716  /*      function definition for J_SETBORDERLAYOUT       */  /*      function definition for J_SETBORDERLAYOUT       */
1717    
1718  static void L143()  static void L145()
1719  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1720          check_arg(1);          check_arg(1);
1721          j_setborderlayout(          j_setborderlayout(
# Line 1701  static void L143() Line 1725  static void L143()
1725  }  }
1726  /*      function definition for J_SETGRIDLAYOUT */  /*      function definition for J_SETGRIDLAYOUT */
1727    
1728  static void L144()  static void L146()
1729  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1730          check_arg(3);          check_arg(3);
1731          j_setgridlayout(          j_setgridlayout(
# Line 1713  static void L144() Line 1737  static void L144()
1737  }  }
1738  /*      function definition for J_SETFIXLAYOUT  */  /*      function definition for J_SETFIXLAYOUT  */
1739    
1740  static void L145()  static void L147()
1741  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1742          check_arg(1);          check_arg(1);
1743          j_setfixlayout(          j_setfixlayout(
# Line 1723  static void L145() Line 1747  static void L145()
1747  }  }
1748  /*      function definition for J_SETNOLAYOUT   */  /*      function definition for J_SETNOLAYOUT   */
1749    
1750  static void L146()  static void L148()
1751  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1752          check_arg(1);          check_arg(1);
1753          j_setnolayout(          j_setnolayout(
# Line 1733  static void L146() Line 1757  static void L146()
1757  }  }
1758  /*      function definition for J_SETBORDERPOS  */  /*      function definition for J_SETBORDERPOS  */
1759    
1760  static void L147()  static void L149()
1761  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1762          check_arg(2);          check_arg(2);
1763          j_setborderpos(          j_setborderpos(
# Line 1744  static void L147() Line 1768  static void L147()
1768  }  }
1769  /*      function definition for J_SETHGAP       */  /*      function definition for J_SETHGAP       */
1770    
1771  static void L148()  static void L150()
1772  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1773          check_arg(2);          check_arg(2);
1774          j_sethgap(          j_sethgap(
# Line 1755  static void L148() Line 1779  static void L148()
1779  }  }
1780  /*      function definition for J_SETVGAP       */  /*      function definition for J_SETVGAP       */
1781    
1782  static void L149()  static void L151()
1783  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1784          check_arg(2);          check_arg(2);
1785          j_setvgap(          j_setvgap(
# Line 1766  static void L149() Line 1790  static void L149()
1790  }  }
1791  /*      function definition for J_SETINSETS     */  /*      function definition for J_SETINSETS     */
1792    
1793  static void L150()  static void L152()
1794  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1795          check_arg(5);          check_arg(5);
1796          j_setinsets(          j_setinsets(
# Line 1780  static void L150() Line 1804  static void L150()
1804  }  }
1805  /*      function definition for J_SETALIGN      */  /*      function definition for J_SETALIGN      */
1806    
1807  static void L151()  static void L153()
1808  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1809          check_arg(2);          check_arg(2);
1810          j_setalign(          j_setalign(
# Line 1791  static void L151() Line 1815  static void L151()
1815  }  }
1816  /*      function definition for J_SETFLOWFILL   */  /*      function definition for J_SETFLOWFILL   */
1817    
1818  static void L152()  static void L154()
1819  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1820          check_arg(2);          check_arg(2);
1821          j_setflowfill(          j_setflowfill(
# Line 1802  static void L152() Line 1826  static void L152()
1826  }  }
1827  /*      function definition for J_TRANSLATE     */  /*      function definition for J_TRANSLATE     */
1828    
1829  static void L153()  static void L155()
1830  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1831          check_arg(3);          check_arg(3);
1832          j_translate(          j_translate(
# Line 1814  static void L153() Line 1838  static void L153()
1838  }  }
1839  /*      function definition for J_CLIPRECT      */  /*      function definition for J_CLIPRECT      */
1840    
1841  static void L154()  static void L156()
1842  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1843          check_arg(5);          check_arg(5);
1844          j_cliprect(          j_cliprect(
# Line 1828  static void L154() Line 1852  static void L154()
1852  }  }
1853  /*      function definition for J_DRAWRECT      */  /*      function definition for J_DRAWRECT      */
1854    
1855  static void L155()  static void L157()
1856  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1857          check_arg(5);          check_arg(5);
1858          j_drawrect(          j_drawrect(
# Line 1842  static void L155() Line 1866  static void L155()
1866  }  }
1867  /*      function definition for J_FILLRECT      */  /*      function definition for J_FILLRECT      */
1868    
1869  static void L156()  static void L158()
1870  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1871          check_arg(5);          check_arg(5);
1872          j_fillrect(          j_fillrect(
# Line 1856  static void L156() Line 1880  static void L156()
1880  }  }
1881  /*      function definition for J_DRAWROUNDRECT */  /*      function definition for J_DRAWROUNDRECT */
1882    
1883  static void L157()  static void L159()
1884  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1885          check_arg(7);          check_arg(7);
1886          j_drawroundrect(          j_drawroundrect(
# Line 1872  static void L157() Line 1896  static void L157()
1896  }  }
1897  /*      function definition for J_FILLROUNDRECT */  /*      function definition for J_FILLROUNDRECT */
1898    
1899  static void L158()  static void L160()
1900  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1901          check_arg(7);          check_arg(7);
1902          j_fillroundrect(          j_fillroundrect(
# Line 1888  static void L158() Line 1912  static void L158()
1912  }  }
1913  /*      function definition for J_DRAWOVAL      */  /*      function definition for J_DRAWOVAL      */
1914    
1915  static void L159()  static void L161()
1916  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1917          check_arg(5);          check_arg(5);
1918          j_drawoval(          j_drawoval(
# Line 1902  static void L159() Line 1926  static void L159()
1926  }  }
1927  /*      function definition for J_FILLOVAL      */  /*      function definition for J_FILLOVAL      */
1928    
1929  static void L160()  static void L162()
1930  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1931          check_arg(5);          check_arg(5);
1932          j_filloval(          j_filloval(
# Line 1916  static void L160() Line 1940  static void L160()
1940  }  }
1941  /*      function definition for J_DRAWCIRCLE    */  /*      function definition for J_DRAWCIRCLE    */
1942    
1943  static void L161()  static void L163()
1944  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1945          check_arg(4);          check_arg(4);
1946          j_drawcircle(          j_drawcircle(
# Line 1929  static void L161() Line 1953  static void L161()
1953  }  }
1954  /*      function definition for J_FILLCIRCLE    */  /*      function definition for J_FILLCIRCLE    */
1955    
1956  static void L162()  static void L164()
1957  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1958          check_arg(4);          check_arg(4);
1959          j_fillcircle(          j_fillcircle(
# Line 1942  static void L162() Line 1966  static void L162()
1966  }  }
1967  /*      function definition for J_DRAWARC       */  /*      function definition for J_DRAWARC       */
1968    
1969  static void L163()  static void L165()
1970  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1971          check_arg(7);          check_arg(7);
1972          j_drawarc(          j_drawarc(
# Line 1958  static void L163() Line 1982  static void L163()
1982  }  }
1983  /*      function definition for J_FILLARC       */  /*      function definition for J_FILLARC       */
1984    
1985  static void L164()  static void L166()
1986  {       object *old_base=vs_base;  {       object *old_base=vs_base;
1987          check_arg(7);          check_arg(7);
1988          j_fillarc(          j_fillarc(
# Line 1974  static void L164() Line 1998  static void L164()
1998  }  }
1999  /*      function definition for J_DRAWLINE      */  /*      function definition for J_DRAWLINE      */
2000    
2001  static void L165()  static void L167()
2002  {       object *old_base=vs_base;  {       object *old_base=vs_base;
2003          check_arg(5);          check_arg(5);
2004          j_drawline(          j_drawline(
# Line 1986  static void L165() Line 2010  static void L165()
2010          vs_top=(vs_base=old_base)+1;          vs_top=(vs_base=old_base)+1;
2011          vs_base[0]=Cnil;          vs_base[0]=Cnil;
2012  }  }
2013    /*      function definition for J_DRAWPOLYLINE  */
2014    
2015    static void L168()
2016    {       object *old_base=vs_base;
2017            check_arg(4);
2018            j_drawpolyline(
2019            object_to_int(vs_base[0]),
2020            object_to_int(vs_base[1]),
2021            object_to_int(vs_base[2]),
2022            object_to_int(vs_base[3]));
2023            vs_top=(vs_base=old_base)+1;
2024            vs_base[0]=Cnil;
2025    }
2026    /*      function definition for J_DRAWPOLYGON   */
2027    
2028    static void L169()
2029    {       object *old_base=vs_base;
2030            check_arg(4);
2031            j_drawpolygon(
2032            object_to_int(vs_base[0]),
2033            object_to_int(vs_base[1]),
2034            object_to_int(vs_base[2]),
2035            object_to_int(vs_base[3]));
2036            vs_top=(vs_base=old_base)+1;
2037            vs_base[0]=Cnil;
2038    }
2039    /*      function definition for J_FILLPOLYGON   */
2040    
2041    static void L170()
2042    {       object *old_base=vs_base;
2043            check_arg(4);
2044            j_fillpolygon(
2045            object_to_int(vs_base[0]),
2046            object_to_int(vs_base[1]),
2047            object_to_int(vs_base[2]),
2048            object_to_int(vs_base[3]));
2049            vs_top=(vs_base=old_base)+1;
2050            vs_base[0]=Cnil;
2051    }
2052  /*      function definition for J_DRAWPIXEL     */  /*      function definition for J_DRAWPIXEL     */
2053    
2054  static void L166()  static void L171()
2055  {       object *old_base=vs_base;  {       object *old_base=vs_base;
2056          check_arg(3);          check_arg(3);
2057          j_drawpixel(          j_drawpixel(
# Line 2000  static void L166() Line 2063  static void L166()
2063  }  }
2064  /*      function definition for J_DRAWSTRING    */  /*      function definition for J_DRAWSTRING    */
2065    
2066  static void L167()  static void L172()
2067  {       object *old_base=vs_base;  {       object *old_base=vs_base;
2068          check_arg(4);          check_arg(4);
2069          j_drawstring(          j_drawstring(
# Line 2013  static void L167() Line 2076  static void L167()
2076  }  }
2077  /*      function definition for J_SETXOR        */  /*      function definition for J_SETXOR        */
2078    
2079  static void L168()  static void L173()
2080  {       object *old_base=vs_base;  {       object *old_base=vs_base;
2081          check_arg(2);          check_arg(2);
2082          j_setxor(          j_setxor(
# Line 2024  static void L168() Line 2087  static void L168()
2087  }  }
2088  /*      function definition for J_GETIMAGE      */  /*      function definition for J_GETIMAGE      */
2089    
2090  static void L169()  static void L174()
2091  {       object *old_base=vs_base;  {       object *old_base=vs_base;
2092          int x;          int x;
2093          check_arg(1);          check_arg(1);
# Line 2034  static void L169() Line 2097  static void L169()
2097          vs_top=(vs_base=old_base)+1;          vs_top=(vs_base=old_base)+1;
2098          vs_base[0]=make_fixnum(x);          vs_base[0]=make_fixnum(x);
2099  }  }
2100    /*      function definition for J_GETIMAGESOURCE        */
2101    
2102    static void L175()
2103    {       object *old_base=vs_base;
2104            check_arg(8);
2105            j_getimagesource(
2106            object_to_int(vs_base[0]),
2107            object_to_int(vs_base[1]),
2108            object_to_int(vs_base[2]),
2109            object_to_int(vs_base[3]),
2110            object_to_int(vs_base[4]),
2111            object_to_int(vs_base[5]),
2112            object_to_int(vs_base[6]),
2113            object_to_int(vs_base[7]));
2114            vs_top=(vs_base=old_base)+1;
2115            vs_base[0]=Cnil;
2116    }
2117    /*      function definition for J_DRAWIMAGESOURCE       */
2118    
2119    static void L176()
2120    {       object *old_base=vs_base;
2121            check_arg(8);
2122            j_drawimagesource(
2123            object_to_int(vs_base[0]),
2124            object_to_int(vs_base[1]),
2125            object_to_int(vs_base[2]),
2126            object_to_int(vs_base[3]),
2127            object_to_int(vs_base[4]),
2128            object_to_int(vs_base[5]),
2129            object_to_int(vs_base[6]),
2130            object_to_int(vs_base[7]));
2131            vs_top=(vs_base=old_base)+1;
2132            vs_base[0]=Cnil;
2133    }
2134  /*      function definition for J_GETSCALEDIMAGE        */  /*      function definition for J_GETSCALEDIMAGE        */
2135    
2136  static void L170()  static void L177()
2137  {       object *old_base=vs_base;  {       object *old_base=vs_base;
2138          int x;          int x;
2139          check_arg(7);          check_arg(7);
# Line 2054  static void L170() Line 2151  static void L170()
2151  }  }
2152  /*      function definition for J_DRAWIMAGE     */  /*      function definition for J_DRAWIMAGE     */
2153    
2154  static void L171()  static void L178()
2155  {       object *old_base=vs_base;  {       object *old_base=vs_base;
2156          check_arg(4);          check_arg(4);
2157          j_drawimage(          j_drawimage(
# Line 2067  static void L171() Line 2164  static void L171()
2164  }  }
2165  /*      function definition for J_DRAWSCALEDIMAGE       */  /*      function definition for J_DRAWSCALEDIMAGE       */
2166    
2167  static void L172()  static void L179()
2168  {       object *old_base=vs_base;  {       object *old_base=vs_base;
2169          check_arg(10);          check_arg(10);
2170          j_drawscaledimage(          j_drawscaledimage(
# Line 2086  static void L172() Line 2183  static void L172()
2183  }  }
2184  /*      function definition for J_SETCOLOR      */  /*      function definition for J_SETCOLOR      */
2185    
2186  static void L173()  static void L180()
2187  {       object *old_base=vs_base;  {       object *old_base=vs_base;
2188          check_arg(4);          check_arg(4);
2189          j_setcolor(          j_setcolor(
# Line 2099  static void L173() Line 2196  static void L173()
2196  }  }
2197  /*      function definition for J_SETCOLORBG    */  /*      function definition for J_SETCOLORBG    */
2198    
2199  static void L174()  static void L181()
2200  {       object *old_base=vs_base;  {       object *old_base=vs_base;
2201          check_arg(4);          check_arg(4);
2202          j_setcolorbg(          j_setcolorbg(
# Line 2112  static void L174() Line 2209  static void L174()
2209  }  }
2210  /*      function definition for J_SETNAMEDCOLOR */  /*      function definition for J_SETNAMEDCOLOR */
2211    
2212  static void L175()  static void L182()
2213  {       object *old_base=vs_base;  {       object *old_base=vs_base;
2214          check_arg(2);          check_arg(2);
2215          j_setnamedcolor(          j_setnamedcolor(
# Line 2123  static void L175() Line 2220  static void L175()
2220  }  }
2221  /*      function definition for J_SETNAMEDCOLORBG       */  /*      function definition for J_SETNAMEDCOLORBG       */
2222    
2223  static void L176()  static void L183()
2224  {       object *old_base=vs_base;  {       object *old_base=vs_base;
2225          check_arg(2);          check_arg(2);
2226          j_setnamedcolorbg(          j_setnamedcolorbg(
# Line 2134  static void L176() Line 2231  static void L176()
2231  }  }
2232  /*      function definition for J_LOADIMAGE     */  /*      function definition for J_LOADIMAGE     */
2233    
2234  static void L177()  static void L184()
2235  {       object *old_base=vs_base;  {       object *old_base=vs_base;
2236          int x;          int x;
2237          check_arg(1);          check_arg(1);
# Line 2146  static void L177() Line 2243  static void L177()
2243  }  }
2244  /*      function definition for J_SAVEIMAGE     */  /*      function definition for J_SAVEIMAGE     */
2245    
2246  static void L178()  static void L185()
2247  {       object *old_base=vs_base;  {       object *old_base=vs_base;
2248          int x;          int x;
2249          check_arg(3);          check_arg(3);
# Line 2160  static void L178() Line 2257  static void L178()
2257  }  }
2258  /*      function definition for J_SYNC  */  /*      function definition for J_SYNC  */
2259    
2260  static void L179()  static void L186()
2261  {       object *old_base=vs_base;  {       object *old_base=vs_base;
2262          check_arg(0);          check_arg(0);
2263          j_sync();          j_sync();
# Line 2169  static void L179() Line 2266  static void L179()
2266  }  }
2267  /*      function definition for J_BEEP  */  /*      function definition for J_BEEP  */
2268    
2269  static void L180()  static void L187()
2270  {       object *old_base=vs_base;  {       object *old_base=vs_base;
2271          check_arg(0);          check_arg(0);
2272          j_beep();          j_beep();
# Line 2178  static void L180() Line 2275  static void L180()
2275  }  }
2276  /*      function definition for J_RANDOM        */  /*      function definition for J_RANDOM        */
2277    
2278  static void L181()  static void L188()
2279  {       object *old_base=vs_base;  {       object *old_base=vs_base;
2280          int x;          int x;
2281          check_arg(0);          check_arg(0);
# Line 2189  static void L181() Line 2286  static void L181()
2286  }  }
2287  /*      function definition for J_SLEEP */  /*      function definition for J_SLEEP */
2288    
2289  static void L182()  static void L189()
2290  {       object *old_base=vs_base;  {       object *old_base=vs_base;
2291          check_arg(1);          check_arg(1);
2292          j_sleep(          j_sleep(

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26