blob: 2a3502f81dce011bdec818265634f0c6ff2d6c03 (
plain)
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
|
[bytefield]
----
(defattrs :plain [:plain {:font-family "M+ 1p Fallback" :font-size 24}])
(def row-height 40 )
(def row-header-fn nil)
(def left-margin 30)
(def right-margin 30)
(def boxes-per-row 32)
(draw-box nil {:span 6 :borders {}})
(draw-box "SXLEN-1" {:span 7 :text-anchor "start" :borders {}})
(draw-box "2" {:span 7 :text-anchor "end" :borders {}})
(draw-box "1" {:span 3 :text-anchor "start" :borders {}})
(draw-box "0" {:span 3 :text-anchor "end" :borders {}})
(draw-box nil {:span 6 :borders {}})
(draw-box nil {:span 6 :borders {}})
(draw-box "BASE[SXLEN-1:2]" {:span 7 :text-anchor "end" :borders {:top :border-unrelated :left :border-unrelated :bottom :border-unrelated}})
(draw-box (text "(WARL)" {:font-weight "bold" :font-size 24}) {:span 7 :text-anchor "start" :borders {:top :border-unrelated :right :border-unrelated :bottom :border-unrelated}})
(draw-box "MODE" {:span 3 :text-anchor "end" :borders {:top :border-unrelated :left :border-unrelated :bottom :border-unrelated}})
(draw-box (text "(WARL)" {:font-weight "bold" :font-size 24}) {:span 3 :text-anchor "start" :borders {:top :border-unrelated :right :border-unrelated :bottom :border-unrelated}})
(draw-box nil {:span 6 :borders {}})
(draw-box nil {:span 6 :borders {}})
(draw-box "SXLEN-2" {:span 14 :borders {}})
(draw-box "2" {:span 6 :borders {}})
(draw-box nil {:span 6 :borders {}})
----
|
