Index

Package: Smart_Pointers (generic)

Description

generic
        type Encapsulated is abstract new Reference_Counted with private;
    package Smart_Pointers is

Classes

Ref

type Ref is tagged private;

Primitive operations:

Adjust (overriding Ada.Finalization.Adjust)
Finalize (overriding Ada.Finalization.Finalize)
Get_Refcount

Types

Encapsulated (abstract)

type Encapsulated is abstract new Reference_Counted with private;

A_Encapsulated

type A_Encapsulated is access all Encapsulated'Class;

Constants & Global variables

Subprograms & Entries

Get

function Get
( this: Ref ) return A_Encapsulated;

Get_Refcount

function Get_Refcount
( this: Ref ) return Natural;

Set

procedure Set
( this: in out Ref;
target: Encapsulated'Class );

Set

procedure Set
( this: in out Ref;
target: access Encapsulated'Class );

"="

function "="
( l, r: Ref ) return Boolean;