package hardcaml_axi

  1. Overview
  2. Docs
package hardcaml_axi
Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source

Source file lite_ports.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
open Base
open! Hardcaml

module type Master_to_slave = Lite_ports_intf.Master_to_slave
module type Slave_to_master = Lite_ports_intf.Slave_to_master

module Master_to_slave (C : Master_slave_bus_config.S) = struct
  type 'a t =
    { awaddr : 'a [@bits C.addr_bits]
    ; awvalid : 'a
    ; awprot : 'a [@bits 3]
    ; wdata : 'a [@bits C.data_bits]
    ; wstrb : 'a [@bits C.data_bits / 8]
    ; wvalid : 'a
    ; bready : 'a
    ; araddr : 'a [@bits C.addr_bits]
    ; arvalid : 'a
    ; arprot : 'a [@bits 3]
    ; rready : 'a
    }
  [@@deriving sexp_of, fields, hardcaml]

  include C
end

module Slave_to_master (C : Master_slave_bus_config.S) = struct
  type 'a t =
    { awready : 'a
    ; wready : 'a
    ; bresp : 'a [@bits 2]
    ; bvalid : 'a
    ; arready : 'a
    ; rdata : 'a [@bits C.data_bits]
    ; rresp : 'a [@bits 2]
    ; rvalid : 'a
    }
  [@@deriving sexp_of, hardcaml]

  include C
end