Parent Directory | Revision Log | Patch
revision 1.1 by matthieu, Tue Jul 8 22:39:40 2003 UTC | revision 1.2 by matthieu, Tue Jul 8 22:47:28 2003 UTC | |
---|---|---|
# | Line 34 E-mail : olivier@marvinproject.org | Line 34 E-mail : olivier@marvinproject.org |
34 | ||
35 | *) | *) |
36 | ||
37 | class pattern (inputVector, outputVector) = | class ['a] pattern (inputVector : 'a) (outputVector : 'a) = |
38 | object | object |
39 | val mutable _inputs = inputVector | val mutable _inputs = inputVector |
40 | val mutable _outputs = outputVector | val mutable _outputs = outputVector |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |