Changeset 3717


Ignore:
Timestamp:
Apr 16, 2008, 9:35:45 PM (13 years ago)
Author:
orlov
Message:
  • More sensible names for function references.
Location:
to-imperative/trunk/compiler/refal/org/refal/plus/compiler
Files:
2 edited

Legend:

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

    r3709 r3717  
    418418      (<Rfp2Java t.item>);
    419419    ("FUNC?" t.name) =
    420       ('Symbol.newFunc("'t.name'", new Func () {'
     420      ('Symbol.newFunc("'<Name_To_Java t.name>'", new Func () {'
    421421        ('public boolean eval (Expr arg, Result res) throws RefalException {'
    422422          ('return '<Name_To_Java t.name>' (arg, res);')
     
    424424      '})');
    425425    (s.FUNC t.name), s.FUNC : \{ FUNC; TFUNC; } =
    426       ('Symbol.newFunc("'t.name'", new Func () {'
     426      ('Symbol.newFunc("'<Name_To_Java t.name>'", new Func () {'
    427427        ('public boolean eval (Expr arg, Result res) throws RefalException {'
    428428          ((<Name_To_Java t.name>' (arg, res);')('return true;'))
  • to-imperative/trunk/compiler/refal/org/refal/plus/compiler/rfp_asail_jbc.rf

    r3713 r3717  
    15041504    <IIMVvisitTypeInsn <MV> <NEW> "org/refal/plus/Expr">,
    15051505    <IIMVvisitInsn <MV> <DUP>>,
    1506     <IIMVvisitLdcInsn <MV> s.cl_name>,
     1506    <IIMVvisitLdcInsn <MV> s.name>,
    15071507    <IIMVvisitTypeInsn <MV> <NEW> s.cl_name>,
    15081508    <IIMVvisitInsn <MV> <DUP>>,
Note: See TracChangeset for help on using the changeset viewer.