Skip to content

Commit f78affb

Browse files
committed
Change the code format
1 parent c630c25 commit f78affb

File tree

1 file changed

+2
-4
lines changed

1 file changed

+2
-4
lines changed

ArchSemArm/VMPromising.v

Lines changed: 2 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -709,10 +709,8 @@ Definition va_to_vpn {n : N} (va : bv 64) : bv n :=
709709
bv_extract 12 n va.
710710

711711
Definition prefix_to_va {n : N} (is_upper : bool) (p : bv n) : bv 64 :=
712-
if is_upper then
713-
bv_concat 64 (bv_1 16) (bv_concat 48 p (bv_0 (48 - n)))
714-
else
715-
bv_concat 64 (bv_0 16) (bv_concat 48 p (bv_0 (48 - n))).
712+
let varange_bit := if is_upper then (bv_1 16) else (bv_0 16) in
713+
bv_concat 64 varange_bit (bv_concat 48 p (bv_0 (48 - n))).
716714

717715
Definition level_prefix {n : N} (va : bv n) (lvl : Level) : prefix lvl :=
718716
bv_extract (12 + 9 * (3 - lvl)) (9 * (lvl + 1)) va.

0 commit comments

Comments
 (0)