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
17dea67
..
3f0631b
100644
(file)
--- a/
interpretor/types.ml
+++ b/
interpretor/types.ml
@@
-42,6
+42,8
@@
class type value_type =
method _mod : value_type -> value_type
method larger : value_type -> value_type
method smaller : value_type -> value_type
method _mod : value_type -> value_type
method larger : value_type -> value_type
method smaller : value_type -> value_type
+ method max : value_type -> value_type
+ method min : value_type -> value_type
end;;
end;;
@@
-68,6
+70,8
@@
type symbol = Add
| Serialize
| Larger
| Smaller
| Serialize
| Larger
| Smaller
+ | Max
+ | Min
| Prefix
| Select2
| Select3
| Prefix
| Select2
| Select3
@@
-83,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
@@
-109,6
+122,8
@@
class type signal_type =
method _mod : signal_type -> signal_type
method larger : signal_type -> signal_type
method smaller : signal_type -> signal_type
method _mod : signal_type -> signal_type
method larger : signal_type -> signal_type
method smaller : signal_type -> signal_type
+ method max : signal_type -> signal_type
+ method min : signal_type -> signal_type
method rdtable : signal_type -> signal_type -> signal_type
method select2 : signal_type -> signal_type -> signal_type
method select3 : signal_type -> signal_type -> signal_type -> signal_type
method rdtable : signal_type -> signal_type -> signal_type
method select2 : signal_type -> signal_type -> signal_type
method select3 : signal_type -> signal_type -> signal_type -> signal_type
@@
-153,6
+168,7
@@
class type process_type =
class type io_type =
object
class type io_type =
object
+ method set : string -> string -> unit
method read : string array -> beam_type
method write : int array -> float array array array -> string array
end;;
method read : string array -> beam_type
method write : int array -> float array array array -> string array
end;;