public static void printEnvironmentStacks() {
    { ControlFrame frame = ((QueryIterator)(Logic.$QUERYITERATOR$.get())).currentControlFrame;
      PatternRecord currentpatternrecord = ((QueryIterator)(Logic.$QUERYITERATOR$.get())).currentPatternRecord;

      System.out.println("-------------------------");
      System.out.println("current-control-frame " + frame);
      System.out.print("    ");
      { Stella_Object arg = null;
        Vector vector000 = currentpatternrecord.variableBindings;
        int index000 = 0;
        int length000 = vector000.length();

        for (;index000 < length000; index000 = index000 + 1) {
          arg = (vector000.theArray)[index000];
          if (arg != null) {
            System.out.print(arg + " ");
          }
          else {
            System.out.print("_ ");
          }
        }
      }
      System.out.println();
      System.out.println("    " + currentpatternrecord.unbindingStack);
      System.out.println("-------------------------");
    }
  }