// MiniJava Program:
// ---------------------------------------------------------------------------
// class TestSwap {
//     public static void main(String[] a){
// 	System.out.println((new Pair()).do_it(5,3));
//     }
// }

// class Pair {
//     int left;
//     int right;

//     public int setLeft (int x) { left = x; return 1; }
//     public int setRight (int x) { right = x; return 1; }
//     public int init (int x, int y) { left = x;  right = y; return 1; }

//     public int show () {
// 	System.out.println(left);
// 	System.out.println(right);
// 	return 1;
//     }
     
//     public int swap(){
// 	int tmp;
// 	if (right<left) {
// 	    tmp = left;
// 	    left = right;
// 	    right = tmp;
// 	} else {
// 	    // nothing
// 	}
// 	return 1;
//     }
//    public int do_it(int x, int y) {
//        int q;
//        q = this.init(x,y);
//        q = this.swap();
//        q = this.show();
//        return 1;
//    }
// }
// ---------------------------------------------------------------------------
// NB: hacked to pass 2 commandline arguments as t77 and t78
//     call like this: muHwI Swap3.intm 8 3
// ---------------------------------------------------------------------------

// .................................................. 
// Abstract machine settings:

SET NAME fp = t33
SET NAME rp = t3
SET NAME sp = t30
SET VALUE sz = 12000
SET VALUE hz = 800000
// .................................................. 
// Intermediate code (AFTER canon)
FCT LPair$setRight(REG t1, REG t40) =
{
L7:
MEM((t1+4)) <- t40
t3 <- 1
JUMP L6 [L6]
L6:
}

FCT LPair$setLeft(REG t1, REG t38) =
{
L9:
MEM((t1+8)) <- t38
t3 <- 1
JUMP L8 [L8]
L8:
}

FCT LPair$init(REG t1, REG t42, REG t43) =
{
L11:
MEM((t1+8)) <- t42
MEM((t1+4)) <- t43
t3 <- 1
JUMP L10 [L10]
L10:
}

FCT LPair$swap(REG t1) =
{
L13:
CJUMP (MEM((t1+4))<MEM((t1+8))) ? L3 : L4
L4:
JUMP L5 [L5]
L5:
t3 <- 1
JUMP L12 [L12]
L3:
t46 <- MEM((t1+8))
MEM((t1+8)) <- MEM((t1+4))
MEM((t1+4)) <- t46
JUMP L5 [L5]
L12:
}

FCT LPair$do_it(REG t1, REG t49, REG t50) =
{
L15:
t51 <- CALL LPair$init(t1, t49, t50)
t51 <- CALL LPair$swap(t1)
t51 <- CALL LPair$show(t1)
t3 <- 1
JUMP L14 [L14]
L14:
}

FCT LPair$show(REG t1) =
{
L17:
CALL L_print(MEM((t1+8)))
CALL L_print(MEM((t1+4)))
t3 <- 1
JUMP L16 [L16]
L16:
}

FCT LTestSwap$main(REG t1, REG t77, REG t78) =
//                         ^^^^^^^^^^^^^^^^^  commandline args
{
L19:
t35 <- CALL L_halloc_obj(12)
t36 <- CALL L_init_obj(t35, 12)
t52 <- CALL LPair$do_it(t35, t77, t78)
CALL L_print(t52)
JUMP L18 [L18]
L18:
}