Sign in
fuchsia
/
third_party
/
binutils-gdb
/
6e33da127bbc28caaebc507ab4ad4b4444e3a9a9
/
.
/
gdb
/
testsuite
/
gdb.ada
/
complete
/
foo.adb
blob: 3cf60b65dbc386fdc8411cb6bafaefaf6d3f680c [
file
] [
log
] [
blame
]
with
Pck
;
use
Pck
;
procedure
Foo
is
Some_Local_Variable
:
Integer
:=
1
;
External_Identical_Two
:
Integer
:=
74
;
begin
My_Global_Variable
:=
Some_Local_Variable
+
1
;
--
START
Proc
(
External_Identical_Two
);
end
Foo
;