UnderlyingType != TypeManager.short_type &&
UnderlyingType != TypeManager.ushort_type &&
UnderlyingType != TypeManager.byte_type &&
+ UnderlyingType != TypeManager.char_type &&
UnderlyingType != TypeManager.sbyte_type) {
Report.Error (1008, Location,
- "Type byte, sbyte, short, ushort, int, uint, " +
+ "Type byte, sbyte, short, char, ushort, int, uint, " +
"long, or ulong expected (got: " +
TypeManager.CSharpName (UnderlyingType) + ")");
return null;
}
if (IsTopLevel) {
+ if (TypeManager.NamespaceClash (Name))
+ return null;
+
ModuleBuilder builder = CodeGen.ModuleBuilder;
TypeBuilder = builder.DefineType (Name, attr, TypeManager.enum_type);
if (e is IntConstant || e is UIntConstant || e is LongConstant ||
e is ByteConstant || e is SByteConstant || e is ShortConstant ||
- e is UShortConstant || e is ULongConstant || e is EnumConstant)
+ e is UShortConstant || e is ULongConstant || e is EnumConstant ||
+ e is CharConstant)
return true;
else
return false;
return false;
}
+ //
+ // Horrible, horrible. But there is no other way we can pass the EmitContext
+ // to the recursive definition triggered by the evaluation of a forward
+ // expression
+ //
+ static EmitContext current_ec = null;
+
/// <summary>
/// This is used to lookup the value of an enum member. If the member is undefined,
/// it attempts to define it and return its value
/// </summary>
public object LookupEnumValue (EmitContext ec, string name, Location loc)
{
+
object default_value = null;
Constant c = null;
Location m_loc = (Mono.CSharp.Location)
member_to_location [n];
in_transit.Add (name, true);
+
+ EmitContext old_ec = current_ec;
+ current_ec = ec;
+
default_value = LookupEnumValue (ec, n, m_loc);
+
+ current_ec = old_ec;
+
in_transit.Remove (name);
if (default_value == null)
return null;
bool old = ec.InEnumContext;
ec.InEnumContext = true;
in_transit.Add (name, true);
+
+ EmitContext old_ec = current_ec;
+ current_ec = ec;
val = val.Resolve (ec);
+ current_ec = old_ec;
+
in_transit.Remove (name);
ec.InEnumContext = old;
Type etype = TypeManager.EnumToUnderlying (c.Type);
if (!ImplicitConversionExists (etype, UnderlyingType)){
- Expression.Error_CannotConvertImplicit (
+ Convert.Error_CannotImplicitConversion (
loc, c.Type, UnderlyingType);
return null;
}
FieldAttributes attr = FieldAttributes.Public | FieldAttributes.Static
| FieldAttributes.Literal;
- FieldBuilder fb = TypeBuilder.DefineField (name, UnderlyingType, attr);
+ FieldBuilder fb = TypeBuilder.DefineField (name, TypeBuilder, attr);
- try {
- default_value = TypeManager.ChangeType (default_value, UnderlyingType);
- } catch {
+ bool fail;
+ default_value = TypeManager.ChangeType (default_value, UnderlyingType, out fail);
+ if (fail){
Error_ConstantValueCannotBeConverted (c, loc);
return null;
}
//
// Now apply attributes
//
- Attribute.ApplyAttributes (ec, fb, fb, (Attributes) member_to_attributes [name], loc);
+ Attribute.ApplyAttributes (ec, fb, fb, (Attributes) member_to_attributes [name]);
return default_value;
}
if (default_value == null)
return true;
-
} else {
+ if (name == "value__"){
+ Report.Error (76, loc, "The name `value__' is reserved for enumerations");
+ return false;
+ }
+
FieldBuilder fb = TypeBuilder.DefineField (
- name, UnderlyingType, attr);
+ name, TypeBuilder, attr);
if (default_value == null) {
Report.Error (543, loc, "Enumerator value for '" + name + "' is too large to " +
"fit in its type");
return false;
}
-
- try {
- default_value = TypeManager.ChangeType (default_value, UnderlyingType);
- } catch {
+
+ bool fail;
+ default_value = TypeManager.ChangeType (default_value, UnderlyingType, out fail);
+ if (fail){
Error_ConstantValueCannotBeConverted (default_value, loc);
return false;
}
//
// Apply attributes on the enum member
//
- Attribute.ApplyAttributes (ec, fb, fb, (Attributes) member_to_attributes [name], loc);
+ Attribute.ApplyAttributes (ec, fb, fb, (Attributes) member_to_attributes [name]);
}
default_value = GetNextDefaultValue (default_value);
}
- Attribute.ApplyAttributes (ec, TypeBuilder, this, OptAttributes, Location);
+ Attribute.ApplyAttributes (ec, TypeBuilder, this, OptAttributes);
return true;
}
ArrayList members = new ArrayList ();
if ((mt & MemberTypes.Field) != 0) {
+ if (criteria is string){
+ if (member_to_value [criteria] == null && current_ec != null){
+ LookupEnumValue (current_ec, (string) criteria, Location.Null);
+ }
+ }
+
foreach (FieldBuilder fb in field_builders)
if (filter (fb, criteria) == true)
members.Add (fb);