diff options
Diffstat (limited to 'gdb/testsuite/gdb.dap/ada-scopes/prog.adb')
| -rw-r--r-- | gdb/testsuite/gdb.dap/ada-scopes/prog.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gdb/testsuite/gdb.dap/ada-scopes/prog.adb b/gdb/testsuite/gdb.dap/ada-scopes/prog.adb index 22586ef..17511f7 100644 --- a/gdb/testsuite/gdb.dap/ada-scopes/prog.adb +++ b/gdb/testsuite/gdb.dap/ada-scopes/prog.adb @@ -15,7 +15,7 @@ with Pack; use Pack; -procedure Foo is +procedure Prog is type Enum_Type is (one, two, three); Value : Enum_Type := three; @@ -23,4 +23,4 @@ procedure Foo is begin Do_Nothing (Value'address); Do_Nothing (My_String'address); -- STOP -end Foo; +end Prog; |