module Riscv:sig..end
RISC-V instructions
type arg =
| |
Cte of |
(* | immediate value | *) |
| |
Reg of |
(* | register or pseudo-register | *) |
typelabel =string
RTL graph labels
type rtl_node = {
|
label : |
(* | entry label | *) |
|
op : |
(* | name of the RISC-V operator | *) |
|
dest : |
(* | destination register, if present | *) |
|
args : |
(* | arguments | *) |
|
exits : |
(* | exit labels | *) |
}
typertl =rtl_node list
typeriscv =rtl_node
val print_riscv : Stdlib.out_channel -> rtl_node -> unitprinting function for a RISC-V instruction