testdelphinetunsafe.obs

格式化源码的最新板

unit testdelphinetunsafe;interface {$UNSAFECODE ON}uses sysutils;type tunsafeclass
=class function f_gettext:integer;unsafe;end;implementation function tunsafeclass
.f_gettext:integer;begin end;end.