diff options
| author | Son Ho | 2022-05-15 22:34:31 +0200 |
|---|---|---|
| committer | Son Ho | 2022-05-15 22:34:31 +0200 |
| commit | ffc93a3f4d3b29e3a6805f9882f20dd22d184939 (patch) | |
| tree | 79013f1f1cb001409a1fffe526c2a27bd0ebc28b /fstar | |
| parent | a25d820b6eb02f573ad2c274a35e3496a9dacd40 (diff) | |
Add a pass to cleanup the deconstructed ADTs and fix a small issue
Diffstat (limited to '')
| -rw-r--r-- | fstar/Primitives.fst | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fstar/Primitives.fst b/fstar/Primitives.fst index f73c8c09..fe351f3a 100644 --- a/fstar/Primitives.fst +++ b/fstar/Primitives.fst @@ -146,7 +146,7 @@ let scalar_mul (#ty : scalar_ty) (x : scalar ty) (y : scalar ty) : result (scala mk_scalar ty (x * y) (** Cast an integer from a [src_ty] to a [tgt_ty] *) -let scalar_cast (#src_ty : scalar_ty) (tgt_ty : scalar_ty) (x : scalar src_ty) : result (scalar tgt_ty) = +let scalar_cast (src_ty : scalar_ty) (tgt_ty : scalar_ty) (x : scalar src_ty) : result (scalar tgt_ty) = mk_scalar tgt_ty x /// The scalar types |