3
with package X_Formal is new Test.Signature (<>);
4
package Test.Use_Signature is
6
procedure Y_Proc (A, B : in X_Formal.X);
7
-- The cross-reference on <CODE>X</CODE> in this procedure
8
-- declaration should go to <CODE>
9
-- <A HREF="test-signature.html#2">test-signature.html#2</A></CODE>.
10
-- If it doesn't, check procedure <CODE>Write_Reference</CODE> in
11
-- file <CODE>ad-writers.adb</CODE> in the AdaBrowse sources.
13
end Test.Use_Signature;