Browse Source

* use the qword hack only on linux x86_64 (others would fail)

git-svn-id: trunk@10250 -
Almindor 17 years ago
parent
commit
0dece44b9b
1 changed files with 2 additions and 2 deletions
  1. 2 2
      packages/aspell/src/aspell.pp

+ 2 - 2
packages/aspell/src/aspell.pp

@@ -418,7 +418,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):QWord;cdecl;external libaspell name 'aspell_document_checker_next_misspelling';
+    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';
 
 
     { Returns the underlying filter class.  }
     { Returns the underlying filter class.  }
 
 
@@ -824,7 +824,7 @@ var
        * NULL and token.size will be 0  }
        * NULL and token.size will be 0  }
 
 
   // hack around struct/cdecl problem
   // hack around struct/cdecl problem
-  __aspell_document_checker_next_misspelling: function(ths:PAspellDocumentChecker):QWord;cdecl;
+  __aspell_document_checker_next_misspelling: function(ths:PAspellDocumentChecker):{$IFDEF CPU64}{$IFDEF LINUX}QWord{$ELSE}AspellToken{$ENDIF}{$ELSE}AspellToken{$ENDIF};cdecl;
 
 
       { Returns the underlying filter class.  }
       { Returns the underlying filter class.  }