1 /************************************************************************
2 ************************************************************************
4 Copyright (C) 2003-2004 GRAME, Centre National de Creation Musicale
5 ---------------------------------------------------------------------
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
19 ************************************************************************
20 ************************************************************************/
30 * Interface of the block diagram evaluator.
32 * A strict lambda-calculus evaluator for block diagram expressions.
39 #include "sourcereader.hh"
40 #include "environment.hh"
43 * Eval the definition of 'process'.
45 * Eval the definition of 'process' in the environment passed as argument
46 * @param eqlist the global environment (a list of definitions)
47 * @return the 'process' block diagram in normal form that is
50 Tree evalprocess (Tree eqlist);
51 Tree evaldocexpr (Tree docexpr, Tree eqlist);
55 * Push a new layer and add a single definition.
56 * @param id the symbol id to be defined
57 * @param def the definition to be binded to the symbol id
58 * @param lenv the environment where to push the layer and add the definition
59 * @return the new environment
61 Tree pushValueDef(Tree id, Tree def, Tree lenv);
63 /* numeric simplification of pattern arguments */
64 Tree simplifyPattern (Tree pattern);