|
Revision 529, 0.7 kB
(checked in by shans, 1 year ago)
|
Replacing sound implementation - WAS ocaml int arrays, IS native float
arrays. This has not yet been completely been debugged!
|
| Line | |
|---|
| 1 |
type raw_sound = FB.buffer;; |
|---|
| 2 |
|
|---|
| 3 |
(** a sound takes a remix, a start time, and a render extent, and generates raw |
|---|
| 4 |
data. |
|---|
| 5 |
|
|---|
| 6 |
Note: sounds do not fundamentally possess a length. Sounds and other |
|---|
| 7 |
objects which depend upon length should take this as an extra parameter. |
|---|
| 8 |
e.g. envelopes need a length to determine when to begin release. |
|---|
| 9 |
|
|---|
| 10 |
*) |
|---|
| 11 |
type sound = Remix.remix -> Time.time -> Time.extent -> raw_sound;; |
|---|
| 12 |
|
|---|
| 13 |
val silence : sound;; |
|---|
| 14 |
|
|---|
| 15 |
val write : 'a IO.output -> Remix.remix -> sound -> Time.time -> |
|---|
| 16 |
Time.extent -> unit;; |
|---|
| 17 |
|
|---|
| 18 |
val preview : Remix.remix -> sound -> Time.time -> Time.extent -> unit;; |
|---|
| 19 |
|
|---|
| 20 |
val raw_preview : Remix.remix -> raw_sound -> unit;; |
|---|
