summaryrefslogtreecommitdiff
path: root/cpu/example_cpu.ml
diff options
context:
space:
mode:
Diffstat (limited to 'cpu/example_cpu.ml')
-rw-r--r--cpu/example_cpu.ml11
1 files changed, 7 insertions, 4 deletions
diff --git a/cpu/example_cpu.ml b/cpu/example_cpu.ml
index 2d60bec..e626cae 100644
--- a/cpu/example_cpu.ml
+++ b/cpu/example_cpu.ml
@@ -10,10 +10,13 @@ let sumz n i =
let p =
let width = 16 in
- let sum, r = sumz width (get "in") in
+ let sum, r = sumz width (get "input") in
program
- [ "in", width ]
- [ "out", width, sum;
- "r", 1, r ]
+ [ "input", width;
+ "ser_in", 8 ]
+ [ "output", width, sum;
+ "r", 1, r;
+ "ser_busy", 1, (const "0");
+ "ser_out", 8, get "ser_in"; ]
let () = Netlist_gen.print stdout p