source: to-imperative/trunk/compiler/refal/org/refal/plus/compiler/rfp_const.rfi @ 3600

Last change on this file since 3600 was 3600, checked in by yura, 13 years ago
  • $module is added.
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 880 bytes
Line 
1// $Id: rfp_const.rfi 3600 2008-03-28 15:20:52Z yura $
2
3/*
4 * О©╫О©╫О©╫О©╫О©╫О©╫ О©╫О©╫О©╫ О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫ О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫ О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫.
5 */
6
7$module "org.refal.plus.compiler.rfp_const";
8
9/*
10 * О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫.
11 */
12$func Init_Consts = ;
13
14/*
15 * О©╫О©╫О©╫О©╫О©╫О©╫О©╫ О©╫О©╫ О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫ О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫ STATIC О©╫О©╫О©╫О©╫О©╫ ASAIL.
16 */
17$func Create_Static expr = e.static_form_or_empty;
18
19/*
20 * О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫ О©╫О©╫ STATIC-О©╫О©╫О©╫О©╫О©╫ О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫ О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫.
21 */
22$func Get_Static t.static_form = expr;
23
24/*
25 * О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫ О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫ О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫ О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫ О©╫ О©╫О©╫О©╫О©╫О©╫О©╫ О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫О©╫
26 * ASAIL-О©╫О©╫О©╫.
27 */
28$func Comp_Consts = e.ASAIL_consts;
29
Note: See TracBrowser for help on using the repository browser.