Login | Register
My pages Projects Community openCollabNet

Discussions > cvs > CVS update: /charles/src/ai302/

charles
Discussion topic

Back to topic list

CVS update: /charles/src/ai302/

Reply

Author matthewjheaney
Full name Matthew Heaney
Date 2005-05-17 19:04:47 PDT
Message User: matthewjheaney
Date: 2005/05/17 19:04:47

Modified:
   charles/src/ai302/a-coormu.adb

Log:
 liberalize exception behavior of replace_elem

File Changes:

Directory: /charles/src/ai302/
==============================

File [changed]: a-coormu.adb
Url: http://charles.tigri​s.org/source/browse/​charles/src/ai302/a-​coormu.adb?r1=1.9​&r2=1.10
Delta lines: +6 -3
-------------------
--- a-coormu.adb 18 May 2005 01:49:05 -0000 1.9
+++ a-coormu.adb 18 May 2005 02:04:45 -0000 1.10
@@ -596,11 +596,14 @@
            (Tree => Tree,
             Key => Item,
             Node => Result);
+ --
+ -- NOTE:
+ -- If Insert fails, it's because the allocation/initialization
+ -- of the new value failed. The old element is still there,
+ -- so just let the exception propagate.
+ -- ENDNOTE.
 
          pragma Assert (Result = Node);
- exception
- when others =>
- raise Program_Error; -- assignment must have failed
       end Insert_New_Item;
 
    end Replace_Element;

« Previous message in topic | 1 of 1 | Next message in topic »

Messages

Show all messages in topic

CVS update: /charles/src/ai302/ matthewjheaney Matthew Heaney 2005-05-17 19:04:47 PDT
Messages per page: