repositories
/
msc-thesis1617.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
ce0a0c9
)
update
author
Mart Lubbers
<mart@martlubbers.net>
Sun, 9 Jul 2017 11:38:37 +0000
(13:38 +0200)
committer
Mart Lubbers
<mart@martlubbers.net>
Sun, 9 Jul 2017 11:38:37 +0000
(13:38 +0200)
pres.system.tex
patch
|
blob
|
history
diff --git
a/pres.system.tex
b/pres.system.tex
index
f4c71ab
..
f45abbe
100644
(file)
--- a/
pres.system.tex
+++ b/
pres.system.tex
@@
-438,8
+438,11
@@
blink = makeDevice "stm32" stm32 >>= connectDevice
where
stm32 = makeDevice "Stm32"
(SerialDevice {devicePath="/dev/ttyUSB0", baudrate=B9600, ...}
- blinkTask = sds \led=LED1 In sds \x=True In
- {main = IF x (ledOff led) (ledOn led) :. x =. Not x }
+ blinkTask = sds \led=LED1 In sds \x=True In {main =
+ ledOn LED1 :. ledOn LED2 :. ledOn LED3 :.
+ IF x (ledOff led) (ledOn led) :.
+ x =. Not x
+ }
\end{lstlisting}
\end{frame}