Skip to content

Commit

Permalink
Catch up with sail-riscv
Browse files Browse the repository at this point in the history
  • Loading branch information
nwf-msr committed Jan 13, 2024
1 parent 14e5bb5 commit 129fdc7
Show file tree
Hide file tree
Showing 2 changed files with 0 additions and 10 deletions.
1 change: 0 additions & 1 deletion Makefile
Original file line number Diff line number Diff line change
Expand Up @@ -60,7 +60,6 @@ SAIL_VM_SRCS += $(SAIL_$(ARCH)_VM_SRCS)

# Non-instruction sources
PRELUDE = $(SAIL_RISCV_MODEL_DIR)/prelude.sail \
$(SAIL_RISCV_MODEL_DIR)/prelude_mapping.sail \
$(SAIL_XLEN) \
$(SAIL_FLEN) \
$(SAIL_VLEN) \
Expand Down
9 changes: 0 additions & 9 deletions src/cheri_prelude.sail
Original file line number Diff line number Diff line change
Expand Up @@ -68,15 +68,6 @@ val MEMw_tag = "write_tag_bool" : (bits(64) , bool) -> unit effect { wmvt }
val MAX : forall 'n, 'n >= 0 . atom('n) -> atom(2 ^ 'n - 1) effect pure
function MAX(n) = pow2(n) - 1

val not = {coq:"negb", _:"not"} : bool -> bool

/*!
* THIS converts a boolean to a bit in the conventional way by mapping `true` to
* `bitone` and `false` to `bitzero`.
*/
val bool_to_bit : bool -> bit
function bool_to_bit x = if x then bitone else bitzero

/*!
* align_down(n, bv) returns the given bit vector, bv, aligned down to a power
* of two by clearing the least significant n bits.
Expand Down

0 comments on commit 129fdc7

Please sign in to comment.