paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-15 20:29:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed some minor aliases in header. From nldelphi.

Browse Source 
git-svn-id: trunk@14600 -
This commit is contained in:
marco 2010-01-10 15:15:17 +00:00
parent 79f084167a
commit 75f425f34a
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
packages/winunits-base/src/mmsystem.pp
View File

@ -1143,7 +1143,9 @@ Type
HMIDISTRM = THandle; HMIDISTRM = THandle;
LPHMIDI = ^HMIDI; LPHMIDI = ^HMIDI;
LPHMIDIIN = ^HMIDIIN; LPHMIDIIN = ^HMIDIIN;
PHMIDIIN = LPHMIDIIN;
LPHMIDIOUT = ^HMIDIOUT; LPHMIDIOUT = ^HMIDIOUT;
PHMIDIOUT = LPHMIDIOUT;
LPHMIDISTRM = ^HMIDISTRM; LPHMIDISTRM = ^HMIDISTRM;
LPMIDICALLBACK = PDRVCALLBACK; LPMIDICALLBACK = PDRVCALLBACK;
@ -1233,6 +1235,7 @@ Type
LPMIDIINCAPS = LPMIDIINCAPSA; LPMIDIINCAPS = LPMIDIINCAPSA;
{$endif} {$endif}
TMIDIINCAPS = MIDIINCAPS; TMIDIINCAPS = MIDIINCAPS;
TMIDIOUTCAPS = MIDIOUTCAPS;
PMIDIHDR = ^_midihdr; PMIDIHDR = ^_midihdr;
_midihdr = packed Record _midihdr = packed Record