| Title: | Alpha Developer Support |
| Notice: | [email protected], 800-332-4786 |
| Moderator: | HYDRA::SYSTEM |
| Created: | Mon Jun 06 1994 |
| Last Modified: | Fri Jun 06 1997 |
| Last Successful Update: | Fri Jun 06 1997 |
| Number of topics: | 3722 |
| Total number of notes: | 11359 |
Company Name : Bucher & Suter AG - Point 23286
Contact Name : Thomas Renner
Phone : 41319175200
Fax : 41319175250
Email : [email protected]
Date/Time in : 19-MAR-1997 13:18:07
Entered by : Richard Readings
SPE center : REO
Category : UNIX
OS Version : V4.0b
System H/W : Alpha
Brief Description of Problem:
-----------------------------
I'm porting our software from DEC Ada V3.2, DEC Unix V3.2 to DEC Ada
V3.3, DEC Unix V4.0b.
We often have a simple userinterface to the standard input/ouput. To do
this, we
put a prompt to the screen and wait for a command like a shell does it.
With the
new Ada Version I have a buffering problem.
Look at the following program code:
with Text_IO; use Text_IO;
procedure My_Test is
Line : String (1..80);
Last : Integer;
begin
Put ("Prompt >");
Get_Line (Line, Last);
delay 5.0;
end My_Test;
Screen Output Ada 3.2 , Unix 3.2:
Prompt >My Input
#
Screen Output Ada 3.3, UNix 4.0b:
My Input
(waits 5 Seconds)
Prompt >#
# is the system prompt.
| T.R | Title | User | Personal Name | Date | Lines |
|---|---|---|---|---|---|
| 3352.1 | Known problem discussed in TURRIS::ADA note 3840 | RDGENG::READINGS_R | Richard Readings | Wed Mar 19 1997 09:18 | 8 |
Response to customer: Have you reported this problem to the Customer Support Centre? The problem is being looked at by engineering now. A temporary workaround for the problem is to replace the DEC Ada V3.3 predefined library unit low_level_io.ada with the DEC Ada V3.2 version of the same unit. | |||||
| 3352.2 | Follow-up question | RDGENG::READINGS_R | Richard Readings | Wed Mar 19 1997 09:20 | 44 |
There are still memory-leaks in Text_IO package (I think in the Low_Level_Text_IO).
I did regognize these errors with the Ultrix Dec Ada Compiler in 1993.
The answer from the DEC support was that You have other priorites than to correct this.
I heard that these errors are also implemented in the VMS Dec ADA Version.
We have systems working 24 hours 7 day a week. So this errors becomes a quality
factor of the software. Of course, we can program direct Unix access to the filesystem.
But we would like to program Ada code and not unportable direct Unix access code.
Try these two little programs and check your memory space.
DEC Unix V4.0b, DEC Ada V3.3
with Text_IO; use Text_IO;
procedure Name_Error_Test is
File : File_Type;
begin
loop
begin
open (File, IN_File, "Unknown_File");
-- the Unknown_File mustn't exist
exit;
exception
when Name_Error => delay 0.1;
end;
end loop;
end Name_Error_Test;
----------------------------------
with Text_IO; use Text_IO;
procedure IO_Leak_Test is
MY_File : File_Type;
begin
loop;
Create (MY_File, Out_File, "Text_IO_Leak.Dat",
"Owner => Read_Write_Execute, Group => Write, Other =>
Write");
Close (My_File);
delay 0.1;
end loop;
end IO_Leak_Test;
| |||||
| 3352.3 | How do I translate the library? | RDGENG::ddors.reo.dec.com::readings_r | Mon Mar 24 1997 05:43 | 20 | |
Bucher & Suter AG wrote: > > At 07:57 20.03.97 +0000, you wrote: > >Bucher & Suter AG wrote: > >> > >> At 13:58 19.03.97 +0000, you wrote: > >> >Have you reported this problem to the Customer Support Centre? The > >> >problem is being looked at by engineering now. I need to know if this is the same problem that is being worked on by Digital Customet Support in France. > I tried to translate the low_level_io.ada in the library. Serveral packages > becomes obsolet if I do that. I don't know the dependencies of the library > packages. How do I translate the library? I know very little about ada unfortunately, but I'm told that you can compile it into a local library, for testing purposes at least. | |||||