| Index: gcc/gcc/testsuite/gnat.dg/thin_pointer.ads
|
| diff --git a/gcc/gcc/testsuite/gnat.dg/thin_pointer.ads b/gcc/gcc/testsuite/gnat.dg/thin_pointer.ads
|
| deleted file mode 100644
|
| index 6f528a51ed9ca033e3948a71afbadf88fc75e1db..0000000000000000000000000000000000000000
|
| --- a/gcc/gcc/testsuite/gnat.dg/thin_pointer.ads
|
| +++ /dev/null
|
| @@ -1,22 +0,0 @@
|
| -with System;
|
| -
|
| -package Thin_Pointer is
|
| -
|
| - type Stream is array (Integer range <>) of Character;
|
| -
|
| - type Stream_Ptr is access Stream;
|
| - for Stream_Ptr'Size use Standard'Address_Size;
|
| -
|
| - type Buf is record
|
| - A : System.Address;
|
| - end record;
|
| -
|
| - type Buf_Wrapper is record
|
| - B : Buf;
|
| - end record;
|
| -
|
| - type Buf_Ptr is access Buf_Wrapper;
|
| -
|
| - procedure Set_Buffer (AD : Buf_Ptr; Buffer : Stream_ptr);
|
| -
|
| -end Thin_Pointer;
|
|
|