🚀 go-pugleaf

[]

Many printers don't know how to handle tab characters (ASCII 9),
or at least require that you set up tab stops explicitly.  A pain
when you want a quick printout of, say, a program listing.

Here is a little utility that will expand tabs to spaces and print
the file.  It assumes a tab stop every 8 columns.  Note that embedded
control characters (besides cr/lf and tabs) will confuse the column
count for the rest of that line.

Note that this program replaces "lpr.ttp" (in micro-C-Shell).

- Moshe Braner

~~~~~~~~~~~~~~~~~~~ cut here ~~~~~~~~~~~~~~~~~~~
begin 644 PRINT.TOS
M8!H   *"                             "IO  0@/   *  O "\-0F<_
M/ !*3D'?_     Q*@&8  61(>0   CH_/  )3D%<CTGY   "A"8\    ,F$ 
M 71(>0   K@_/  :3D%<CT)G2'D   *$/SP 3DY!4(]*0&8  2)"9TAY   "
MA#\\ #U.05"/2D!K  $,,\    *"1?D   +D1_D   +D0D="1K7+90QA  "<
M9@  !E?'8%@:&@P%  UF&K7+90QA  "$9@  !E?'8$ :$@P%  IF.&#># 4 
M"F<P# 4 "686.CP (&$  $I21C & D  !V;N8 #_OF$  #A21F  _[1A  !"
M9@#_G%?'2@=G" P$  IG  !V.CP #6$  !0Z/  *80  #$H'9@  8&  _W(8
M!4B%/P4_/   /SP  TY-7(].=4JY   "TF<  #Q(>0   N0O/   )  _.0  
M H(_/  _3D'?_     Q*@&L  ")G   >D;D   +21?D   +D1_(( $J 3G5A
M   H8   (&$  "!(>0   FD_/  )3D%<CS\\  (_/  "3DU8CT)G3D$_.0  
M H(_/  ^3D%8CTYU0H0_/  "/SP  DY-6(\,   (9P  +@P  ']G   F#   
M#6<  $(,   @;0#_UK:$9P#_T!F 2 !2A&$  #Q@ /_"2H1G /^\4X00/  (
M80  *! \ "!A   @$#P "&$  !A@ /^>80  $! \  IA   (0C1( $YU/P _
M/  "/SP  TY-7(].=0T*"D5N=&5R(&YA;64@;V8@9FEL92!T;R!P<FEN=#H@
M  T*<V9I<G-T(&]K#0H #0H*5$]3(&5R<F]R(&]C8W5R<F5D(2       "0.
.$! 6% 8&K H,' 8:'@  
 
end