Explorar o código

Amiga: HookEntryPas to interface

git-svn-id: trunk@34839 -
marcus %!s(int64=9) %!d(string=hai) anos
pai
achega
f6e1411ddb
Modificáronse 1 ficheiros con 1 adicións e 0 borrados
  1. 1 0
      packages/amunits/src/coreunits/amigalib.pas

+ 1 - 0
packages/amunits/src/coreunits/amigalib.pas

@@ -103,6 +103,7 @@ function SetSuperAttrsA(cl : pIClass; obj: pObject_; msg : APTR): ulong;
 function DoMethod(obj: PObject_; Params: array of DWord): LongWord; inline;
 
 procedure HookEntry;
+procedure HookEntryPas;
 
 {