Changeset 3930 for to-imperative


Ignore:
Timestamp:
Sep 18, 2008, 5:47:10 PM (12 years ago)
Author:
orlov
Message:
  • Fixed namespace for init_() and clean_().
File:
1 edited

Legend:

Unmodified
Added
Removed
  • to-imperative/trunk/compiler/refal/org/refal/plus/compiler/rfp_asail_tpp.rf

    r3925 r3930  
    100100            ('for (int i = 0; i < ts::realsuperSize; i++) {'(
    101101              ('tct(atRank(i));')
    102               ('(int)fab::init_();')
     102              ('(int)'<Get &Module_Name>'::init_();')
    103103            )'}')
    104104            ('TExpr res;')
     
    106106            ('for (int i = 0; i < ts::realsuperSize; i++) {'(
    107107              ('tct(atRank(i));')
    108               ('(int)fab::cleanup_();')
     108              ('(int)'<Get &Module_Name>'::cleanup_();')
    109109            )'}')
    110110            ('return 0;')
Note: See TracChangeset for help on using the changeset viewer.