paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-12 21:49:12 +02:00
Code Issues Packages Projects Releases Wiki Activity

* remove old cdecl record hack, fixes linker errors with aspell on mac os x

Browse Source 
git-svn-id: trunk@23397 -
This commit is contained in:
Almindor 2013-01-16 04:44:49 +00:00
parent 38da152b11
commit 235bda8746
1 changed files with 1 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
packages/aspell/src/aspell.pp
View File

@ -279,7 +279,7 @@ uses
* NULL and token.size will be 0 } * NULL and token.size will be 0 }
// internal hacky version to go around a bug regarding struct results/cdecl // internal hacky version to go around a bug regarding struct results/cdecl
function __aspell_document_checker_next_misspelling(ths:PAspellDocumentChecker):{$IFDEF CPU64}{$IFDEF LINUX}QWord{$ELSE}AspellToken{$ENDIF}{$ELSE}AspellToken{$ENDIF};cdecl;external libaspell name 'aspell_document_checker_next_misspelling'; function aspell_document_checker_next_misspelling(ths:PAspellDocumentChecker):AspellToken;cdecl;external libaspell name 'aspell_document_checker_next_misspelling';
{ Returns the underlying filter class. } { Returns the underlying filter class. }
@ -433,7 +433,6 @@ uses
function aspell_init(const libn: ansistring): Boolean; function aspell_init(const libn: ansistring): Boolean;
function aspell_loaded: Boolean; function aspell_loaded: Boolean;
function aspell_document_checker_next_misspelling(ths:PAspellDocumentChecker):AspellToken;
implementation implementation
@ -447,11 +446,4 @@ begin
aspell_loaded := True; aspell_loaded := True;
end; end;
function aspell_document_checker_next_misspelling(ths: PAspellDocumentChecker
): AspellToken;
begin
// yup...
aspell_document_checker_next_misspelling := AspellToken(__aspell_document_checker_next_misspelling(ths));
end;
end. end.