瀏覽代碼

r322 | jonas | 2010-02-21 12:04:33 +0100 (Sun, 21 Feb 2010) | 3 lines

  * TERecPtr again points to TERec instead of to an opaque data type (error
    noted by Scott Knapp)

git-svn-id: trunk@14932 -
Jonas Maebe 15 年之前
父節點
當前提交
c235307643
共有 1 個文件被更改,包括 1 次插入2 次删除
  1. 1 2
      packages/univint/src/TextEdit.pas

+ 1 - 2
packages/univint/src/TextEdit.pas

@@ -194,7 +194,7 @@ uses MacTypes,QuickdrawTypes,MixedMode;
 {$ALIGN MAC68K}
 
 type
-	TERecPtr = ^SInt32; { an opaque type }
+	TERecPtr = ^TERec;
 	TEPtr = TERecPtr;
 	TEHandle = ^TEPtr;
 	HighHookProcPtr = procedure( const (*var*) r: Rect; pTE: TEPtr );
@@ -356,7 +356,6 @@ type
             <=  charPosition            D0.W
             
 }
-type
 	HighHookUPP = HighHookProcPtr;
 	EOLHookUPP = EOLHookProcPtr;
 	CaretHookUPP = CaretHookProcPtr;