From 8c63ae039b15a5de575248ed2399e8ab3c451e16 Mon Sep 17 00:00:00 2001
From: Alex AUVOLAT <alex.auvolat@ens.fr>
Date: Thu, 19 Dec 2013 18:31:04 +0100
Subject: Premiers morceaux de CPU - enfin non, rien du tout...

---
 cpu/cpu.ml | 8 ++++++++
 1 file changed, 8 insertions(+)
 create mode 100644 cpu/cpu.ml

(limited to 'cpu/cpu.ml')

diff --git a/cpu/cpu.ml b/cpu/cpu.ml
new file mode 100644
index 0000000..10e7bc4
--- /dev/null
+++ b/cpu/cpu.ml
@@ -0,0 +1,8 @@
+open Netlist_gen
+
+(* Dumb CPU that just does an 8-bit addition *)
+
+let p = 
+main_2_2 (fun a b -> Alu.nadder 8 a b (value "0")) 8 8
+
+let () = Netlist_proc.print stdout p
-- 
cgit v1.2.3