Programming

EMSDN.COM

Programming RSS

NAVIGATION

private types

Consider the following package declaration,package PrivateType istype MyInteger is private;procedure Read( : out myInteger);procedure Write(I : in MyInteger);privatetype MyInteger is range 1 2**31 - 1;end;Why does Ada allow MyInteger to be made visible outside thescope of PrivateType ? Doesnt it...

29 answers | 490 bytes |

Unexpected exception in Protected_Entry_Call

I'm seeing a strange exception raised by,in this code:if Ceiling_Violation then-- Failed ceiling checkInitialization.Undefer_Abort (Self_ID);raise Program_Error;end if;The exception is apparently triggered by a simple conditional entrycall which is cancelled. So far, I've only seen thi...

1 answers | 617 bytes |

types and subtypes

Given,subtype Positive is Integer range 1 Integer'Last;type String is (Positive range <>) of Character;the following should be illegal,subtype Count_To_Ten is Integer range 1 10;subtype Ten_Characters is String (Count_to_Ten);and the following should be legal, insteadsubtype Count_To_...

9 answers | 558 bytes |

FOSDEM 2006 - Presentations Ada "Developers Room" online

All presentations at the Ada "Developers Room", held at FSDEM 2006in Brussels on Sunday February 26, 2006, are available online on theAda-Belgium web-site.Each presentation is available both in the original format (DP or PPT)and in PDF:- "Introduction to Ada", Jean-Pierre Rosen, Adalog- "AdaCont...

0 answers | 1539 bytes |

gcc 4.1.0 available

Hello,The GNU Ada Project [1] is pleased to announce a new GNAT release based onGCC 4.1.0. The Release is currently available for "SuSE 10.0 x86_64" and"Solaris 10 UltraSparc" - others are to follow.The SuSE release consist of all GCC core languages (Ada, C, C++, Fortran,Java, C, C++) and all cu...

23 answers | 517 bytes |

gnatmake myProg.adb -largs -Wl,-stack_size -Wl,0x4000000

I was wondering iof anyone could enlighten me on this gnatmake call.i found it on a Mac S/X site.i've searched else for setting the stack_size for a main rather thanfor individual tasks.any advice appreciated.Stuart Clark...

6 answers | 281 bytes |

hbb'Gard' - Genuine Ada Relational Database, semi-proposal

Some suggestions made regarding the DB and file system extensions to the AS project. I'd beinterested to know if there is any support in this forum for the idea of open relational databaseand file system projects as described below:I think it would be wise to start a separate project for &#...

2 answers | 4517 bytes |

help with string splitting

hello how would I create an Ada program to take an encrypted stringfrom a txt file and decrypt it. i have a so so program but it doesntwork i cant get the algorithm right.an example is thisMother would be Mtoehr encryptedso its just like cutting the string in half and rearranging thechaacters to...

10 answers | 2545 bytes |

hbb'Gard' - Genuine Ada Relational Database, semi-proposal

SQL is a popular dead-end. People chose databases for reliability, ultimately. The following URLleads you to a discussion about what is required for a genuinely relational database:#ArchitectureWhy not translate this genuine relational database into Ada and throw out SQL?The basic structure of a...

2 answers | 806 bytes |

Props to Jean-Pierre!

Thanks go to Jean-Pierre Rosen for taking the time to write a letter,"Lack of Ada Reflects Software Immaturity", to the editors of"Communications of the ACM" that they published in the March '06 issue.It was in a response to an article titled "Detection and Prevention ofStack Buffer Attacks...

1 answers | 658 bytes |

exception propagation for a distributed call

I need to implement something that has probably already been donehundreds of times. I have to implement some distributed calls (i.e.,across sockets, arinc ports, separate memory partitions, etc.). I needto trap any exception that may occur, and re-raise it for the caller,like CRBA does (though I...

6 answers | 1092 bytes |

generic child class

Hi,I have a compilation error that i not understand. This is my example :## Vec package ##generictype T_Real is digits <>;package Vec isend Vec;## Mat package ##with Vec;genericwith package Vector is new Vec (<>);package Mat isend Mat;## Mat.Child package ##generictype T_Tab is array...

1 answers | 947 bytes |

QUESTION ON "Programming"

EMSDN.COM

Home- About Us- Contact- Privacy Statement- Link Exchange- Bookmark- Map.XML- Rss.Xml
0.188