diff options
| author | Alex AUVOLAT <alex.auvolat@ens.fr> | 2013-12-19 18:31:04 +0100 |
|---|---|---|
| committer | Alex AUVOLAT <alex.auvolat@ens.fr> | 2013-12-19 18:31:04 +0100 |
| commit | 8c63ae039b15a5de575248ed2399e8ab3c451e16 (patch) | |
| tree | 90ba1285e3d2438d84ba00328714e52dd54f9483 /cpu/cpu.ml | |
| parent | 19d450830f848c9d88d61c381c3bafde560f78bb (diff) | |
| download | SystDigit-Projet-8c63ae039b15a5de575248ed2399e8ab3c451e16.tar.gz SystDigit-Projet-8c63ae039b15a5de575248ed2399e8ab3c451e16.zip | |
Premiers morceaux de CPU - enfin non, rien du tout...
Diffstat (limited to 'cpu/cpu.ml')
| -rw-r--r-- | cpu/cpu.ml | 8 |
1 files changed, 8 insertions, 0 deletions
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 |