Re: STRING length

Actually please disregard the previous post, I found I needed to with
and use:

Ada.Text_IO.Unbounded_IO

So.. finally one compilation error remains, the actual call to my
function:

begin

Add_Record("Mark", "555-555-5555", "123 main street");

end LinkList;

the error is:

expected private type "Ada.Strings.Unbounded.Unbounded_String"

what does that mean? The problem is with calling the procedure, if I
comment the call out compilation is successful. The procedure looks
like:

procedure Add_Record(strName : in UNBOUNDED_STRING;
strPhone : in UNBOUNDED_STRING;
strAddress : in UNBOUNDED_STRING)
is
Temp : CHAR_REC_POINT;
begin
Put(strName);
New_Line;
Put(strPhone);
New_Line;
Put(strAddress);
New_Line;
end Add_Record;

I guess the compiler doesn't interpret a literal string as an
unbounded_string?

Thanks,
Mark


On Nov 14, 7:44 pm, "markww" <mar...@xxxxxxxxx> wrote:
Thanks Georg, that looks to be exactly what I need. I do have a problem
'#including', or, 'withing' rather unbounded string.
Now the head of my source file looks like:

with Ada.Text_IO, Ada.Integer_Text_IO, Ada.Strings.Unbounded;
use Ada.Text_IO, Ada.Integer_Text_IO;

which is alright but as soon as I try:

use Ada.Strings.Unbounded;

the compiler gives me a bunch of errors, it seems to conflict with
Text_IO / Integer_Text_IO? Seems like all my previous calls to Put()
now became invalid. I'm not familiar with Ada but with C++ and
understand namespace collisions, is the same thing going on here?

Thanks

On Nov 14, 5:24 pm, Georg Bauhaus <bauh...@xxxxxxxxxxxxx> wrote:



On Tue, 2006-11-14 at 14:51 -0800, markww wrote:
Hi,

How does one use a variable length string in ada?You use variable length strings in Ada by declaring them
to be of type UNBOUNDED_STRING which is defined in
Ada.Strings.Unbounded.

type MY_RECORD is
record
Name: UNBOUNDED_STRING;
Phone: UNBOUNDED_STRING;
Address: UNBOUNDED_STRING;
end record;

Given that Phone is likely to be limited in length, you
could consider declaring the Phone component to be of
type BOUNDED_STRING, which is a string type with a maximum length.
Unlike STRING, objects of this type can have any number
of characters up to the maximum. See Ada.Strings.Bounded.

Yet another use of strings is in nested scopes: If you need
a string in just one place, e.g. temporarily, you can use
a plain STRING as in

declare
temp: constant STRING := some_string_returning_func(...);
begin
-- use temp
end;

The point here is that the `temp` string variable takes
its bound from the initialization. You can also make it a
variable, if you need to write to string components.

Seehttp://en.wikibooks.org/wiki/Ada_Programming/Strings

-- Georg- Hide quoted text -- Show quoted text -

.

Relevant Pages

  • Re: how to replace a substring in a string using C?
    ... Well spotted - no one else caught that one (I only picked it up after Dave ... strlen on the entire original string where possible - I posted a similar ... are some typical results (using the same compilation options as you except ... The optimisation of not calling strlen on the entire string cuts about 7% ...
    (comp.lang.c)
  • Re: Performance RPG Figurative Constants versus Literals
    ... in compilation times between the two methods, ... I would suspect that the compiler would store *blanks as a single byte ... I would also suspect that comparing ... a 132 character string to a figurative constant would be quicker in the ...
    (comp.sys.ibm.as400.misc)
  • Re: what is different between <fstream.h> and <fstream>MS VC++
    ... i am writting 2 programs in VC++ 6.0, one for XML files the header is ... recover from previous error; stopping compilation ... // PutString -- Put a string value into the DynamicTable ... String GetString (String Key); ...
    (comp.lang.cpp)
  • Re: Debug TRACE style output wihout leaving literal strings in binary
    ... implementation of TRACE type macros) does not meet my requirements. ... >> debug strings from binaries at runtime, but, to do so without any ... >> after compilation, but will be transparent to compilation. ... >> message ids and string tables instead of directly using string literals. ...
    (microsoft.public.vsnet.debugging)
  • Re: Debug TRACE style output wihout leaving literal strings in binary
    ... implementation of TRACE type macros) does not meet my requirements. ... >> debug strings from binaries at runtime, but, to do so without any ... >> after compilation, but will be transparent to compilation. ... >> message ids and string tables instead of directly using string literals. ...
    (microsoft.public.vc.debugger)