MorphOS: overloads for Get/SetRGB32 to be compatible with other Amiga flavours

OS4: Missing forward declaration

git-svn-id: trunk@42261 -

packages/morphunits/src/agraphics.pas

@@ -2118,10 +2118,12 @@ function GetAPen(Rp: PRastPort location 'a0'): LongWord; SysCall GfxBase 858;
 function GetBPen(Rp: PRastPort location 'a0'): LongWord; SysCall GfxBase 864;
 function GetDrMd(Rp: PRastPort location 'a0'): LongWord; SysCall GfxBase 870;
 function GetOutlinePen(Rp: PRastPort location 'a0'): LongWord; SysCall GfxBase 876;
-procedure LoadRGB32(Vp: PViewPort location 'a0'; var Table: LongWord location 'a1'); SysCall GfxBase 882;
+procedure LoadRGB32(Vp: PViewPort location 'a0'; var Table: LongWord location 'a1'); SysCall GfxBase 882; overload;
+procedure LoadRGB32(Vp: PViewPort location 'a0'; Table: PLongWord location 'a1'); SysCall GfxBase 882; overload;
 function SetChipRev(Want: LongWord location 'd0'): LongWord; SysCall GfxBase 888;
 procedure SetABPenDrMd(Rp: PRastPort location 'a1'; APen: LongWord location 'd0'; BPen: LongWord location 'd1'; DrawMode: LongWord location 'd2'); SysCall GfxBase 894;
-procedure GetRGB32(Cm: PColorMap location 'a0'; FirstColor: LongWord location 'd0'; NColors: LongWord location 'd1'; var Table: LongWord location 'a1'); SysCall GfxBase 900;
+procedure GetRGB32(Cm: PColorMap location 'a0'; FirstColor: LongWord location 'd0'; NColors: LongWord location 'd1'; var Table: LongWord location 'a1'); SysCall GfxBase 900; overload;
+procedure GetRGB32(Cm: PColorMap location 'a0'; FirstColor: LongWord location 'd0'; NColors: LongWord location 'd1'; Table: PLongWord location 'a1'); SysCall GfxBase 900; overload;
 function AllocBitMap(SizeX: LongWord location 'd0'; SizeY: LongWord location 'd1'; Depth: LongWord location 'd2'; Flags: LongWord location 'd3'; Friend_Bitmap: PBitMap location 'a0'): PBitMap; SysCall GfxBase 918;
 procedure FreeBitMap(Bm: PBitMap location 'a0'); SysCall GfxBase 924;
 function GetExtSpriteA(Ss: PExtSprite location 'a2'; Tags: PTagItem location 'a1'): LongInt; SysCall GfxBase 930;

packages/os4units/src/agraphics.pas

@@ -2509,6 +2509,7 @@ function ChangeExtSprite(vp: PViewPort; oldsprite: PExtSprite; newsprite: PExtSp
 function ExtendFontTags(font: PTextFont; const argv: array of PtrUInt): LongWord;
 function GetExtSprite(ss: pExtSprite; const argv: array of PtrUInt): LongInt;
 procedure GetRPAttrs(rp: PRastPort; const argv: array of PtrUInt);
+function ObtainBestPen(cm: pColorMap; r: LongWord; g: LongWord; b: LongWord; const argv: array of PtrUInt): LongInt;
 procedure SetRPAttrs(rp: PRastPort; const argv: array of PtrUInt);
 function VideoControlTags(colorMap: PColorMap; const argv: array of PtrUInt): LongWord;