Skip to content

Commit 3dd023f

Browse files
Petr BauchPetr Bauch
authored andcommitted
Add succeeding test
1 parent 5241db6 commit 3dd023f

File tree

3 files changed

+11
-0
lines changed

3 files changed

+11
-0
lines changed
Lines changed: 7 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,7 @@
1+
2+
procedure Arrays_Write_Element is
3+
type Arr is array (1..3) of Integer;
4+
Actual : Arr := (1,2,3);
5+
begin
6+
Actual(2) := 3;
7+
end Arrays_Write_Element;
Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1 @@
1+
VERIFICATION SUCESSFUL
Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,3 @@
1+
from test_support import *
2+
3+
prove()

0 commit comments

Comments
 (0)