let msvc = {
(* Generated by code in cil/src/machdep.c *)
         version_major    = 4;
         version_minor    = 0;
         version          = "4.0.1 (Apple Computer, Inc. build 5367)";
         sizeof_short     = 2;
         sizeof_int       = 4;
         sizeof_long      = 4;
         sizeof_longlong  = 8;
         sizeof_ptr       = 4;
         sizeof_enum      = 4;
         sizeof_float     = 4;
         sizeof_double    = 8;
         enum_are_signed  = true;
         sizeof_longdouble  = 16;
         sizeof_void      = 1;
         sizeof_fun       = 1;
         size_t = "unsigned long";
         wchar_t = "int";
         ptrdiff_t = "int";
         alignof_short = 2;
         alignof_int = 4;
         alignof_long = 4;
         alignof_longlong = 4;
         alignof_ptr = 4;
         alignof_enum = 4;
         alignof_float = 4;
         alignof_double = 4;
         alignof_longdouble = 16;
         alignof_str = 1;
         alignof_fun = 4;
         alignof_char_array = 1;
         char_is_unsigned = false;
         const_string_literals = true;
         little_endian = false;
         underscore_name = true ;
}