# BEGIN Sun short cut config file.  

# h2ph generates something like this...

sub TCGETS        { 0x40225408; }
sub TCSETS        { 0x80225409; }
sub TIOCGWINSZ    { 0x40087468; }
sub TIOCGETP      { 0x40067408; }

sub VERASE 	{ 2; };
sub VKILL 	{ 3; };

sub VEOF	{ 4; };
sub VEOL	{ 5; };
sub VEOL2	{ 6; };
sub VMIN	{ &VEOF; };
sub VTIME	{ &VEOL; };
sub ICANON	{ 0x00000002; };
sub IEXTEN 	{ 0x00008000; };

sub ECHO	{ 0x00000008; };

sub B1200   	{ 0x9; }



# c2ph generates something like this....

STRUCT_TERMIOS: {
    package termios;

    sub typedef                          { 'L4 c C17'; }

    sub termios'c_iflag                  {    0; }
    sub termios'c_oflag                  {    1; }
    sub termios'c_cflag                  {    2; }
    sub termios'c_lflag                  {    3; }
    sub termios'c_line                   {    4; }
    sub termios'c_cc                     {    5; }

}

# need this because a termios struct on suns doesn't 
# seem to have ispeed or ospeed.  

STRUCT_SGTTYB: {
    package sgttyb;

    sub typedef                       { 'c4 s'; }

    sub sg_ispeed                 { 0; }
    sub sg_ospeed                 { 1; }
    sub sg_erase                  { 2; }
    sub sg_kill                   { 3; }
    sub sg_flags                  { 4; }
} 

($SYSTEM, $VENDOR) = (POSIX, Sun);

# END Sun short cut config file.