Неиспользуемые таблицы
Поскольку типы 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 |