From 645d4f8e703fcb77044b0fce5b3134187ef056aa Mon Sep 17 00:00:00 2001
From: Christiaan Baaij <baaijcpr@wlan228123.mobiel.utwente.nl>
Date: Wed, 3 Mar 2010 10:15:14 +0100
Subject: [PATCH 1/1] make paper version of highordcpu resemble compilable
 version of highordcpu

---
 "c\316\273ash.lhs" | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git "a/c\316\273ash.lhs" "b/c\316\273ash.lhs"
index 59f529a..2fa6b86 100644
--- "a/c\316\273ash.lhs"
+++ "b/c\316\273ash.lhs"
@@ -1192,12 +1192,11 @@ the vectors of the \acro{FIR} code to a length of 4, is depicted in
 \subsection{Higher order CPU}
 
 \begin{code}
-fu op inputs (addr1, addr2) (State out) =
-  (State out', out)
+fu op inputs (addr1, addr2) regOut = (regIn, regOut)
   where
-    in1  = inputs!addr1
-    in2  = inputs!addr2
-    out' = op in1 in2
+    in1     = inputs!addr1
+    in2     = inputs!addr2
+    regIn   = op in1 in2
 \end{code}
 
 \begin{code}
-- 
2.30.2