Re: procedures and return

[Puckdropper <fake@fake.org>]

zork wrote:

> Hi,
> 
> I am a little confused about how precedures handle a 'return' statement. I
> have the following:
> 
> procedure my_procedure (...)
> begin
>     if <some_condition> then
>         put("inside if-statement);
>         new_line;
>         return;
>     end if;
>     put ("outside if-statement");
> end my_procedure;
> 
> I am finding that if some_condition *is* satisfied, then the procedure
> prints both put statements i.e.
> 
> inside if-statement
> outside if-statement
> 
> ... i thought 'return' should exit the procedure and return control to where
> the procedure was called. hence only printing "inside if-statement"?
> 
> I am using ada95.
> 
> Any help appreciated!
> 
> zork
> 
> 
I'm just a beginner, but it would seem what you want to do could be (and 
is more easily accomplished by) using an if...then...else statement.

---Code:---
procedure my_procedure (...)
begin
     if <some_condition> then
         put("inside if-statement);
         new_line;
     else
         Ada.Text_IO.put("outside if-statement");
     end if;
end my_procedure;
---end code---

Puckdropper
--
www.uncreativelabs.net

Old computers are getting to be a lost art. Here at Uncreative Labs, we 
still enjoy using the old computers. Sometimes we want to see how far a 
particular system can go, other times we use a stock system to remind 
ourselves of what we once had.

To email me directly, send a message to puckdropper (at) fastmail.fm