broehl@watale.UUCP (Bernie Roehl) (08/24/86)
This is an INT24 handler for the PC. I have no source for it or documentation
but you can look at PUSHD andPOPD in net.sources for an example of it's use.
It works for Lattice and MicroSft.
# This is a shell archive. Remove anything before this line,
# then unpack it by saving it in a file and typing "sh file".
#
# Wrapped by watale!broehl on Sat Aug 23 22:14:38 EDT 1986
# Contents: int24.uu
echo x - int24.uu
sed 's/^@//' > "int24.uu" <<'@//E*O*F int24.uu//'
begin 644 int24.lib
M\ T @ $ ( % -S=&DHE@T 1#3T1%!5]415A4E9@' "@"
M ," 3&@!@ ! #[PYN0"P 01?<W1I $8H" !T " !0 #8VQI0)8-
M $0T]$105?5$585)68!P H @ # @$QH 8 0 ^L.<D L $$7V-L:0
M "F* @ = @ < !6=E=&-S7I8- $0T]$105?5$585)68!P H P # @$P
MH < 0 C,C#09 - !!E]G971C<P (>* @ = "
M"@ (:6YT,C1H;F2#E@T 1#3T1%!5]415A4E9@' "@4 ," 1^@& ! "#
MQ 8NB3X %A;65I>7UT?!\\ )"<" #$!@ ! 1( ?I 2 !"U]I;G0R-&5R
M<F]R$@ !I 0 !"5]I;G0R-&AN9 ,R* @ = ( * AI;G0R
M-&5R<G2(!P $U3($-NB 4 )]%34*("0 GU-,24)&4!"(" GU-,24)#
M9(@& "=,'-/XY8N &1$=23U50!5]415A4!$-/1$4%7T1!5$$$1$%4005#
M3TY35 1?0E-3 T)34S^8!P H'P #! $2F < 2 !08!#9@' $@" <' 0B8
M!P!( ("0$'F@@ O\#_P3_ E:<#0 P$" @$#!$ !10' C"\ "E]?86-R
M='5S960 "5]I;G0R-&5R<@ +7VEN=#(T97)R;W( "%]?8VAK<W1K "V@!@ #
M %><!0#( %8#/J C $ %6+[+@" .@ (X& FH0 B4;^)L<&
M (OE7<,CG! Q!=6 \0/5@/$"YR$!U8$I) 0 !"5]I;G0R-&5R<@ /V*
M @ = ( * AI;G-I;G0R-'.(!P $U3($-NB 4 )]%34*(
M"0 GU-,24)&4!"(" GU-,24)#9(@& "=,'-/XY8N &1$=23U50!5]4
M15A4!$-/1$4%7T1!5$$$1$%4005#3TY35 1?0E-3 T)34S^8!P H.0 #! 'X
MF < 2 !08!#9@' $@" <' 0B8!P!( ("0$'F@@ O\#_P3_ E:<#0
M P$" @$#!$ !10' C%D "E]?86-R='5S960 "5]I;G-I;G0R- +7VEN=#(T
M97)R;W( "5]I;G0R-&AN9 &7V=E=&-S 1?8VQI E?:GIS971I;G0 !%]S
M=&D "%]?8VAK<W1K .@!@ # %><!0#( %8#/J ] $ %6+[+@$ .@
M (X& FQ@8 #H ")1OZX ")1OSH #_=O[_=ORX) !0Z @\0&Z
MB^5=PT^<( "$,U8(A"U6!X0@5@;$&E8$A!16!<005@/$"YR$!U8)=) 0 !
M"5]I;G-I;G0R- /R* @ = @ H "&IZ<V5T:6YT\X@' 35,@
M0VZ(!0 GT5-0H@) "?4TQ)0D90$(@( "?4TQ)0D-DB 8 )TP<T_CEBX
M 9$1U)/55 %7U1%6%0$0T]$105?1$%4001$051!!4-/3E-4!%]"4U,#0E-3
M/Y@' "@K ,$ 0:8!P!( %!@$-F < 2 !P<!"I@' $@ @) 0>:" "
M_P/_!/\"5IP- # 0(" 0,$0 %% <",'P *7U]A8W)T=7-E9 %7VEN='(
M"5]J>G-E=&EN= NH"\ 0 58OL@^P2QD;O)8I&!(A&[HM&"(E&^HM&!HE&
M](U&[E"X(0!0Z B^5=PT6<!0"$)58"7I 0 !"5]J>G-E=&EN= 'R*
M @ = ( & 1I;G1RN98- $0T]$105?5$585)68!P H9 #
M @'/H&@ 0 58OL5E<&'HM>!HL'BT\$BU<&BW<(BW\*CD<._W<"4XI>!"Z(
M'@ 6_]W#!];S?\NC!X !^<4XM>!HD'B4\$B5<&B7<(B7\*4"ZA ")1PQ8
MC$<.CT<"CT<0!U]>B^5=_,, .&<%@#$)0 ! 2X Q#( 0%B ,1+ $!8@!H
MD P $%7VEN='( #"B@( '0 /&] 0
M
M
M
M
M
M
M
M
M
M !> %@ . ! "@ '%$ / 710
M #( !,N2VAB B; 1C;&DA!0 !F=E=&-S(0D EI;G-I;G0R-"$K
M EI;G0R-&5R<B$6 EI;G0R-&AN9"$. 5I;G1R(5@ "6IZ<V5T:6YT(44
M!'-T:2$! $7V-L:04 9?9V5T8W,) )7VEN<VEN=#(T*P )7VEN=#(T
M97)R%@ +7VEN=#(T97)R;W(. E?:6YT,C1H;F0. 5?:6YT<E@ "5]J>G-E
M=&EN=$4 !%]S=&D!
M
M
M
M
M
H
end
@//E*O*F int24.uu//
chmod u=rw,g=r,o=r int24.uu
echo Inspecting for damage in transit...
temp=/tmp/shar$$; dtemp=/tmp/.shar$$
trap "rm -f $temp $dtemp; exit" 0 1 2 3 15
cat > $temp <<\!!!
60 331 3556 int24.uu
!!!
wc int24.uu | sed 's=[^ ]*/==' | diff -b $temp - >$dtemp
if [ -s $dtemp ]
then echo "Ouch [diff of wc output]:" ; cat $dtemp
else echo "No problems found."
fi
exit 0
--
Michael A. Shiels
clyde-\
decvax-\\
ihnp4-\\\
+++-----> watmath!watale!broehl
tektronix-///
ubc-vision-//
utzoo-/