// $Source$
// $Revision$
// $Date$

/*
 * Модуль для обработки константных выражений.
 */


/*
 * Инициализация.
 */
$func Init_Consts = ;

/*
 * Сделать из константного выражения STATIC форму ASAIL.
 */
$func Create_Static expr = e.static_form_or_empty;

/*
 * Получить по STATIC-форме изначальное выражение.
 */
$func Get_Static t.static_form = expr;

/*
 * Скомпилировать накопленные константные выражения и выдать получившийся
 * ASAIL-код.
 */
$func Comp_Consts = e.ASAIL_consts;