view modules/bluespec/Pygar/core/AudioPipeTypes.bsv @ 76:8bd0e4d37ad2 pygar svn.77 tip

[svn r77] I don't know why my last change didn't go through grumble grumble....
author rlm
date Wed, 12 May 2010 08:58:23 -0400
parents 49049f97312c
children
line wrap: on
line source

2 // The MIT License
4 // Copyright (c) 2009 Massachusetts Institute of Technology
6 // Permission is hereby granted, free of charge, to any person obtaining a copy
7 // of this software and associated documentation files (the "Software"), to deal
8 // in the Software without restriction, including without limitation the rights
9 // to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10 // copies of the Software, and to permit persons to whom the Software is
11 // furnished to do so, subject to the following conditions:
13 // The above copyright notice and this permission notice shall be included in
14 // all copies or substantial portions of the Software.
16 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 // IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 // FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
19 // AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 // LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21 // OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
22 // THE SOFTWARE.
24 // Author: Ker
25 // min Fleming kfleming@mit.edu
27 import Connectable::*;
28 import GetPut::*;
29 import ClientServer::*;
31 typedef Int#(16) Sample;
32 typedef Int#(16) Channel;
34 typedef enum {
35 EndOfFile = 0,
36 Data = 1
37 } AudioProcessorControl deriving (Bits,Eq);
40 typedef struct {
41 Sample left;
42 Sample right;
43 } StereoSample deriving (Bits,Eq);
45 typedef union tagged{
46 Sample Sample;
47 void EndOfFile;
48 } AudioProcessorUnit deriving (Bits,Eq);