This is xwindowattributes.c in view mode; [Download] [Up]
/* SCHEME->C */
#include <objects.h>
DEFSTRING( t1842, "SCREENP", 7 );
DEFSTATICTSCP( c1817 );
DEFSTRING( t1843, "VISUALP", 7 );
DEFSTATICTSCP( c1681 );
DEFSTRING( t1844,
"Argument not an unsigned 8-bit INTEGER: ~s", 42 );
DEFSTATICTSCP2( c1627, t1844 );
DEFSTRING( t1845, "INTEGER->CHAR", 13 );
DEFSTATICTSCP( c1626 );
DEFSTRING( t1846, "XWINDOWATTRIBUTESP", 18 );
DEFSTATICTSCP( c1598 );
static void init_constants()
{
c1817 = STRINGTOSYMBOL( U_TX( ADR( t1842 ) ) );
CONSTANTEXP( ADR( c1817 ) );
c1681 = STRINGTOSYMBOL( U_TX( ADR( t1843 ) ) );
CONSTANTEXP( ADR( c1681 ) );
c1626 = STRINGTOSYMBOL( U_TX( ADR( t1845 ) ) );
CONSTANTEXP( ADR( c1626 ) );
c1598 = STRINGTOSYMBOL( U_TX( ADR( t1846 ) ) );
CONSTANTEXP( ADR( c1598 ) );
}
DEFTSCP( ttributes_attributes_a9a341a7_v );
DEFSTRING( t1847, "MAKE-XWINDOWATTRIBUTES", 22 );
EXTERNTSCPP( sc_cons );
EXTERNTSCP( sc_cons_v );
EXTERNTSCPP( sc_make_2dstring );
EXTERNTSCP( sc_make_2dstring_v );
EXTERNTSCPP( scrt2__3c_2dtwo );
EXTERNTSCP( scrt2__3c_2dtwo_v );
EXTERNTSCPP( scrt2__3e_2dtwo );
EXTERNTSCP( scrt2__3e_2dtwo_v );
EXTERNTSCPP( scrt6_error );
EXTERNTSCP( scrt6_error_v );
TSCP ttributes_attributes_a9a341a7( )
{
TSCP X4, X3, X2, X1;
X3 = BOOLEAN( NEQ( TSCPTAG( _TSCP( 0 ) ), FIXNUMTAG ) );
if ( TRUE( X3 ) ) goto L1854;
if ( BITAND( BITOR( INT( _TSCP( 0 ) ),
INT( _TSCP( 0 ) ) ),
3 ) ) goto L1855;
X4 = BOOLEAN( LT( INT( _TSCP( 0 ) ),
INT( _TSCP( 0 ) ) ) );
goto L1856;
L1855:
X4 = scrt2__3c_2dtwo( _TSCP( 0 ), _TSCP( 0 ) );
L1856:
if ( TRUE( X4 ) ) goto L1854;
if ( BITAND( BITOR( INT( _TSCP( 0 ) ),
INT( _TSCP( 1020 ) ) ),
3 ) ) goto L1863;
if ( GT( INT( _TSCP( 0 ) ), INT( _TSCP( 1020 ) ) ) ) goto L1854;
goto L1870;
L1863:
if ( FALSE( scrt2__3e_2dtwo( _TSCP( 0 ), _TSCP( 1020 ) ) )
) goto L1870;
L1854:
scrt6_error( c1626,
c1627, CONS( _TSCP( 0 ), EMPTYLIST ) );
L1870:
X1 = sc_make_2dstring( _TSCP( 368 ),
CONS( FIX_CHAR( _TSCP( 0 ) ),
EMPTYLIST ) );
return( sc_cons( c1598, X1 ) );
}
DEFTSCP( ttributes_ibutes_2dx_a19bf7c4_v );
DEFSTRING( t1871, "XWINDOWATTRIBUTES-X", 19 );
EXTERNTSCPP( scrt4_c_2dint_2dref );
EXTERNTSCP( scrt4_c_2dint_2dref_v );
EXTERNTSCPP( xlibtypes_ttributesp_3c7dec03 );
EXTERNTSCP( xlibtypes_ttributesp_3c7dec03_v );
TSCP ttributes_ibutes_2dx_a19bf7c4( x1630 )
TSCP x1630;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1630 );
return( scrt4_c_2dint_2dref( X1, _TSCP( 0 ) ) );
}
DEFTSCP( ttributes_tes_2dx_21_71c83e4d_v );
DEFSTRING( t1873, "XWINDOWATTRIBUTES-X!", 20 );
EXTERNTSCPP( scrt4_c_2dint_2dset_21 );
EXTERNTSCP( scrt4_c_2dint_2dset_21_v );
TSCP ttributes_tes_2dx_21_71c83e4d( x1633, y1634 )
TSCP x1633, y1634;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1633 );
return( scrt4_c_2dint_2dset_21( X1, _TSCP( 0 ), y1634 ) );
}
DEFTSCP( ttributes_ibutes_2dy_d69cc752_v );
DEFSTRING( t1875, "XWINDOWATTRIBUTES-Y", 19 );
TSCP ttributes_ibutes_2dy_d69cc752( x1637 )
TSCP x1637;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1637 );
return( scrt4_c_2dint_2dref( X1, _TSCP( 16 ) ) );
}
DEFTSCP( ttributes_tes_2dy_21_c9745928_v );
DEFSTRING( t1877, "XWINDOWATTRIBUTES-Y!", 20 );
TSCP ttributes_tes_2dy_21_c9745928( x1641, y1642 )
TSCP x1641, y1642;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1641 );
return( scrt4_c_2dint_2dset_21( X1, _TSCP( 16 ), y1642 ) );
}
DEFTSCP( ttributes_es_2dwidth_f95ac597_v );
DEFSTRING( t1879, "XWINDOWATTRIBUTES-WIDTH", 23 );
TSCP ttributes_es_2dwidth_f95ac597( x1645 )
TSCP x1645;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1645 );
return( scrt4_c_2dint_2dref( X1, _TSCP( 32 ) ) );
}
DEFTSCP( ttributes_2dwidth_21_1e2108ab_v );
DEFSTRING( t1881, "XWINDOWATTRIBUTES-WIDTH!", 24 );
TSCP ttributes_2dwidth_21_1e2108ab( x1649, y1650 )
TSCP x1649, y1650;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1649 );
return( scrt4_c_2dint_2dset_21( X1, _TSCP( 32 ), y1650 ) );
}
DEFTSCP( ttributes_s_2dheight_e28071bc_v );
DEFSTRING( t1883, "XWINDOWATTRIBUTES-HEIGHT", 24 );
TSCP ttributes_s_2dheight_e28071bc( x1653 )
TSCP x1653;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1653 );
return( scrt4_c_2dint_2dref( X1, _TSCP( 48 ) ) );
}
DEFTSCP( ttributes_dheight_21_cc96f1c7_v );
DEFSTRING( t1885, "XWINDOWATTRIBUTES-HEIGHT!", 25 );
TSCP ttributes_dheight_21_cc96f1c7( x1657, y1658 )
TSCP x1657, y1658;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1657 );
return( scrt4_c_2dint_2dset_21( X1, _TSCP( 48 ), y1658 ) );
}
DEFTSCP( ttributes_der__width_9eecbc4_v );
DEFSTRING( t1887, "XWINDOWATTRIBUTES-BORDER_WIDTH", 30 );
TSCP ttributes_der__width_9eecbc4( x1661 )
TSCP x1661;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1661 );
return( scrt4_c_2dint_2dref( X1, _TSCP( 64 ) ) );
}
DEFTSCP( ttributes___width_21_2254c2a9_v );
DEFSTRING( t1889, "XWINDOWATTRIBUTES-BORDER_WIDTH!", 31 );
TSCP ttributes___width_21_2254c2a9( x1665, y1666 )
TSCP x1665, y1666;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1665 );
return( scrt4_c_2dint_2dset_21( X1, _TSCP( 64 ), y1666 ) );
}
DEFTSCP( ttributes_es_2ddepth_8fe39cd1_v );
DEFSTRING( t1891, "XWINDOWATTRIBUTES-DEPTH", 23 );
TSCP ttributes_es_2ddepth_8fe39cd1( x1669 )
TSCP x1669;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1669 );
return( scrt4_c_2dint_2dref( X1, _TSCP( 80 ) ) );
}
DEFTSCP( ttributes_2ddepth_21_b3f2149a_v );
DEFSTRING( t1893, "XWINDOWATTRIBUTES-DEPTH!", 24 );
TSCP ttributes_2ddepth_21_b3f2149a( x1673, y1674 )
TSCP x1673, y1674;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1673 );
return( scrt4_c_2dint_2dset_21( X1, _TSCP( 80 ), y1674 ) );
}
DEFTSCP( ttributes_s_2dvisual_fc041cac_v );
DEFSTRING( t1895, "XWINDOWATTRIBUTES-VISUAL", 24 );
EXTERNTSCPP( scrt4_c_2dunsigned_2dref );
EXTERNTSCP( scrt4_c_2dunsigned_2dref_v );
TSCP ttributes_s_2dvisual_fc041cac( x1677 )
TSCP x1677;
{
TSCP X2, X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1677 );
X2 = scrt4_c_2dunsigned_2dref( X1, _TSCP( 96 ) );
return( sc_cons( c1681, X2 ) );
}
DEFTSCP( ttributes_dvisual_21_ea36007a_v );
DEFSTRING( t1898, "XWINDOWATTRIBUTES-VISUAL!", 25 );
EXTERNTSCPP( scrt4_c_2dunsigned_2dset_21 );
EXTERNTSCP( scrt4_c_2dunsigned_2dset_21_v );
EXTERNTSCPP( xlibtypes_chk_2dvisualp );
EXTERNTSCP( xlibtypes_chk_2dvisualp_v );
TSCP ttributes_dvisual_21_ea36007a( x1685, y1686 )
TSCP x1685, y1686;
{
TSCP X2, X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1685 );
X2 = xlibtypes_chk_2dvisualp( y1686 );
return( scrt4_c_2dunsigned_2dset_21( X1, _TSCP( 96 ), X2 ) );
}
DEFTSCP( ttributes_tes_2droot_33bdadbf_v );
DEFSTRING( t1901, "XWINDOWATTRIBUTES-ROOT", 22 );
TSCP ttributes_tes_2droot_33bdadbf( x1693 )
TSCP x1693;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1693 );
return( scrt4_c_2dunsigned_2dref( X1, _TSCP( 112 ) ) );
}
DEFTSCP( ttributes__2droot_21_bb35894d_v );
DEFSTRING( t1903, "XWINDOWATTRIBUTES-ROOT!", 23 );
TSCP ttributes__2droot_21_bb35894d( x1697, y1698 )
TSCP x1697, y1698;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1697 );
return( scrt4_c_2dunsigned_2dset_21( X1,
_TSCP( 112 ), y1698 ) );
}
DEFTSCP( ttributes_es_2dclass_980b9927_v );
DEFSTRING( t1905, "XWINDOWATTRIBUTES-CLASS", 23 );
TSCP ttributes_es_2dclass_980b9927( x1701 )
TSCP x1701;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1701 );
return( scrt4_c_2dint_2dref( X1, _TSCP( 128 ) ) );
}
DEFTSCP( ttributes_2dclass_21_d11d85e0_v );
DEFSTRING( t1907, "XWINDOWATTRIBUTES-CLASS!", 24 );
TSCP ttributes_2dclass_21_d11d85e0( x1705, y1706 )
TSCP x1705, y1706;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1705 );
return( scrt4_c_2dint_2dset_21( X1, _TSCP( 128 ), y1706 ) );
}
DEFTSCP( ttributes_t__gravity_194fee35_v );
DEFSTRING( t1909, "XWINDOWATTRIBUTES-BIT_GRAVITY", 29 );
TSCP ttributes_t__gravity_194fee35( x1709 )
TSCP x1709;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1709 );
return( scrt4_c_2dint_2dref( X1, _TSCP( 144 ) ) );
}
DEFTSCP( ttributes_gravity_21_df7098c7_v );
DEFSTRING( t1911, "XWINDOWATTRIBUTES-BIT_GRAVITY!", 30 );
TSCP ttributes_gravity_21_df7098c7( x1713, y1714 )
TSCP x1713, y1714;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1713 );
return( scrt4_c_2dint_2dset_21( X1, _TSCP( 144 ), y1714 ) );
}
DEFTSCP( ttributes_n__gravity_bd7865f8_v );
DEFSTRING( t1913, "XWINDOWATTRIBUTES-WIN_GRAVITY", 29 );
TSCP ttributes_n__gravity_bd7865f8( x1717 )
TSCP x1717;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1717 );
return( scrt4_c_2dint_2dref( X1, _TSCP( 160 ) ) );
}
DEFTSCP( ttributes_gravity_21_26cd79ff_v );
DEFSTRING( t1915, "XWINDOWATTRIBUTES-WIN_GRAVITY!", 30 );
TSCP ttributes_gravity_21_26cd79ff( x1721, y1722 )
TSCP x1721, y1722;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1721 );
return( scrt4_c_2dint_2dset_21( X1, _TSCP( 160 ), y1722 ) );
}
DEFTSCP( ttributes_ing__store_6873d4de_v );
DEFSTRING( t1917, "XWINDOWATTRIBUTES-BACKING_STORE", 31 );
TSCP ttributes_ing__store_6873d4de( x1725 )
TSCP x1725;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1725 );
return( scrt4_c_2dint_2dref( X1, _TSCP( 176 ) ) );
}
DEFTSCP( ttributes___store_21_70010509_v );
DEFSTRING( t1919, "XWINDOWATTRIBUTES-BACKING_STORE!", 32 );
TSCP ttributes___store_21_70010509( x1729, y1730 )
TSCP x1729, y1730;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1729 );
return( scrt4_c_2dint_2dset_21( X1, _TSCP( 176 ), y1730 ) );
}
DEFTSCP( ttributes_ng__planes_8be82f4b_v );
DEFSTRING( t1921, "XWINDOWATTRIBUTES-BACKING_PLANES", 32 );
TSCP ttributes_ng__planes_8be82f4b( x1733 )
TSCP x1733;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1733 );
return( scrt4_c_2dunsigned_2dref( X1, _TSCP( 192 ) ) );
}
DEFTSCP( ttributes__planes_21_1b4c0d4b_v );
DEFSTRING( t1923, "XWINDOWATTRIBUTES-BACKING_PLANES!", 33 );
TSCP ttributes__planes_21_1b4c0d4b( x1737, y1738 )
TSCP x1737, y1738;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1737 );
return( scrt4_c_2dunsigned_2dset_21( X1,
_TSCP( 192 ), y1738 ) );
}
DEFTSCP( ttributes_ing__pixel_e896a88b_v );
DEFSTRING( t1925, "XWINDOWATTRIBUTES-BACKING_PIXEL", 31 );
TSCP ttributes_ing__pixel_e896a88b( x1741 )
TSCP x1741;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1741 );
return( scrt4_c_2dunsigned_2dref( X1, _TSCP( 208 ) ) );
}
DEFTSCP( ttributes___pixel_21_499cc9df_v );
DEFSTRING( t1927, "XWINDOWATTRIBUTES-BACKING_PIXEL!", 32 );
TSCP ttributes___pixel_21_499cc9df( x1745, y1746 )
TSCP x1745, y1746;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1745 );
return( scrt4_c_2dunsigned_2dset_21( X1,
_TSCP( 208 ), y1746 ) );
}
DEFTSCP( ttributes_ave__under_3d92ac82_v );
DEFSTRING( t1929, "XWINDOWATTRIBUTES-SAVE_UNDER", 28 );
TSCP ttributes_ave__under_3d92ac82( x1749 )
TSCP x1749;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1749 );
return( scrt4_c_2dint_2dref( X1, _TSCP( 224 ) ) );
}
DEFTSCP( ttributes___under_21_254cf398_v );
DEFSTRING( t1931, "XWINDOWATTRIBUTES-SAVE_UNDER!", 29 );
TSCP ttributes___under_21_254cf398( x1753, y1754 )
TSCP x1753, y1754;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1753 );
return( scrt4_c_2dint_2dset_21( X1, _TSCP( 224 ), y1754 ) );
}
DEFTSCP( ttributes_2dcolormap_f665df2a_v );
DEFSTRING( t1933, "XWINDOWATTRIBUTES-COLORMAP", 26 );
TSCP ttributes_2dcolormap_f665df2a( x1757 )
TSCP x1757;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1757 );
return( scrt4_c_2dunsigned_2dref( X1, _TSCP( 240 ) ) );
}
DEFTSCP( ttributes_olormap_21_d5ecb201_v );
DEFSTRING( t1935, "XWINDOWATTRIBUTES-COLORMAP!", 27 );
TSCP ttributes_olormap_21_d5ecb201( x1761, y1762 )
TSCP x1761, y1762;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1761 );
return( scrt4_c_2dunsigned_2dset_21( X1,
_TSCP( 240 ), y1762 ) );
}
DEFTSCP( ttributes__installed_5928f4f1_v );
DEFSTRING( t1937, "XWINDOWATTRIBUTES-MAP_INSTALLED", 31 );
TSCP ttributes__installed_5928f4f1( x1765 )
TSCP x1765;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1765 );
return( scrt4_c_2dint_2dref( X1, _TSCP( 256 ) ) );
}
DEFTSCP( ttributes_stalled_21_2a2da83b_v );
DEFSTRING( t1939, "XWINDOWATTRIBUTES-MAP_INSTALLED!", 32 );
TSCP ttributes_stalled_21_2a2da83b( x1769, y1770 )
TSCP x1769, y1770;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1769 );
return( scrt4_c_2dint_2dset_21( X1, _TSCP( 256 ), y1770 ) );
}
DEFTSCP( ttributes_map__state_4431e7db_v );
DEFSTRING( t1941, "XWINDOWATTRIBUTES-MAP_STATE", 27 );
TSCP ttributes_map__state_4431e7db( x1773 )
TSCP x1773;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1773 );
return( scrt4_c_2dint_2dref( X1, _TSCP( 272 ) ) );
}
DEFTSCP( ttributes___state_21_1a738242_v );
DEFSTRING( t1943, "XWINDOWATTRIBUTES-MAP_STATE!", 28 );
TSCP ttributes___state_21_1a738242( x1777, y1778 )
TSCP x1777, y1778;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1777 );
return( scrt4_c_2dint_2dset_21( X1, _TSCP( 272 ), y1778 ) );
}
DEFTSCP( ttributes_ent__masks_5fe5d282_v );
DEFSTRING( t1945, "XWINDOWATTRIBUTES-ALL_EVENT_MASKS", 33 );
TSCP ttributes_ent__masks_5fe5d282( x1781 )
TSCP x1781;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1781 );
return( scrt4_c_2dint_2dref( X1, _TSCP( 288 ) ) );
}
DEFTSCP( ttributes___masks_21_5a91431d_v );
DEFSTRING( t1947, "XWINDOWATTRIBUTES-ALL_EVENT_MASKS!", 34 );
TSCP ttributes___masks_21_5a91431d( x1785, y1786 )
TSCP x1785, y1786;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1785 );
return( scrt4_c_2dint_2dset_21( X1, _TSCP( 288 ), y1786 ) );
}
DEFTSCP( ttributes_vent__mask_77078b63_v );
DEFSTRING( t1949, "XWINDOWATTRIBUTES-YOUR_EVENT_MASK", 33 );
TSCP ttributes_vent__mask_77078b63( x1789 )
TSCP x1789;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1789 );
return( scrt4_c_2dint_2dref( X1, _TSCP( 304 ) ) );
}
DEFTSCP( ttributes_t__mask_21_d7cc9ceb_v );
DEFSTRING( t1951, "XWINDOWATTRIBUTES-YOUR_EVENT_MASK!", 34 );
TSCP ttributes_t__mask_21_d7cc9ceb( x1793, y1794 )
TSCP x1793, y1794;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1793 );
return( scrt4_c_2dint_2dset_21( X1, _TSCP( 304 ), y1794 ) );
}
DEFTSCP( ttributes_gate__mask_127de58e_v );
DEFSTRING( t1953, "XWINDOWATTRIBUTES-DO_NOT_PROPAGATE_MASK", 39 );
TSCP ttributes_gate__mask_127de58e( x1797 )
TSCP x1797;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1797 );
return( scrt4_c_2dint_2dref( X1, _TSCP( 320 ) ) );
}
DEFTSCP( ttributes_e__mask_21_3d580176_v );
DEFSTRING( t1955, "XWINDOWATTRIBUTES-DO_NOT_PROPAGATE_MASK!", 40 );
TSCP ttributes_e__mask_21_3d580176( x1801, y1802 )
TSCP x1801, y1802;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1801 );
return( scrt4_c_2dint_2dset_21( X1, _TSCP( 320 ), y1802 ) );
}
DEFTSCP( ttributes___redirect_c70c5cd5_v );
DEFSTRING( t1957, "XWINDOWATTRIBUTES-OVERRIDE_REDIRECT", 35 );
TSCP ttributes___redirect_c70c5cd5( x1805 )
TSCP x1805;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1805 );
return( scrt4_c_2dint_2dref( X1, _TSCP( 336 ) ) );
}
DEFTSCP( ttributes_edirect_21_4fb494a9_v );
DEFSTRING( t1959, "XWINDOWATTRIBUTES-OVERRIDE_REDIRECT!", 36 );
TSCP ttributes_edirect_21_4fb494a9( x1809, y1810 )
TSCP x1809, y1810;
{
TSCP X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1809 );
return( scrt4_c_2dint_2dset_21( X1, _TSCP( 336 ), y1810 ) );
}
DEFTSCP( ttributes_s_2dscreen_c881f583_v );
DEFSTRING( t1961, "XWINDOWATTRIBUTES-SCREEN", 24 );
TSCP ttributes_s_2dscreen_c881f583( x1813 )
TSCP x1813;
{
TSCP X2, X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1813 );
X2 = scrt4_c_2dunsigned_2dref( X1, _TSCP( 352 ) );
return( sc_cons( c1817, X2 ) );
}
DEFTSCP( ttributes_dscreen_21_cb493e99_v );
DEFSTRING( t1964, "XWINDOWATTRIBUTES-SCREEN!", 25 );
EXTERNTSCPP( xlibtypes_chk_2dscreenp );
EXTERNTSCP( xlibtypes_chk_2dscreenp_v );
TSCP ttributes_dscreen_21_cb493e99( x1821, y1822 )
TSCP x1821, y1822;
{
TSCP X2, X1;
X1 = xlibtypes_ttributesp_3c7dec03( x1821 );
X2 = xlibtypes_chk_2dscreenp( y1822 );
return( scrt4_c_2dunsigned_2dset_21( X1, _TSCP( 352 ), X2 ) );
}
static void init_modules( compiler_version )
char *compiler_version;
{
xlibtypes__init();
scrt4__init();
scrt6__init();
scrt2__init();
MAXDISPLAY( 0 );
}
void xwindowattributes__init()
{
static int init = 0;
if (init) return;
init = 1;
INITHEAP( 0, 0, 0, 0 );
init_constants();
init_modules( "(xwindowattributes SCHEME->C COMPILER 28sep90jfb)" );
INITIALIZEVAR( U_TX( ADR( t1847 ) ),
ADR( ttributes_attributes_a9a341a7_v ),
MAKEPROCEDURE( 0,
0,
ttributes_attributes_a9a341a7,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1871 ) ),
ADR( ttributes_ibutes_2dx_a19bf7c4_v ),
MAKEPROCEDURE( 1,
0,
ttributes_ibutes_2dx_a19bf7c4,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1873 ) ),
ADR( ttributes_tes_2dx_21_71c83e4d_v ),
MAKEPROCEDURE( 2,
0,
ttributes_tes_2dx_21_71c83e4d,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1875 ) ),
ADR( ttributes_ibutes_2dy_d69cc752_v ),
MAKEPROCEDURE( 1,
0,
ttributes_ibutes_2dy_d69cc752,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1877 ) ),
ADR( ttributes_tes_2dy_21_c9745928_v ),
MAKEPROCEDURE( 2,
0,
ttributes_tes_2dy_21_c9745928,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1879 ) ),
ADR( ttributes_es_2dwidth_f95ac597_v ),
MAKEPROCEDURE( 1,
0,
ttributes_es_2dwidth_f95ac597,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1881 ) ),
ADR( ttributes_2dwidth_21_1e2108ab_v ),
MAKEPROCEDURE( 2,
0,
ttributes_2dwidth_21_1e2108ab,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1883 ) ),
ADR( ttributes_s_2dheight_e28071bc_v ),
MAKEPROCEDURE( 1,
0,
ttributes_s_2dheight_e28071bc,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1885 ) ),
ADR( ttributes_dheight_21_cc96f1c7_v ),
MAKEPROCEDURE( 2,
0,
ttributes_dheight_21_cc96f1c7,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1887 ) ),
ADR( ttributes_der__width_9eecbc4_v ),
MAKEPROCEDURE( 1,
0,
ttributes_der__width_9eecbc4,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1889 ) ),
ADR( ttributes___width_21_2254c2a9_v ),
MAKEPROCEDURE( 2,
0,
ttributes___width_21_2254c2a9,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1891 ) ),
ADR( ttributes_es_2ddepth_8fe39cd1_v ),
MAKEPROCEDURE( 1,
0,
ttributes_es_2ddepth_8fe39cd1,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1893 ) ),
ADR( ttributes_2ddepth_21_b3f2149a_v ),
MAKEPROCEDURE( 2,
0,
ttributes_2ddepth_21_b3f2149a,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1895 ) ),
ADR( ttributes_s_2dvisual_fc041cac_v ),
MAKEPROCEDURE( 1,
0,
ttributes_s_2dvisual_fc041cac,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1898 ) ),
ADR( ttributes_dvisual_21_ea36007a_v ),
MAKEPROCEDURE( 2,
0,
ttributes_dvisual_21_ea36007a,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1901 ) ),
ADR( ttributes_tes_2droot_33bdadbf_v ),
MAKEPROCEDURE( 1,
0,
ttributes_tes_2droot_33bdadbf,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1903 ) ),
ADR( ttributes__2droot_21_bb35894d_v ),
MAKEPROCEDURE( 2,
0,
ttributes__2droot_21_bb35894d,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1905 ) ),
ADR( ttributes_es_2dclass_980b9927_v ),
MAKEPROCEDURE( 1,
0,
ttributes_es_2dclass_980b9927,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1907 ) ),
ADR( ttributes_2dclass_21_d11d85e0_v ),
MAKEPROCEDURE( 2,
0,
ttributes_2dclass_21_d11d85e0,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1909 ) ),
ADR( ttributes_t__gravity_194fee35_v ),
MAKEPROCEDURE( 1,
0,
ttributes_t__gravity_194fee35,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1911 ) ),
ADR( ttributes_gravity_21_df7098c7_v ),
MAKEPROCEDURE( 2,
0,
ttributes_gravity_21_df7098c7,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1913 ) ),
ADR( ttributes_n__gravity_bd7865f8_v ),
MAKEPROCEDURE( 1,
0,
ttributes_n__gravity_bd7865f8,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1915 ) ),
ADR( ttributes_gravity_21_26cd79ff_v ),
MAKEPROCEDURE( 2,
0,
ttributes_gravity_21_26cd79ff,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1917 ) ),
ADR( ttributes_ing__store_6873d4de_v ),
MAKEPROCEDURE( 1,
0,
ttributes_ing__store_6873d4de,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1919 ) ),
ADR( ttributes___store_21_70010509_v ),
MAKEPROCEDURE( 2,
0,
ttributes___store_21_70010509,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1921 ) ),
ADR( ttributes_ng__planes_8be82f4b_v ),
MAKEPROCEDURE( 1,
0,
ttributes_ng__planes_8be82f4b,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1923 ) ),
ADR( ttributes__planes_21_1b4c0d4b_v ),
MAKEPROCEDURE( 2,
0,
ttributes__planes_21_1b4c0d4b,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1925 ) ),
ADR( ttributes_ing__pixel_e896a88b_v ),
MAKEPROCEDURE( 1,
0,
ttributes_ing__pixel_e896a88b,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1927 ) ),
ADR( ttributes___pixel_21_499cc9df_v ),
MAKEPROCEDURE( 2,
0,
ttributes___pixel_21_499cc9df,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1929 ) ),
ADR( ttributes_ave__under_3d92ac82_v ),
MAKEPROCEDURE( 1,
0,
ttributes_ave__under_3d92ac82,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1931 ) ),
ADR( ttributes___under_21_254cf398_v ),
MAKEPROCEDURE( 2,
0,
ttributes___under_21_254cf398,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1933 ) ),
ADR( ttributes_2dcolormap_f665df2a_v ),
MAKEPROCEDURE( 1,
0,
ttributes_2dcolormap_f665df2a,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1935 ) ),
ADR( ttributes_olormap_21_d5ecb201_v ),
MAKEPROCEDURE( 2,
0,
ttributes_olormap_21_d5ecb201,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1937 ) ),
ADR( ttributes__installed_5928f4f1_v ),
MAKEPROCEDURE( 1,
0,
ttributes__installed_5928f4f1,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1939 ) ),
ADR( ttributes_stalled_21_2a2da83b_v ),
MAKEPROCEDURE( 2,
0,
ttributes_stalled_21_2a2da83b,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1941 ) ),
ADR( ttributes_map__state_4431e7db_v ),
MAKEPROCEDURE( 1,
0,
ttributes_map__state_4431e7db,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1943 ) ),
ADR( ttributes___state_21_1a738242_v ),
MAKEPROCEDURE( 2,
0,
ttributes___state_21_1a738242,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1945 ) ),
ADR( ttributes_ent__masks_5fe5d282_v ),
MAKEPROCEDURE( 1,
0,
ttributes_ent__masks_5fe5d282,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1947 ) ),
ADR( ttributes___masks_21_5a91431d_v ),
MAKEPROCEDURE( 2,
0,
ttributes___masks_21_5a91431d,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1949 ) ),
ADR( ttributes_vent__mask_77078b63_v ),
MAKEPROCEDURE( 1,
0,
ttributes_vent__mask_77078b63,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1951 ) ),
ADR( ttributes_t__mask_21_d7cc9ceb_v ),
MAKEPROCEDURE( 2,
0,
ttributes_t__mask_21_d7cc9ceb,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1953 ) ),
ADR( ttributes_gate__mask_127de58e_v ),
MAKEPROCEDURE( 1,
0,
ttributes_gate__mask_127de58e,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1955 ) ),
ADR( ttributes_e__mask_21_3d580176_v ),
MAKEPROCEDURE( 2,
0,
ttributes_e__mask_21_3d580176,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1957 ) ),
ADR( ttributes___redirect_c70c5cd5_v ),
MAKEPROCEDURE( 1,
0,
ttributes___redirect_c70c5cd5,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1959 ) ),
ADR( ttributes_edirect_21_4fb494a9_v ),
MAKEPROCEDURE( 2,
0,
ttributes_edirect_21_4fb494a9,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1961 ) ),
ADR( ttributes_s_2dscreen_c881f583_v ),
MAKEPROCEDURE( 1,
0,
ttributes_s_2dscreen_c881f583,
EMPTYLIST ) );
INITIALIZEVAR( U_TX( ADR( t1964 ) ),
ADR( ttributes_dscreen_21_cb493e99_v ),
MAKEPROCEDURE( 2,
0,
ttributes_dscreen_21_cb493e99,
EMPTYLIST ) );
return;
}
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.