blob: e853625afdc73e1391d72e2a3fd2cb31965d5d35 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
package reflection is
type ENUMERATION_VALUE_MIRROR_PT is protected
impure function pos return INTEGER;
impure function image return STRING;
end protected;
type ENUMERATION_VALUE_MIRROR is access ENUMERATION_VALUE_MIRROR_PT;
type ENUMERATION_SUBTYPE_MIRROR_PT is protected
impure function enumeration_literal(literal_name : STRING) return ENUMERATION_VALUE_MIRROR;
end protected;
end package;
|
