浏览代码

* fix building for Haiku/BeOS after r20839 (patch by Olivier Coursière)

git-svn-id: trunk@20878 -
Jonas Maebe 13 年之前
父节点
当前提交
f0b7ce8afe
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      rtl/unix/cwstring.pp

+ 1 - 1
rtl/unix/cwstring.pp

@@ -812,8 +812,8 @@ function CharLengthPChar(const Str: PChar): PtrInt;
 
 
 
 
 function CodePointLength(const Str: PChar; maxlookahead: ptrint): PtrInt;
 function CodePointLength(const Str: PChar; maxlookahead: ptrint): PtrInt;
-  var
 {$ifndef beos}
 {$ifndef beos}
+  var
     mbstate: mbstate_t;
     mbstate: mbstate_t;
 {$endif not beos}
 {$endif not beos}
   begin
   begin