Changeset 3700


Ignore:
Timestamp:
Apr 14, 2008, 9:52:21 PM (13 years ago)
Author:
yura
Message:
  • Do not add some temp variables (but not all) to JavaByteCode? annotation.
File:
1 edited

Legend:

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

    r3589 r3700  
    891891    <Entries s.block_table2> : e ((VAR t.var) (s.type s.ind)) e,
    892892      # <IsInTable s.block_table1 VAR t.var>,
    893       t.var : (e (e.name)),
     893      t.var : \{
     894        (SVAR (e.name)) = <ToWord 's.' e.name>;
     895        (TVAR (e.name)) = <ToWord 't.' e.name>;
     896        (VVAR (e.name)) = <ToWord 'v.' e.name>;
     897        (EVAR (e.name)) = <ToWord 'e.' e.name>;
     898      } :: s.name,
    894899      s.type : \{
    895         Expr = <IIMVvisitLocalVariable <MV> <ToWord e.name> "Lorg/refal/plus/Expr;" <Null> s.start s.stop sind>;
    896         Result = <IIMVvisitLocalVariable <MV> <ToWord e.name> "Lorg/refal/plus/Result;" <Null> s.start s.stop sind>;
     900        Expr = <IIMVvisitLocalVariable <MV> s.name "Lorg/refal/plus/Expr;" <Null> s.start s.stop sind>;
     901        Result = <IIMVvisitLocalVariable <MV> s.name "Lorg/refal/plus/Result;" <Null> s.start s.stop sind>;
    897902      },
    898903      $fail;
Note: See TracChangeset for help on using the changeset viewer.