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=-1.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,7cbbcde0157485b2
X-Google-Attributes: gid103376,public
From: Roga Danar <smithm@stelnj.com>
Subject: Re: Problem w/ Win NT Apex or just me?
Date: 1998/10/16
Message-ID: <3627ADF9.5351FBE0@stelnj.com>#1/1
X-Deja-AN: 401896960
Content-Transfer-Encoding: 7bit
References: <36278110.66641D91@stelnj.com> <7082o1$93l$1@news.han.telia.se>
To: Sune Falck <Sune.S.Falck@telia.se>
Content-Type: text/plain; charset=us-ascii
X-Trace: news1.exit109.com 908566339 6472 208.225.73.22 (16 Oct 1998 19:32:19
 GMT)
Organization: AlphaSoft, Inc.
Mime-Version: 1.0
Reply-To: nospam@nospam.com
NNTP-Posting-Date: 16 Oct 1998 19:32:19 GMT
Newsgroups: comp.lang.ada
Date: 1998-10-16T19:32:19+00:00
List-Id: <comp.lang.ada>

Hi,

  I tried the test on GNAT Ada95 on WinNT and it printed to the local
printer fine but the network printer test failed.  I guess I am still a bit
confused.

  Also, the pragma import test STILL did not work.  This time the program
hung and did not complete.

-- Michael


Sune Falck wrote:

> This works with ObjectAda and gnat for Windows 95.
>
> with ada.text_io;
> use ada.text_io;
> procedure ptest is
>   printer : file_type;
> begin
>    create (printer, out_file, "lpt1:");
>    put_line (printer,"Test of printing"
>    put_line (printer,"End of test");
>    new_page (printer);
> end ptest;
>
> Roga Danar skrev i meddelandet <36278110.66641D91@stelnj.com>...
> >Hi,
> >
> >  I have been attempting to write an Apex Ada95 program that will print
> >from WIN NT w/ using the WIN API, just as a test.
> >
> >  The following code fails on each block, but I expected that.
> >  But I am confused why the pragma interface to a C program is not