View Issue Details

IDProjectCategoryView StatusLast Update
0023864LazarusWidgetsetpublic2013-02-13 08:12
ReporterlksAssigned ToFelipe Monteiro de Carvalho 
PrioritynormalSeverityminorReproducibilityalways
Status resolvedResolutionfixed 
Platformdarwin x86_64OSmac osxOS Version10.8.2
Product Version1.1 (SVN)Product Build 
Target VersionFixed in Version1.1 (SVN) 
Summary0023864: customdrawn/cocoagdiobjects.pas results in type mismatch on 64 bits with fpc 2.7.1
DescriptionPatch included. The type of one of the parameters in the callback was wrong.
Additional InformationEven after fixing this problem, compiling customdrawn with the most recent fpc trunk (2.7.1) gives errors of the form:

ompiling ./customdrawn/cocoagdiobjects.pas
cocoagdiobjects.pas(442,27) Error: Identifier not found "ATSUGetUnjustifiedBounds"
cocoagdiobjects.pas(449,23) Error: Identifier not found "ATSUCreateTextLayout"
cocoagdiobjects.pas(477,25) Error: Identifier not found "ATSUFindFontFromName"
cocoagdiobjects.pas(556,29) Error: Identifier not found "ATSUSetTextPointerLocation"
cocoagdiobjects.pas(1341) Fatal: There were 4 errors compiling module, stopping
TExternalToolList.Run Exception: /opt/freepascal/share/lazarus/lcl/interfaces/customdrawn/cocoagdiobjects.pas(1341) Fatal: There were 4 errors compiling module, stopping

I have a query out on the fpc forum, but any suggestions for how to proceed resolving these errors would be appreciated.
TagsNo tags attached.
Fixed in Revision40287
LazTarget-
WidgetsetCustomDrawn
Attached Files
  • gdi.patch (767 bytes)
    Index: cocoagdiobjects.pas
    ===================================================================
    --- cocoagdiobjects.pas	(revision 40209)
    +++ cocoagdiobjects.pas	(working copy)
    @@ -569,7 +569,7 @@
     var
       ATSUDirectUPP : ATSUDirectLayoutOperationOverrideUPP = nil; //NewATSUDirectLayoutOperationOverrideUPP(@ATSUCallback)
     
    -function ATSUCallback(iCurrentOperation: ATSULayoutOperationSelector; iLineRef: ATSULineRef; iRefCon: UInt32; iOperationCallbackParameterPtr: UnivPtr;
    +function ATSUCallback(iCurrentOperation: ATSULayoutOperationSelector; iLineRef: ATSULineRef; iRefCon: URefCon; iOperationCallbackParameterPtr: UnivPtr;
       var oCallbackStatus: ATSULayoutOperationCallbackStatus ): OSStatus; {$ifdef DARWIN}mwpascal;{$endif}
     var
       Buffer  : TASTUITextLayout;
    
    gdi.patch (767 bytes)

Activities

lks

2013-02-09 05:52

reporter  

gdi.patch (767 bytes)
Index: cocoagdiobjects.pas
===================================================================
--- cocoagdiobjects.pas	(revision 40209)
+++ cocoagdiobjects.pas	(working copy)
@@ -569,7 +569,7 @@
 var
   ATSUDirectUPP : ATSUDirectLayoutOperationOverrideUPP = nil; //NewATSUDirectLayoutOperationOverrideUPP(@ATSUCallback)
 
-function ATSUCallback(iCurrentOperation: ATSULayoutOperationSelector; iLineRef: ATSULineRef; iRefCon: UInt32; iOperationCallbackParameterPtr: UnivPtr;
+function ATSUCallback(iCurrentOperation: ATSULayoutOperationSelector; iLineRef: ATSULineRef; iRefCon: URefCon; iOperationCallbackParameterPtr: UnivPtr;
   var oCallbackStatus: ATSULayoutOperationCallbackStatus ): OSStatus; {$ifdef DARWIN}mwpascal;{$endif}
 var
   Buffer  : TASTUITextLayout;
gdi.patch (767 bytes)

Issue History

Date Modified Username Field Change
2013-02-09 05:52 lks New Issue
2013-02-09 05:52 lks File Added: gdi.patch
2013-02-13 08:06 Felipe Monteiro de Carvalho Assigned To => Felipe Monteiro de Carvalho
2013-02-13 08:06 Felipe Monteiro de Carvalho Status new => assigned
2013-02-13 08:12 Felipe Monteiro de Carvalho Fixed in Revision => 40287
2013-02-13 08:12 Felipe Monteiro de Carvalho LazTarget => -
2013-02-13 08:12 Felipe Monteiro de Carvalho Status assigned => resolved
2013-02-13 08:12 Felipe Monteiro de Carvalho Fixed in Version => 1.1 (SVN)
2013-02-13 08:12 Felipe Monteiro de Carvalho Resolution open => fixed