package gnu.kawa.functions;
import gnu.bytecode.Type;
import gnu.mapping.*;

public class Convert extends Procedure2
{
  public static final Convert as = new Convert();
  static {
    as.setName("as"); 
    as.setProperty(Procedure.validateApplyKey,
                   "gnu.kawa.functions.CompileMisc:validateApplyConvert");
    as.setProperty(Procedure.compilerXKey,
                   "gnu.kawa.functions.CompileMisc:compileConvert");
  }

  public static Convert getInstance ()
  {
    return as;
  }

  public Object apply2 (Object arg1, Object arg2)
  {
    Type type;
    if (arg1 instanceof Class)
      type = Type.make((Class) arg1);
    else
      type = (Type) arg1;
    return type.coerceFromObject (arg2);
  }

}

@@ -113,11 +113,13 @@
 ure2
-%0A
+ 
 %7B%0A
+  
   pu
@@ -164,16 +164,18 @@
 vert();%0A
+  
   static
@@ -177,16 +177,20 @@
 tatic %7B%0A
+    
     as.s
@@ -204,16 +204,20 @@
 %22as%22); %0A
+    
     as.s
@@ -251,24 +251,28 @@
 teApplyKey,%0A
+    
             
@@ -334,24 +334,28 @@
 vert%22);%0A    
+ 
+   
 as.setProper
@@ -377,24 +377,28 @@
 mpilerXKey,%0A
+    
             
@@ -454,23 +454,27 @@
 vert%22);%0A
+  
   %7D%0A%0A  
+ 
+ 
 public s
@@ -502,16 +502,17 @@
 ance
- 
 ()
-%0A 
  %7B%0A
+    
     
@@ -524,19 +524,23 @@
 n as;%0A  
+ 
+ 
 %7D%0A%0A
+  
   public
@@ -553,17 +553,16 @@
 t apply2
- 
 (Object 
@@ -583,13 +583,15 @@
 rg2)
-%0A 
  %7B%0A
+    
     
@@ -601,16 +601,20 @@
 e type;%0A
+    
     if (
@@ -638,24 +638,30 @@
 lass)%0A      
+     
+ 
 type = Type.
@@ -680,16 +680,20 @@
  arg1);%0A
+    
     else
@@ -695,24 +695,30 @@
  else%0A      
+    
+  
 type = (Type
@@ -725,16 +725,20 @@
 ) arg1;%0A
+    
     retu
@@ -772,13 +772,14 @@
 rg2);%0A  
+  
 %7D
-%0A
 %0A%7D%0A

Re-formatted.