浏览代码

* syntax corrected

pierre 26 年之前
父节点
当前提交
ed95cd2ffa
共有 1 个文件被更改,包括 2 次插入2 次删除
  1. 2 2
      tests/tbs0232.pp

+ 2 - 2
tests/tbs0232.pp

@@ -1,6 +1,6 @@
 const
-   p : procedure a;stdcall=nil;   { <----- this doesn't what you expect !!!!}
-   p : procedure a stdcall=nil;   { so delphi supports also this way of }
+   p1 : procedure;stdcall=nil;   { <----- this doesn't what you expect !!!!}
+   p2 : procedure stdcall=nil;   { so delphi supports also this way of }
                                   { declaration                         }
 
 begin