samples/chrtest.wsl

   1 C:" This file automatically converted from microjava bytecode";
   2 C:" with mjc2wsl v 0.1";
   3 VAR < tempa := 0, tempb := 0, tempres :=0,
   4         stack := < >, t_e_m_p := 0 > :
   5
   6 C:"#51";
   7 C:" enter";
   8 C:"#22";
   9 stack := <10 > ++ stack;
  10 C:"#22";
  11 stack := <15 > ++ stack;
  12 C:"#56";
  13 tempa := HEAD(stack); stack := TAIL(stack);
  14 PRINT(tempa);
  15 C:"#22";
  16 stack := <97 > ++ stack;
  17 C:"#20";
  18 stack := <5 > ++ stack;
  19 C:"#54";
  20 tempa := HEAD(stack); stack := TAIL(stack);
  21 PRINT(tempa);
  22 C:"#15";
  23 stack := <0 > ++ stack;
  24 C:"#38";
  25 C:"!unknown op error: 38";
  26 C:"#15";
  27 stack := <0 > ++ stack;
  28 C:"#54";
  29 tempa := HEAD(stack); stack := TAIL(stack);
  30 PRINT(tempa);
  31 C:"#52";
  32 C:"!unknown op error: 52";
  33 C:"#50";
  34 C:"!unknown op error: 50";
  35 SKIP
  36 ENDVAR