瀏覽代碼

* enable brenchmark to be compiled with -Sh

florian 3 年之前
父節點
當前提交
894c49ca93
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      tests/bench/bval.pp

+ 1 - 1
tests/bench/bval.pp

@@ -5,7 +5,7 @@ const
   chars : shortstring = ('0123456789AbCdEf');
   signs : shortstring = (' -');
 var
-  vals : array[0..1000] of shortstring;
+  vals : array[0..1000] of string;
   base,len,baseindex : byte;
   li,i,j : longint;
   code : word;