X-Git-Url: https://scm.cri.ensmp.fr/git/Faustine.git/blobdiff_plain/23922b6f3a5f9813b822b4c60f05c8f2e384b070..a891a827a9bad83d44164ffdd7b28f070c439e46:/interpretor/types.ml diff --git a/interpretor/types.ml b/interpretor/types.ml index 5e88a1a..3d14095 100644 --- a/interpretor/types.ml +++ b/interpretor/types.ml @@ -45,7 +45,7 @@ class type value_type = type symbol = Add - | Sup + | Sub | Mul | Div | Pass @@ -57,7 +57,7 @@ type symbol = Add | Sin | Cos | Atan - | Atantwo + | Atan2 | Sqrt | Rdtable | Mod @@ -68,8 +68,8 @@ type symbol = Add | Larger | Smaller | Prefix - | Selecttwo - | Selectthree + | Select2 + | Select3 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 cut : int -> beam_type * beam_type 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 frequency : int array end;; @@ -144,5 +146,12 @@ class type process_type = method exp : faust_exp method dim : dimension_type method delay : int - 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 : value_type array array -> string array end;;