mirrors/z3
3
0
Fork 0
mirror of https://github.com/Z3Prover/z3 synced 2025-04-12 12:08:18 +00:00
Code Activity

ML API bugfix

Browse source 
Signed-off-by: Christoph M. Wintersteiger <cwinter@microsoft.com>
This commit is contained in:
Christoph M. Wintersteiger 2014-04-22 11:49:47 +01:00
parent e7345f5ea8
commit a73a66b79c
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/api/ml/z3.ml
View file

@ -119,7 +119,7 @@ let mk_list ( f : int -> 'a ) ( n : int ) =
if (i >= n) then if (i >= n) then
tail tail
else else
(mk_list' f (i+1) n ((f i) :: tail)) (f i) :: (mk_list' f (i+1) n tail)
in in
mk_list' f 0 n [] mk_list' f 0 n []