.assembly extern System.Windows.Forms { .ver 1:0:3300:0 .publickeytoken=(b7 7a 5c 56 19 34 e0 89) }
.assembly extern System { .ver 1:0:3300:0 .publickeytoken=(b7 7a 5c 56 19 34 e0 89) }
.assembly extern System.Drawing { .ver 1:0:3300:0 .publickeytoken=(b0 3f 5f 7f 11 d5 0a 3a) }
.assembly extern mscorlib { }
.assembly extern mgnat { 
.publickey = (00 24 00 00 04 80 00 00 94 00 00 00 06 02 00 00
      00 24 00 00 52 53 41 31 00 04 00 00 01 00 01 00 
      DB E3 8D 03 7C 12 B3 CA F3 4F 5A AD B6 85 BC 0F 
      41 91 1D 45 0A 03 19 AD BE 89 71 D9 1A 8C F7 F4 
      45 7A 6C 6A 13 77 59 B1 E5 BB 65 F6 03 98 B8 97 
      AB 49 B6 E0 52 EA E7 45 89 69 97 94 25 13 E9 4D 
      CA 52 B5 ED 0E 37 DB 12 B0 B6 EE 43 CB AE 6C 38 
      99 42 07 69 97 F3 17 FA D8 29 1C 49 FA 6E 62 83 
      C9 05 0D 53 2E D9 E0 94 2D 68 DB B1 5E 22 68 52 
      14 D0 A6 A4 E9 52 C3 C1 DA 42 72 7F 22 B5 12 C0 )
.ver 0:0:0:0
 }
.assembly extern mgnatcs { 
.publickey = (00 24 00 00 04 80 00 00 94 00 00 00 06 02 00 00
      00 24 00 00 52 53 41 31 00 04 00 00 01 00 01 00 
      DB E3 8D 03 7C 12 B3 CA F3 4F 5A AD B6 85 BC 0F 
      41 91 1D 45 0A 03 19 AD BE 89 71 D9 1A 8C F7 F4 
      45 7A 6C 6A 13 77 59 B1 E5 BB 65 F6 03 98 B8 97 
      AB 49 B6 E0 52 EA E7 45 89 69 97 94 25 13 E9 4D 
      CA 52 B5 ED 0E 37 DB 12 B0 B6 EE 43 CB AE 6C 38 
      99 42 07 69 97 F3 17 FA D8 29 1C 49 FA 6E 62 83 
      C9 05 0D 53 2E D9 E0 94 2D 68 DB B1 5E 22 68 52 
      14 D0 A6 A4 E9 52 C3 C1 DA 42 72 7F 22 B5 12 C0 )
.ver 0:0:0:0
 }
.class public serializable __AR_test_extension_class
   extends [mgnatcs]mgnat.adalib.Ada_AR {
   .language '{DC5FBC71-139A-4072-826F-E87E4E42CD5F}'
   .method public specialname instance void .ctor() { 
      .maxstack  1
      ldarg 0
      call instance void [mgnatcs]mgnat.adalib.Ada_AR::.ctor()
      ret
   }
   .method public static void .cctor() { 
      .maxstack  0
      ret
   }
}
.assembly extern System.Windows.Forms { .ver 1:0:3300:0 .publickeytoken=(b7 7a 5c 56 19 34 e0 89) }
.assembly extern System { .ver 1:0:3300:0 .publickeytoken=(b7 7a 5c 56 19 34 e0 89) }
.assembly extern System.Drawing { .ver 1:0:3300:0 .publickeytoken=(b0 3f 5f 7f 11 d5 0a 3a) }
.assembly extern mscorlib { }
.assembly extern mgnat { 
.publickey = (00 24 00 00 04 80 00 00 94 00 00 00 06 02 00 00
      00 24 00 00 52 53 41 31 00 04 00 00 01 00 01 00 
      DB E3 8D 03 7C 12 B3 CA F3 4F 5A AD B6 85 BC 0F 
      41 91 1D 45 0A 03 19 AD BE 89 71 D9 1A 8C F7 F4 
      45 7A 6C 6A 13 77 59 B1 E5 BB 65 F6 03 98 B8 97 
      AB 49 B6 E0 52 EA E7 45 89 69 97 94 25 13 E9 4D 
      CA 52 B5 ED 0E 37 DB 12 B0 B6 EE 43 CB AE 6C 38 
      99 42 07 69 97 F3 17 FA D8 29 1C 49 FA 6E 62 83 
      C9 05 0D 53 2E D9 E0 94 2D 68 DB B1 5E 22 68 52 
      14 D0 A6 A4 E9 52 C3 C1 DA 42 72 7F 22 B5 12 C0 )
.ver 0:0:0:0
 }
.assembly extern mgnatcs { 
.publickey = (00 24 00 00 04 80 00 00 94 00 00 00 06 02 00 00
      00 24 00 00 52 53 41 31 00 04 00 00 01 00 01 00 
      DB E3 8D 03 7C 12 B3 CA F3 4F 5A AD B6 85 BC 0F 
      41 91 1D 45 0A 03 19 AD BE 89 71 D9 1A 8C F7 F4 
      45 7A 6C 6A 13 77 59 B1 E5 BB 65 F6 03 98 B8 97 
      AB 49 B6 E0 52 EA E7 45 89 69 97 94 25 13 E9 4D 
      CA 52 B5 ED 0E 37 DB 12 B0 B6 EE 43 CB AE 6C 38 
      99 42 07 69 97 F3 17 FA D8 29 1C 49 FA 6E 62 83 
      C9 05 0D 53 2E D9 E0 94 2D 68 DB B1 5E 22 68 52 
      14 D0 A6 A4 E9 52 C3 C1 DA 42 72 7F 22 B5 12 C0 )
.ver 0:0:0:0
 }
.class public serializable test_extension
   extends [mscorlib]System.Object {
   .language '{DC5FBC71-139A-4072-826F-E87E4E42CD5F}'
   .method public specialname instance void .ctor() { 
      .maxstack  1
      ldarg 0
      call instance void [mscorlib]System.Object::.ctor()
      ret
   }
   .method public static void .cctor() { 
      .maxstack  0
      ret
   }
   .method public static void _elabs() { 
      .maxstack  0
      ret
   }
   .method public static void _elabb() { 
      .maxstack  0
      ret
   }
   .method public static void test_extension() { 
      .maxstack  6
      .locals init([0]class __AR_test_extension_class __AR,
      [1]class extend_dotnet_class.typ form,
      [2]valuetype [System.Drawing]System.Drawing.Size how_big,
      [3]valuetype [System.Drawing]System.Drawing.Size _valtemp,
      [4]unsigned int8[] _str_literal,
      [5]class [mscorlib]System.Exception _exc_var,
      [6]class [mscorlib]System.Object E3b,
      [7]class [mgnatcs]mgnat.adalib.Acc _out_tmp,
      [8]class [mscorlib]System.Exception _exc_var)
      newobj  instance void __AR_test_extension_class::.ctor()
      stloc 0
      .line 11 'c:\\docume~1\\admini~1\\desktop\\downlo~1\\extend~1\\test_extension.adb'
   L1:
   L4:
      .line 12 'c:\\docume~1\\admini~1\\desktop\\downlo~1\\extend~1\\test_extension.adb'
   L5:
      ldnull
      stloc 1
      .line 16 'c:\\docume~1\\admini~1\\desktop\\downlo~1\\extend~1\\test_extension.adb'
   L6:
      newobj  instance void extend_dotnet_class.typ::.ctor()
      stloc 1
      .line 17 'c:\\docume~1\\admini~1\\desktop\\downlo~1\\extend~1\\test_extension.adb'
   L8:
      ldloca 3
      ldc.i4 400
      ldc.i4 400
      call instance void [System.Drawing]System.Drawing.Size::.ctor(int32, int32)
      ldloc 3
      stloc 2
      .line 20 'c:\\docume~1\\admini~1\\desktop\\downlo~1\\extend~1\\test_extension.adb'
   L9:
      ldloc 1
      ldloc 2
      callvirt instance void [System.Windows.Forms]System.Windows.Forms.Form::set_Size(valuetype [System.Drawing]System.Drawing.Size)
      .line 22 'c:\\docume~1\\admini~1\\desktop\\downlo~1\\extend~1\\test_extension.adb'
   L10:
      ldloc 1
      ldc.i4.5
      newarr unsigned int8
      stloc 4
      ldstr "hello"
      ldc.i4.0
      ldc.i4.5
      ldloc 4
      ldc.i4.0
      call void [mgnatcs]mgnat.adalib.GNAT_libc::getBytes(class [mscorlib]System.String, int32, int32, unsigned int8[], int32)
      ldloc 4
      ldc.i4.1
      ldc.i4.5
      callvirt instance void extend_dotnet_class.typ::set_title(unsigned int8[], int32, int32)
      .line 23 'c:\\docume~1\\admini~1\\desktop\\downlo~1\\extend~1\\test_extension.adb'
   L11:
      ldloc 1
      call void [System.Windows.Forms]System.Windows.Forms.Application::Run(class [System.Windows.Forms]System.Windows.Forms.Form)
      .line 23 'c:\\docume~1\\admini~1\\desktop\\downlo~1\\extend~1\\test_extension.adb'
   L12:
      ldloc 0
      call void test_extension::B1b__clean(class __AR_test_extension_class)
      leave Return
      leave L14
   L13:
   L15:
      stloc 5
      .line 11 'c:\\docume~1\\admini~1\\desktop\\downlo~1\\extend~1\\test_extension.adb'
   L17:
      ldsfld class [mgnat]system.soft_links.special_eo_call [mgnat]system.soft_links_pkg::update_exception
      ldloc 5
      callvirt instance void [mgnat]system.soft_links.special_eo_call::Invoke(class [mscorlib]System.Object)
      .line 11 'c:\\docume~1\\admini~1\\desktop\\downlo~1\\extend~1\\test_extension.adb'
   L18:
      ldnull
      stloc 6
      .line 11 'c:\\docume~1\\admini~1\\desktop\\downlo~1\\extend~1\\test_extension.adb'
   L20:
      newobj  instance void [mgnatcs]mgnat.adalib.Acc::.ctor()
      stloc 7
      ldloc 7
      ldsfld class [mgnat]system.soft_links.get_eoa_call [mgnat]system.soft_links_pkg::get_current_excep
      callvirt instance class [mgnatcs]mgnat.adalib.Acc [mgnat]system.soft_links.get_eoa_call::Invoke()
      ldfld class [mscorlib]System.Object [mgnatcs]mgnat.adalib.Acc::all
      call void [mgnat]ada.exceptions_pkg::save_occurrence(class [mgnatcs]mgnat.adalib.Acc, class [mscorlib]System.Object)
      ldloc 7
      ldfld class [mscorlib]System.Object [mgnatcs]mgnat.adalib.Acc::all
      stloc 6
      .line 11 'c:\\docume~1\\admini~1\\desktop\\downlo~1\\extend~1\\test_extension.adb'
   L21:
      ldloc 0
      call void test_extension::B1b__clean(class __AR_test_extension_class)
      .line 11 'c:\\docume~1\\admini~1\\desktop\\downlo~1\\extend~1\\test_extension.adb'
   L22:
      ldloc 6
      call void [mgnatcs]mgnat.adalib.GNAT_libc::reraise_occurrence_no_defer(class [mscorlib]System.Object)
   L23:
      .line 11 'c:\\docume~1\\admini~1\\desktop\\downlo~1\\extend~1\\test_extension.adb'
   L24:
      ldloc 0
      call void test_extension::B1b__clean(class __AR_test_extension_class)
      leave Return
      leave L14
   L16:
   L14:
      ldloc 0
      call void test_extension::B1b__clean(class __AR_test_extension_class)
      newobj  instance void [mgnatcs]mgnat.adalib.program_error::.ctor()
      throw
      .try L4 to L13
         catch [mscorlib]System.Exception
            handler L15 to L16
Return:
      ret
   }
   .method public static void B1b__clean(class __AR_test_extension_class __AR_SL) { 
      .maxstack  1
      .locals init([0]class [mscorlib]System.Exception _exc_var)
   L2:
      ret
   L3:
      newobj  instance void [mgnatcs]mgnat.adalib.program_error::.ctor()
      throw
   }
   .method public static void main(class [mscorlib]System.String[] args) { 
      .entrypoint
      .maxstack  1
      ldarg 0
      stsfld class [mscorlib]System.String[] [mgnatcs]mgnat.adalib.GNAT_libc::gnat_argv
      ldstr "test_extension"
      stsfld class [mscorlib]System.String [mgnatcs]mgnat.adalib.GNAT_libc::command_name
      call void ada_test_extension_pkg::adainit()
      call void test_extension::test_extension()
      call void ada_test_extension_pkg::adafinal()
      ret
   }
}
