瀏覽代碼

* patch from Peter for win32 .ow to .o change

Jonas Maebe 22 年之前
父節點
當前提交
0f893e81c8
共有 1 個文件被更改,包括 5 次插入1 次删除
  1. 5 1
      tests/test/cg/tcalpext.pp

+ 5 - 1
tests/test/cg/tcalpext.pp

@@ -30,7 +30,11 @@ uses
 
 {$ifdef USE_PASCAL_OBJECT}
   {$ifdef win32}
-  {$L ptest.ow}
+    {$ifdef ver1_0}
+      {$L ptest.ow}
+    {$else}
+      {$L ptest.o}
+    {$endif}
   {$else}
   {$L ptest.o}
   {$endif not win32}