repositories
/
mTask.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
add example
[mTask.git]
/
mTaskCode.dcl
diff --git
a/mTaskCode.dcl
b/mTaskCode.dcl
index
8e5f0f5
..
91c7038
100644
(file)
--- a/
mTaskCode.dcl
+++ b/
mTaskCode.dcl
@@
-2,12
+2,11
@@
definition module mTaskCode
import mTask
import mTask
+class toCode a :: a -> String
instance toCode Pin
instance toCode MTask
instance toCode ()
instance toCode Long
instance toCode Pin
instance toCode MTask
instance toCode ()
instance toCode Long
-
-class toCode a :: a -> String
instance toCode Bool
instance toCode Int
instance toCode Real
instance toCode Bool
instance toCode Int
instance toCode Real
@@
-15,6
+14,7
@@
instance toCode Char
instance toCode String
instance toCode DigitalPin
instance toCode AnalogPin
instance toCode String
instance toCode DigitalPin
instance toCode AnalogPin
+instance toCode UserLED
argType :: (((Code a p)->Code b q)->In ((Code a p)->Code b q) (Code c s)) -> a | type a
argType :: (((Code a p)->Code b q)->In ((Code a p)->Code b q) (Code c s)) -> a | type a
@@
-99,7
+99,7
@@
instance noOp Code
, iloop :: Int
, includes :: [String]
, def :: Def
, iloop :: Int
, includes :: [String]
, def :: Def
- , mode
:: Mode
+ , mode
`
:: Mode
, binds :: [String]
}
, binds :: [String]
}