simon/sidekick
1
0
Fork 0
mirror of https://github.com/c-cube/sidekick.git synced 2025-12-06 03:05:31 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

update smtlib

Browse source
This commit is contained in:
Simon Cruanes 2025-01-27 21:51:51 -05:00
parent 6c8d6840f8
commit 4363fc47b6
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
1 changed files with 1 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
src/smtlib/Typecheck.ml
View file

@ -84,6 +84,7 @@ let rec conv_ty (ctx : Ctx.t) (t : PA.ty) : Ty.t =
let l = List.map (conv_ty ctx) l in let l = List.map (conv_ty ctx) l in
Ty.app_l ctx.tst ty_f l Ty.app_l ctx.tst ty_f l
| PA.Ty_arrow _ -> ill_typed ctx "cannot handle arrow types" | PA.Ty_arrow _ -> ill_typed ctx "cannot handle arrow types"
| PA.Ty_bv _ -> ill_typed ctx "cannot handle bitvectors"
let is_num s = let is_num s =
let is_digit_or_dot = function let is_digit_or_dot = function