Package org.asturlinux.frade.currin.machine

Examples of org.asturlinux.frade.currin.machine.Memory

31
32
33
34
35
36
37
38
39
40
41
 
  first_op = evaluateSubExpr(m, first_op);

  second_op = evaluateSubExpr(m, second_op);

  Memory mem = m.getContextStack().currentContext().getMemory();

  if ( first_op.equals(second_op,mem)) {
      m.setResult(new CurrinRef(new CurrinConstr("prelude__EQ",
                   new Vector() )));
View Full Code Here
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
  if ( m.getContextStack().isEmpty() )
      return _running_dirs;

  Vector references = new Vector();
  Iterator i = _running_dirs.iterator();
  Memory mem = m.getContextStack().currentContext().getMemory();
 
  try {

      while ( i.hasNext() ) {
    CurrinRef cr = mem.getElementAt((String)i.next());
    references.add(cr);
      }
     
      return references;
  } catch (ClassCastException cce) {
View Full Code Here
15
16
17
18
19
20
21
22
23
24
25
26
    }

    public void exec(Machine m) {
  Logger logger = Logger.getLogger("Runtime");
  logger.debug("Running Enter instruction");
  Memory mem = m.getContextStack().currentContext().getMemory();
  CurrinRef cr = mem.getElementAt(_what);
  if ( cr == null )
      logger.debug("Chungo");
  cr.evaluate(m);
  m.setResult(cr);
View Full Code Here
19
20
21
22
23
24
25
26
    }
   
    public void exec(Machine m) {
  Logger logger = Logger.getLogger("RuntimeLogger");
  logger.debug("Running Store in (FIXME) " + _where);
  Memory mem = m.getContextStack().currentContext().getMemory();
  mem.setElementAt(_where, m.getResult());
    }
View Full Code Here
23
24
25
26
27
28
29
30
31
32
    public void exec(Machine m) {
  Logger logger = Logger.getLogger("RuntimeLogger");
  logger.debug("Run LET ");

  Memory mem = m.getContextStack().currentContext().getMemory();
  CurrinRef cr = _what.getMemoryForm(mem);

  mem.setElementAt(_where, cr);
    }
View Full Code Here
40
41
42
43
44
45
46
47
48
49
50
51
    public void exec(Machine m)
  throws InterpreterException {
  Logger logger = Logger.getLogger("RuntimeLogger");
  logger.debug("Running Switch ");

  Memory mem = m.getContextStack().currentContext().getMemory();
  CurrinRef switcher = mem.getElementAt(_selector);
  if ( switcher == null ) {
      throw new InterpreterException("Switcher nulo en Switch");
  }

  Iterator i = _cases.iterator();
View Full Code Here
19
20
21
22
23
24
25
26
     */
    public void exec(Machine m) {
  Logger logger = Logger.getLogger("RuntimeLogger");
  logger.debug("Run RETURN");
 
  Memory mem = m.getContextStack().currentContext().getMemory();
  m.setResult(mem.getElementAt(_what));
    }
View Full Code Here
TOP

Related Classes of org.asturlinux.frade.currin.machine.Memory

  • org.apache.log4j.Logger
  • org.apache.log4j.SimpleLayout
  • org.apache.log4j.WriterAppender
  • org.asturlinux.frade.currin.program.builtin.ComparePrimitive
  • org.asturlinux.frade.currin.program.Function
  • org.asturlinux.frade.currin.program.instruction.EnterInstruction
  • org.asturlinux.frade.currin.program.instruction.LetInstruction
  • org.asturlinux.frade.currin.program.instruction.ReturnInstruction
  • org.asturlinux.frade.currin.program.instruction.StoreInstruction
  • org.asturlinux.frade.currin.program.instruction.SwitchInstruction
    • Copyright © 2018 www.massapicom. All rights reserved.
    All source code are property of their respective owners. Java is a trademark of Sun Microsystems, Inc and owned by ORACLE Inc. Contact coftware#gmail.com.