projects
/
Faustine.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug of vector wave output error fixed.
[Faustine.git]
/
interpretor
/
types.ml
diff --git
a/interpretor/types.ml
b/interpretor/types.ml
index
6fa6513
..
e0eace4
100644
(file)
--- a/
interpretor/types.ml
+++ b/
interpretor/types.ml
@@
-45,7
+45,7
@@
class type value_type =
type symbol = Add
type symbol = Add
- | Su
p
+ | Su
b
| Mul
| Div
| Pass
| Mul
| Div
| Pass
@@
-57,7
+57,7
@@
type symbol = Add
| Sin
| Cos
| Atan
| Sin
| Cos
| Atan
- | Atan
two
+ | Atan
2
| Sqrt
| Rdtable
| Mod
| Sqrt
| Rdtable
| Mod
@@
-68,8
+68,8
@@
type symbol = Add
| Larger
| Smaller
| Prefix
| Larger
| Smaller
| Prefix
- | Select
two
- | Select
three
+ | Select
2
+ | Select
3
type faust_exp =
type faust_exp =
@@
-120,10
+120,12
@@
class type beam_type =
method get : signal_type array
method width : int
method sub : int -> int -> beam_type
method get : signal_type array
method width : int
method sub : int -> int -> beam_type
+ method cut : int -> beam_type * beam_type
method append : beam_type -> beam_type
method matching : int -> beam_type
method at : time -> value_type array
method append : beam_type -> beam_type
method matching : int -> beam_type
method at : time -> value_type array
- method output : int -> value_type array array
+ method output : int -> float array array array
+ method frequency : int array
end;;
end;;
@@
-144,6
+146,12
@@
class type process_type =
method exp : faust_exp
method dim : dimension_type
method delay : int
method exp : faust_exp
method dim : dimension_type
method delay : int
- method to_string : string
- method evaluate : beam_type -> beam_type
+ method eval : beam_type -> beam_type
+ end;;
+
+
+class type io_type =
+ object
+ method read : string array -> beam_type
+ method write : int array -> float array array array -> string array
end;;
end;;