projects
/
Faustine.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge branch 'master' of https://scm.cri.ensmp.fr/git/Faustine
[Faustine.git]
/
interpretor
/
types.ml
diff --git
a/interpretor/types.ml
b/interpretor/types.ml
index
352afbe
..
3f0631b
100644
(file)
--- a/
interpretor/types.ml
+++ b/
interpretor/types.ml
@@
-87,9
+87,18
@@
type faust_exp =
| Merge of faust_exp * faust_exp
| Merge of faust_exp * faust_exp
+class type rate_type =
+ object
+ method to_int : int
+ method to_float : float
+ method equal : rate_type -> bool
+ method mul : int -> rate_type
+ method div : int -> rate_type
+ end
+
class type signal_type =
object
class type signal_type =
object
- method frequency :
int
+ method frequency :
rate_type
method at : time -> value_type
method add_memory : int -> unit
method add : signal_type -> signal_type
method at : time -> value_type
method add_memory : int -> unit
method add : signal_type -> signal_type