class TEST1 feature frozen inline_feature (an_obj: POINTER): INTEGER is external "C++ inline use " alias "[ extern char *eif_typename(EIF_TYPE_INDEX); #ifdef EIF_IL_DLL printf ("TEST\n"); #else printf ("%s\n", eif_typename((EIF_TYPE_INDEX)Dftype($an_obj))); #endif return 5; ]" end end