From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-0.8 required=5.0 tests=BAYES_00,INVALID_DATE
	autolearn=no autolearn_force=no version=3.4.4
Path: utzoo!attcan!uunet!aplcen!uakari.primate.wisc.edu!sdd.hp.com!hplabs!hpda!hpcuhb!hpcllla!hpclisp!defaria@hpclapd.HP.COM
From: defaria@hpclapd.HP.COM (Andy DeFaria)
Newsgroups: comp.lang.ada
Subject: Re: Help!
Message-ID: <920034@hpclapd.HP.COM>
Date: 26 Sep 90 19:26:36 GMT
References: <9009241422.AA17160@wrdis01.af.mil>
Organization: Hewlett-Packard Calif. Language Lab
List-Id: <comp.lang.ada>

>/ hpclapd:comp.lang.ada / defaria@hpclapd.HP.COM (Andy DeFaria) /  9:27 am  Sep 26, 1990 /
>
>The  simple, quick  and  dirty answer is to  write  your  routines in Turbo
>Pascal and pragma INTERFACE to them.  Write a general purpose TP routine to
>Write_to_Printer and a  Read_From_Keyboard  then encapsulate  the interface
>into an Ada package pragma INTERFACEing to your TP routines.

Oops!  Open my  mouth and  insert foot.   I shouldn't have  even  suggested
this.  The Alsys compiler doesn't do pragma INTERFACE  to TP (or any Pascal
for that matter).  But there are Ada solutions to writing to the printer.  

I'm not sure about reading  from the keyword.  Easy  things can be  done by
TEXT_IO.GET[_LINE].  Single character I/O and  special character I/O may be
a bit more tricky.   Check  you Ada manuals first  before trying to  pragma
INTERFACE.