summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/test/tiny.sail24
1 files changed, 10 insertions, 14 deletions
diff --git a/src/test/tiny.sail b/src/test/tiny.sail
index 4666c18b..e8ef0805 100644
--- a/src/test/tiny.sail
+++ b/src/test/tiny.sail
@@ -25,22 +25,18 @@ typedef funcT = const union { unit fADD; ... }
*)
-(****
----------------------------------------------
--- State
----------------------------------------------
+(**** State ****)
-declare
-{
- PC :: addrT -- Program Counter
- R :: regT -> wordT -- Registers
- IM :: memT -- Instruction Memory
+addrT PC (* Program Counter *)
+regT -> wordT R (* Registers *)
+memT IM (* Instruction Memory *)
(* not sure the interpreter will recognize rmem through the typedef *)
- DM :: memT -- Data Memory
- InRdy :: bool -- Input Ready
- InData :: wordT -- Input Data
- OutStrobe :: wordT -- Output Data
-}
+DM :: memT (* Data Memory *)
+InRdy :: bool (* Input Ready *)
+InData :: wordT (* Input Data *)
+OutStrobe :: wordT (* Output Data *)
+
+(****
---------------------------------------------
-- Operations