Неиспользуемые таблицы

Поскольку типы Alpha и Beta - абстрактные, объекты этих типов не могут быть созданы. Поэтому таблицы-диспетчеры pkg_alphaT и pkg_betaT в процессе выполнения программы не используются.

Для типа Alpha таблица-диспетчер pkg_alphaT выглядит так:

00000201h — дескриптор таблицы
0 — смещение к началу
&pkg_alphaB — указатель на описатель типа
&pkg_size — метод Alpha'Size ← ТВФ Alpha
&pkg_alignment — метод Alpha'Alignment
0
0
0
0
&pkg_Oeq — метод Alpha.“=”
&pkg_assign — метод Alpha.“:=”
0
0
0
0
0
0
0
0 — метод func_alpha

Для интерфейса Beta таблица-диспетчер pkg_betaT выглядит так:

00000401h — дескриптор таблицы
0 — смещение к началу
&pkg_betaB — указатель на описатель типа
0 — метод func_beta ← ТВФ Beta