[exdoc] Handle punctuation better in code formatting.
[mono.git] / mono / metadata / sre.c
index 0d4e3865b5db93c92da049507bcc3e19bf4795bb..2d833eacdcbb8b9aaa78b597b11579e793458423 100644 (file)
@@ -1,6 +1,7 @@
-/*
- * sre.c: Routines for creating an image at runtime
- *   and related System.Reflection.Emit icalls
+/**
+ * \file
+ * Routines for creating an image at runtime
+ * and related System.Reflection.Emit icalls
  *   
  * 
  * Author:
@@ -36,8 +37,8 @@
 #include "mono/utils/mono-digest.h"
 #include "mono/utils/w32api.h"
 
-static GENERATE_GET_CLASS_WITH_CACHE (marshal_as_attribute, System.Runtime.InteropServices, "MarshalAsAttribute");
-static GENERATE_GET_CLASS_WITH_CACHE (module_builder, System.Reflection.Emit, "ModuleBuilder");
+static GENERATE_GET_CLASS_WITH_CACHE (marshal_as_attribute, "System.Runtime.InteropServices", "MarshalAsAttribute");
+static GENERATE_GET_CLASS_WITH_CACHE (module_builder, "System.Reflection.Emit", "ModuleBuilder");
 
 static char* string_to_utf8_image_raw (MonoImage *image, MonoString *s, MonoError *error);
 
@@ -90,7 +91,7 @@ string_to_utf8_image_raw (MonoImage *image, MonoString *s_raw, MonoError *error)
        /* FIXME all callers to string_to_utf8_image_raw should use handles */
        HANDLE_FUNCTION_ENTER ();
        char* result = NULL;
-       mono_error_init (error);
+       error_init (error);
        MONO_HANDLE_DCL (MonoString, s);
        result = mono_string_to_utf8_image (image, s, error);
        HANDLE_FUNCTION_RETURN_VAL (result);
@@ -296,7 +297,7 @@ method_encode_clauses (MonoImage *image, MonoDynamicImage *assembly, MonoReflect
 {
        MONO_REQ_GC_UNSAFE_MODE;
 
-       mono_error_init (error);
+       error_init (error);
 
        MonoExceptionClause *clauses;
        MonoExceptionClause *clause;
@@ -454,7 +455,7 @@ mono_reflection_methodbuilder_from_method_builder (ReflectionMethodBuilder *rmb,
 {
        MONO_REQ_GC_UNSAFE_MODE;
 
-       mono_error_init (error);
+       error_init (error);
        memset (rmb, 0, sizeof (ReflectionMethodBuilder));
 
        rmb->ilgen = mb->ilgen;
@@ -501,7 +502,7 @@ mono_reflection_methodbuilder_from_ctor_builder (ReflectionMethodBuilder *rmb, M
 
        const char *name = mb->attrs & METHOD_ATTRIBUTE_STATIC ? ".cctor": ".ctor";
 
-       mono_error_init (error);
+       error_init (error);
 
        memset (rmb, 0, sizeof (ReflectionMethodBuilder));
 
@@ -848,7 +849,7 @@ mono_image_get_sighelper_token (MonoDynamicImage *assembly, MonoReflectionSigHel
        MonoDynamicTable *table;
        guint32 *values;
 
-       mono_error_init (error);
+       error_init (error);
 
        table = &assembly->tables [MONO_TABLE_STANDALONESIG];
        idx = table->next_idx ++;
@@ -898,7 +899,7 @@ mono_image_get_array_token (MonoDynamicImage *assembly, MonoReflectionArrayMetho
        MonoMethodSignature *sig = NULL;
        char *name = NULL;
 
-       mono_error_init (error);
+       error_init (error);
 
        MonoArrayHandle parameters = MONO_HANDLE_NEW_GET (MonoArray, m, parameters);
        guint32 nparams = mono_array_handle_length (parameters);
@@ -1066,7 +1067,7 @@ mono_image_create_method_token (MonoDynamicImage *assembly, MonoObjectHandle obj
 {
        guint32 token = 0;
 
-       mono_error_init (error);
+       error_init (error);
 
        MonoClass *klass = mono_handle_class (obj);
        if (strcmp (klass->name, "MonoMethod") == 0 || strcmp (klass->name, "MonoCMethod") == 0) {
@@ -1107,7 +1108,7 @@ mono_image_create_token (MonoDynamicImage *assembly, MonoObjectHandle obj,
 {
        guint32 token = 0;
 
-       mono_error_init (error);
+       error_init (error);
 
        MonoClass *klass = mono_handle_class (obj);
 
@@ -1303,7 +1304,7 @@ register_module (MonoDomain *domain, MonoReflectionModuleBuilderHandle res, Mono
 static gboolean
 image_module_basic_init (MonoReflectionModuleBuilderHandle moduleb, MonoError *error)
 {
-       mono_error_init (error);
+       error_init (error);
        MonoDomain *domain = MONO_HANDLE_DOMAIN (moduleb);
        MonoDynamicImage *image = MONO_HANDLE_GETVAL (moduleb, dynamic_image);
        MonoReflectionAssemblyBuilderHandle ab = MONO_HANDLE_NEW (MonoReflectionAssemblyBuilder, NULL);
@@ -1351,7 +1352,7 @@ image_module_basic_init (MonoReflectionModuleBuilderHandle moduleb, MonoError *e
 static gboolean
 mono_image_module_basic_init (MonoReflectionModuleBuilderHandle moduleb, MonoError *error)
 {
-       mono_error_init (error);
+       error_init (error);
        return image_module_basic_init (moduleb, error);
 }
 
@@ -1379,7 +1380,7 @@ MonoType*
 mono_type_array_get_and_resolve (MonoArrayHandle array, int idx, MonoError *error)
 {
        HANDLE_FUNCTION_ENTER();
-       mono_error_init (error);
+       error_init (error);
        MonoReflectionTypeHandle t = MONO_HANDLE_NEW (MonoReflectionType, NULL);
        MONO_HANDLE_ARRAY_GETREF (t, array, idx);
        MonoType *result = mono_reflection_type_handle_mono_type (t, error);
@@ -1466,7 +1467,7 @@ mono_reflection_type_get_underlying_system_type (MonoReflectionTypeHandle t, Mon
        static MonoMethod *method_get_underlying_system_type = NULL;
        HANDLE_FUNCTION_ENTER ();
 
-       mono_error_init (error);
+       error_init (error);
 
        if (!method_get_underlying_system_type)
                method_get_underlying_system_type = mono_class_get_method_from_name (mono_defaults.systemtype_class, "get_UnderlyingSystemType", 0);
@@ -1487,7 +1488,7 @@ MonoType*
 mono_reflection_type_get_handle (MonoReflectionType* ref_raw, MonoError *error)
 {
        HANDLE_FUNCTION_ENTER ();
-       mono_error_init (error);
+       error_init (error);
        MONO_HANDLE_DCL (MonoReflectionType, ref);
        MonoType *result = mono_reflection_type_handle_mono_type (ref, error);
        HANDLE_FUNCTION_RETURN_VAL (result);
@@ -1539,7 +1540,7 @@ static MonoType*
 reflection_param_handle_mono_type (MonoReflectionGenericParamHandle ref_gparam, MonoError *error)
 {
        HANDLE_FUNCTION_ENTER ();
-       mono_error_init (error);
+       error_init (error);
        MonoType *result = NULL;
 
 
@@ -1596,7 +1597,7 @@ static MonoType*
 mono_type_array_get_and_resolve_raw (MonoArray* array_raw, int idx, MonoError *error)
 {
        HANDLE_FUNCTION_ENTER(); /* FIXME callers of mono_type_array_get_and_resolve_raw should use handles */
-       mono_error_init (error);
+       error_init (error);
        MONO_HANDLE_DCL (MonoArray, array);
        MonoType *result = mono_type_array_get_and_resolve (array, idx, error);
        HANDLE_FUNCTION_RETURN_VAL (result);
@@ -1606,7 +1607,7 @@ MonoType*
 mono_reflection_type_handle_mono_type (MonoReflectionTypeHandle ref, MonoError *error)
 {
        HANDLE_FUNCTION_ENTER ();
-       mono_error_init (error);
+       error_init (error);
 
        MonoType* result = NULL;
 
@@ -1694,7 +1695,7 @@ parameters_to_signature (MonoImage *image, MonoArrayHandle parameters, MonoError
        MonoMethodSignature *sig;
        int count, i;
 
-       mono_error_init (error);
+       error_init (error);
 
        count = MONO_HANDLE_IS_NULL (parameters) ? 0 : mono_array_handle_length (parameters);
 
@@ -1718,7 +1719,7 @@ static MonoMethodSignature*
 ctor_builder_to_signature (MonoImage *image, MonoReflectionCtorBuilderHandle ctor, MonoError *error) {
        MonoMethodSignature *sig;
 
-       mono_error_init (error);
+       error_init (error);
 
        sig = parameters_to_signature (image, MONO_HANDLE_NEW_GET (MonoArray, ctor, parameters), error);
        return_val_if_nok (error, NULL);
@@ -1741,7 +1742,7 @@ static MonoMethodSignature*
 method_builder_to_signature (MonoImage *image, MonoReflectionMethodBuilderHandle method, MonoError *error) {
        MonoMethodSignature *sig;
 
-       mono_error_init (error);
+       error_init (error);
 
        sig = parameters_to_signature (image, MONO_HANDLE_NEW_GET(MonoArray, method, parameters), error);
        return_val_if_nok (error, NULL);
@@ -1766,7 +1767,7 @@ dynamic_method_to_signature (MonoReflectionDynamicMethodHandle method, MonoError
        HANDLE_FUNCTION_ENTER ();
        MonoMethodSignature *sig = NULL;
 
-       mono_error_init (error);
+       error_init (error);
 
        sig = parameters_to_signature (NULL, MONO_HANDLE_NEW_GET (MonoArray, method, parameters), error);
        if (!is_ok (error))
@@ -1791,7 +1792,7 @@ leave:
 static void
 get_prop_name_and_type (MonoObject *prop, char **name, MonoType **type, MonoError *error)
 {
-       mono_error_init (error);
+       error_init (error);
        MonoClass *klass = mono_object_class (prop);
        if (strcmp (klass->name, "PropertyBuilder") == 0) {
                MonoReflectionPropertyBuilder *pb = (MonoReflectionPropertyBuilder *)prop;
@@ -1811,7 +1812,7 @@ get_prop_name_and_type (MonoObject *prop, char **name, MonoType **type, MonoErro
 static void
 get_field_name_and_type (MonoObject *field, char **name, MonoType **type, MonoError *error)
 {
-       mono_error_init (error);
+       error_init (error);
        MonoClass *klass = mono_object_class (field);
        if (strcmp (klass->name, "FieldBuilder") == 0) {
                MonoReflectionFieldBuilder *fb = (MonoReflectionFieldBuilder *)field;
@@ -1923,7 +1924,7 @@ encode_cattr_value (MonoAssembly *assembly, char *buffer, char *p, char **retbuf
 {
        MonoTypeEnum simple_type;
        
-       mono_error_init (error);
+       error_init (error);
        if ((p-buffer) + 10 >= *buflen) {
                char *newbuf;
                *buflen *= 2;
@@ -2177,7 +2178,7 @@ encode_named_val (MonoReflectionAssembly *assembly, char *buffer, char *p, char
 {
        int len;
 
-       mono_error_init (error);
+       error_init (error);
 
        /* Preallocate a large enough buffer */
        if (type->type == MONO_TYPE_VALUETYPE && type->data.klass->enumtype) {
@@ -2216,16 +2217,15 @@ encode_named_val (MonoReflectionAssembly *assembly, char *buffer, char *p, char
 
 /**
  * mono_reflection_get_custom_attrs_blob:
- * @ctor: custom attribute constructor
- * @ctorArgs: arguments o the constructor
- * @properties:
- * @propValues:
- * @fields:
- * @fieldValues:
- * 
+ * \param ctor custom attribute constructor
+ * \param ctorArgs arguments o the constructor
+ * \param properties
+ * \param propValues
+ * \param fields
+ * \param fieldValues
  * Creates the blob of data that needs to be saved in the metadata and that represents
- * the custom attributed described by @ctor, @ctorArgs etc.
- * Returns: a Byte array representing the blob of data.
+ * the custom attributed described by \p ctor, \p ctorArgs etc.
+ * \returns a \c Byte array representing the blob of data.
  */
 MonoArray*
 mono_reflection_get_custom_attrs_blob (MonoReflectionAssembly *assembly, MonoObject *ctor, MonoArray *ctorArgs, MonoArray *properties, MonoArray *propValues, MonoArray *fields, MonoArray* fieldValues) 
@@ -2238,17 +2238,16 @@ mono_reflection_get_custom_attrs_blob (MonoReflectionAssembly *assembly, MonoObj
 
 /**
  * mono_reflection_get_custom_attrs_blob_checked:
- * @ctor: custom attribute constructor
- * @ctorArgs: arguments o the constructor
- * @properties:
- * @propValues:
- * @fields:
- * @fieldValues:
- * @error: set on error
- * 
+ * \param ctor custom attribute constructor
+ * \param ctorArgs arguments o the constructor
+ * \param properties
+ * \param propValues
+ * \param fields
+ * \param fieldValues
+ * \param error set on error
  * Creates the blob of data that needs to be saved in the metadata and that represents
- * the custom attributed described by @ctor, @ctorArgs etc.
- * Returns: a Byte array representing the blob of data.  On failure returns NULL and sets @error.
+ * the custom attributed described by \p ctor, \p ctorArgs etc.
+ * \returns a \c Byte array representing the blob of data.  On failure returns NULL and sets \p error.
  */
 MonoArray*
 mono_reflection_get_custom_attrs_blob_checked (MonoReflectionAssembly *assembly, MonoObject *ctor, MonoArray *ctorArgs, MonoArray *properties, MonoArray *propValues, MonoArray *fields, MonoArray* fieldValues, MonoError *error) 
@@ -2259,7 +2258,7 @@ mono_reflection_get_custom_attrs_blob_checked (MonoReflectionAssembly *assembly,
        char *buffer, *p;
        guint32 buflen, i;
 
-       mono_error_init (error);
+       error_init (error);
 
        if (strcmp (ctor->vtable->klass->name, "MonoCMethod")) {
                /* sig is freed later so allocate it in the heap */
@@ -2351,7 +2350,7 @@ static gboolean
 reflection_setup_internal_class (MonoReflectionTypeBuilderHandle ref_tb, MonoError *error)
 {
        HANDLE_FUNCTION_ENTER ();
-       mono_error_init (error);
+       error_init (error);
 
        mono_loader_lock ();
 
@@ -2493,7 +2492,7 @@ reflection_create_generic_class (MonoReflectionTypeBuilderHandle ref_tb, MonoErr
 {
        HANDLE_FUNCTION_ENTER ();
 
-       mono_error_init (error);
+       error_init (error);
 
        reflection_setup_internal_class (ref_tb, error);
        if (!is_ok (error))
@@ -2548,7 +2547,7 @@ mono_marshal_spec_from_builder (MonoImage *image, MonoAssembly *assembly,
 {
        MonoMarshalSpec *res;
 
-       mono_error_init (error);
+       error_init (error);
 
        res = image_g_new0 (image, MonoMarshalSpec, 1);
        res->native = (MonoMarshalNative)minfo->type;
@@ -2604,7 +2603,7 @@ MonoReflectionMarshalAsAttributeHandle
 mono_reflection_marshal_as_attribute_from_marshal_spec (MonoDomain *domain, MonoClass *klass,
                                                        MonoMarshalSpec *spec, MonoError *error)
 {
-       mono_error_init (error);
+       error_init (error);
        
        MonoReflectionMarshalAsAttributeHandle minfo = MONO_HANDLE_NEW (MonoReflectionMarshalAsAttribute, mono_object_new_checked (domain, mono_class_get_marshal_as_attribute_class (), error));
        if (!is_ok (error))
@@ -2676,7 +2675,7 @@ reflection_methodbuilder_to_mono_method (MonoClass *klass,
        gboolean dynamic;
        int i;
 
-       mono_error_init (error);
+       error_init (error);
        /*
         * Methods created using a MethodBuilder should have their memory allocated
         * inside the image mempool, while dynamic methods should have their memory
@@ -2976,7 +2975,7 @@ methodbuilder_to_mono_method (MonoClass *klass, MonoReflectionMethodBuilderHandl
        ReflectionMethodBuilder rmb;
        MonoMethodSignature *sig;
 
-       mono_error_init (error);
+       error_init (error);
 
        mono_loader_lock ();
 
@@ -3004,7 +3003,7 @@ static MonoMethod*
 methodbuilder_to_mono_method_raw (MonoClass *klass, MonoReflectionMethodBuilder* mb_raw, MonoError *error)
 {
        HANDLE_FUNCTION_ENTER (); /* FIXME change callers of methodbuilder_to_mono_method_raw to use handles */
-       mono_error_init (error);
+       error_init (error);
        MONO_HANDLE_DCL (MonoReflectionMethodBuilder, mb);
        MonoMethod *result = methodbuilder_to_mono_method (klass, mb, error);
        HANDLE_FUNCTION_RETURN_VAL (result);
@@ -3032,7 +3031,7 @@ fix_partial_generic_class (MonoClass *klass, MonoError *error)
        MonoClass *gklass = mono_class_get_generic_class (klass)->container_class;
        int i;
 
-       mono_error_init (error);
+       error_init (error);
 
        if (klass->wastypebuilder)
                return TRUE;
@@ -3121,7 +3120,7 @@ ensure_generic_class_runtime_vtable (MonoClass *klass, MonoError *error)
 {
        MonoClass *gklass = mono_class_get_generic_class (klass)->container_class;
 
-       mono_error_init (error);
+       error_init (error);
 
        if (!ensure_runtime_vtable (gklass, error))
                return FALSE;
@@ -3143,7 +3142,7 @@ ensure_runtime_vtable (MonoClass *klass, MonoError *error)
        MonoReflectionTypeBuilder *tb = (MonoReflectionTypeBuilder *)mono_class_get_ref_info_raw (klass); /* FIXME use handles */
        int i, num, j;
 
-       mono_error_init (error);
+       error_init (error);
 
        if (!image_is_dynamic (klass->image) || (!tb && !mono_class_is_ginst (klass)) || klass->wastypebuilder)
                return TRUE;
@@ -3222,7 +3221,7 @@ ensure_runtime_vtable (MonoClass *klass, MonoError *error)
 static MonoMethod*
 mono_reflection_method_get_handle (MonoObject *method, MonoError *error)
 {
-       mono_error_init (error);
+       error_init (error);
        MonoClass *klass = mono_object_class (method);
        if (is_sr_mono_method (klass)) {
                MonoReflectionMethod *sr_method = (MonoReflectionMethod*)method;
@@ -3252,7 +3251,7 @@ mono_reflection_get_dynamic_overrides (MonoClass *klass, MonoMethod ***overrides
        int i, j, onum;
        MonoReflectionMethod *m;
 
-       mono_error_init (error);
+       error_init (error);
        *overrides = NULL;
        *num_overrides = 0;
 
@@ -3324,7 +3323,7 @@ typebuilder_setup_fields (MonoClass *klass, MonoError *error)
        int fcount = tb->num_fields;
        mono_class_set_field_count (klass, fcount);
 
-       mono_error_init (error);
+       error_init (error);
 
        if (tb->class_size) {
                packing_size = tb->packing_size;
@@ -3399,7 +3398,7 @@ typebuilder_setup_properties (MonoClass *klass, MonoError *error)
        MonoClassPropertyInfo *info;
        int i;
 
-       mono_error_init (error);
+       error_init (error);
 
        info = mono_class_get_property_info (klass);
        if (!info) {
@@ -3453,7 +3452,7 @@ typebuilder_setup_events (MonoClass *klass, MonoError *error)
        MonoClassEventInfo *info;
        int i;
 
-       mono_error_init (error);
+       error_init (error);
 
        info = mono_class_alloc0 (klass, sizeof (MonoClassEventInfo));
        mono_class_set_event_info (klass, info);
@@ -3529,7 +3528,7 @@ remove_instantiations_of_and_ensure_contents (gpointer key,
 MonoReflectionTypeHandle
 ves_icall_TypeBuilder_create_runtime_class (MonoReflectionTypeBuilderHandle ref_tb, MonoError *error)
 {
-       mono_error_init (error);
+       error_init (error);
 
        reflection_create_generic_class (ref_tb, error);
        mono_error_assert_ok (error);
@@ -3704,7 +3703,7 @@ reflection_create_dynamic_method (MonoReflectionDynamicMethodHandle ref_mb, Mono
        GSList *l;
        int i;
 
-       mono_error_init (error);
+       error_init (error);
 
        if (mono_runtime_is_shutting_down ()) {
                mono_error_set_generic_error (error, "System", "InvalidOperationException", "");
@@ -3843,7 +3842,7 @@ mono_reflection_lookup_signature (MonoImage *image, MonoMethod *method, guint32
        MonoMethodSignature *sig;
        g_assert (image_is_dynamic (image));
 
-       mono_error_init (error);
+       error_init (error);
 
        sig = (MonoMethodSignature *)g_hash_table_lookup (((MonoDynamicImage*)image)->vararg_aux_hash, GUINT_TO_POINTER (token));
        if (sig)
@@ -3863,7 +3862,7 @@ mono_reflection_lookup_signature (MonoImage *image, MonoMethod *method, guint32
 static void
 ensure_complete_type (MonoClass *klass, MonoError *error)
 {
-       mono_error_init (error);
+       error_init (error);
 
        if (image_is_dynamic (klass->image) && !klass->wastypebuilder && mono_class_has_ref_info (klass)) {
                MonoReflectionTypeBuilder *tb = (MonoReflectionTypeBuilder *)mono_class_get_ref_info_raw (klass); /* FIXME use handles */
@@ -3892,7 +3891,7 @@ mono_reflection_resolve_object (MonoImage *image, MonoObject *obj, MonoClass **h
        MonoClass *oklass = obj->vtable->klass;
        gpointer result = NULL;
 
-       mono_error_init (error);
+       error_init (error);
 
        if (strcmp (oklass->name, "String") == 0) {
                result = mono_string_intern_checked ((MonoString*)obj, error);
@@ -4120,7 +4119,7 @@ mono_image_create_token (MonoDynamicImage *assembly, MonoObjectHandle obj,
 void
 mono_reflection_get_dynamic_overrides (MonoClass *klass, MonoMethod ***overrides, int *num_overrides, MonoError *error)
 {
-       mono_error_init (error);
+       error_init (error);
        *overrides = NULL;
        *num_overrides = 0;
 }
@@ -4135,13 +4134,13 @@ ves_icall_TypeBuilder_create_runtime_class (MonoReflectionTypeBuilderHandle tb,
 void 
 ves_icall_DynamicMethod_create_dynamic_method (MonoReflectionDynamicMethodHandle mb, MonoError *error)
 {
-       mono_error_init (error);
+       error_init (error);
 }
 
 MonoType*
 mono_reflection_type_get_handle (MonoReflectionType* ref, MonoError *error)
 {
-       mono_error_init (error);
+       error_init (error);
        if (!ref)
                return NULL;
        return ref->type;
@@ -4150,7 +4149,7 @@ mono_reflection_type_get_handle (MonoReflectionType* ref, MonoError *error)
 MonoType*
 mono_reflection_type_handle_mono_type (MonoReflectionTypeHandle ref, MonoError *error)
 {
-       mono_error_init (error);
+       error_init (error);
        if (MONO_HANDLE_IS_NULL (ref))
                return NULL;
        return MONO_HANDLE_GETVAL (ref, type);
@@ -4169,7 +4168,7 @@ mono_sre_generic_param_table_entry_free (GenericParamTableEntry *entry)
 gint32
 ves_icall_ModuleBuilder_getToken (MonoReflectionModuleBuilderHandle mb, MonoObjectHandle obj, gboolean create_open_instance, MonoError *error)
 {
-       mono_error_init (error);
+       error_init (error);
        if (MONO_HANDLE_IS_NULL (obj)) {
                mono_error_set_argument_null (error, "obj", "");
                return 0;
@@ -4183,7 +4182,7 @@ ves_icall_ModuleBuilder_getMethodToken (MonoReflectionModuleBuilderHandle mb,
                                        MonoArrayHandle opt_param_types,
                                        MonoError *error)
 {
-       mono_error_init (error);
+       error_init (error);
        if (MONO_HANDLE_IS_NULL (method)) {
                mono_error_set_argument_null (error, "method", "");
                return 0;
@@ -4211,7 +4210,7 @@ ves_icall_ModuleBuilder_build_metadata (MonoReflectionModuleBuilder *mb)
 void
 ves_icall_ModuleBuilder_RegisterToken (MonoReflectionModuleBuilderHandle mb, MonoObjectHandle obj, guint32 token, MonoError *error)
 {
-       mono_error_init (error);
+       error_init (error);
        mono_dynamic_image_register_token (MONO_HANDLE_GETVAL (mb, dynamic_image), token, obj);
 }
 
@@ -4254,7 +4253,7 @@ ves_icall_EnumBuilder_setup_enum_type (MonoReflectionType *enumtype,
 void
 ves_icall_ModuleBuilder_basic_init (MonoReflectionModuleBuilderHandle moduleb, MonoError *error)
 {
-       mono_error_init (error);
+       error_init (error);
        mono_image_module_basic_init (moduleb, error);
 }