Exemple #1
0
 @Override
 public int codeIn(final int loc, final int count, final int locals) throws CodeTooSmallError {
   int locals1 = locals;
   int loc1 = loc;
   if (flowMode.getMode() != Modes.IN && mechMode.getMode() == Modes.COPY) {
     if (flowMode.getMode() == Modes.INOUT) {
       IMLCompiler.getVM().CopyIn(loc1++, -count, 3 + locals1);
     }
     locals1++;
   }
   return param.codeIn(loc1, count - 1, locals1);
 }
Exemple #2
0
  @Override
  public void check(final Routine routine) throws ContextError {
    store = storeDecl.check();
    switch (flowMode.getMode()) {
      case IN:
        if (mechMode.getMode() == Modes.REF && !store.isConst()) {
          throw new ContextError(
              "IN reference parameter can not be var! Ident: " + store.getIdent(),
              storeDecl.getLine());
        }
        store.initialize();
        break;
      case INOUT:
        if (routine.getRoutineType() != RoutineTypes.PROCEDURE) {
          throw new ContextError(
              "INOUT parameter in function declaration! Ident: " + store.getIdent(),
              storeDecl.getLine());
        }
        if (store.isConst()) {
          throw new ContextError(
              "INOUT parameter can not be constant! Ident: " + store.getIdent(),
              storeDecl.getLine());
        }
        store.initialize();
        break;
      case OUT:
        if (routine.getRoutineType() != RoutineTypes.PROCEDURE) {
          throw new ContextError(
              "OUT parameter in function declaration! Ident: " + store.getIdent(),
              storeDecl.getLine());
        }
        break;
      default:
        break;
    }

    Modes changeMode = Modes.CONST;
    if (!store.isConst()) {
      changeMode = Modes.VAR;
    }

    routine.addParam(
        new Parameter(flowMode.getMode(), mechMode.getMode(), changeMode, store.getType()));

    param.check(routine);
  }
Exemple #3
0
  @Override
  public void checkInit() throws ContextError {
    if (flowMode.getMode() == Modes.OUT) {
      if (!IMLCompiler.getScope().getStoreTable().getStore(storeDecl.getIdent()).isInitialized()) {
        throw new ContextError(
            "OUT parameter is never initialized! Ident: " + storeDecl.getIdent(),
            storeDecl.getLine());
      }
    }

    param.checkInit();
  }
Exemple #4
0
  @Override
  public int calculateAddress(final int count, final int locals) {
    int locals1 = locals;
    if (flowMode.getMode() == Modes.IN || mechMode.getMode() == Modes.REF) {
      store.setAddress(-count);
      store.setRelative(true);
      if (mechMode.getMode() == Modes.REF) {
        store.setReference(true);
      } else {
        store.setReference(false);
      }

    } else {
      store.setAddress(2 + ++locals1);
      store.setRelative(true);
      store.setReference(false);
    }
    return param.calculateAddress(count - 1, locals1);
  }