/// <summary>
/// Makes a new static field slot. Type is ignored. If we ever change ignoring type then we
/// need to make BuiltinWrapper generic and update StaticFieldBuiltinSlot to get the correct
/// type.
/// </summary>
public override Slot MakeSlot(SymbolId name, Type type)
{
StaticFieldSlot fs;
object builtin;
if (!fields.TryGetValue(name, out fs)) {
if (!TypeCache.Builtin.TryGetSlot(DefaultContext.Default, SymbolTable.StringToId(name.GetString()), out builtin)) {
// name does not collide w/ a built-in name, define a real field.
FieldBuilder fb = typeGen.myType.DefineField(name.GetString(), typeof(object), FieldAttributes.Public | FieldAttributes.Static);
fs = new StaticFieldSlot(fb);
} else {
// name collides w/ a built-in name. Our field becomes strongly typed to
// BuiltinWrapper. We then return a
// StaticFieldBuiltinSlot which checks the value to see if it's a built-in or
// not.
FieldBuilder fb = typeGen.myType.DefineField(name.GetString(), typeof(BuiltinWrapper), FieldAttributes.Public | FieldAttributes.Static);
fs = new StaticFieldBuiltinSlot(fb);
}
fields[name] = fs;
}
return fs;
}
public Slot GetOrMakeConstant(object value, Type type)
{
Slot ret;
if (constants.TryGetValue(value, out ret)) return ret;
// Create a name like "c$3.141592$712"
string symbolicName = value.ToString();
if (symbolicName.Length > 20)
symbolicName = symbolicName.Substring(0, 20);
string name = "c$" + symbolicName + "$" + constants.Count;
FieldBuilder fb = myType.DefineField(name, type, FieldAttributes.Static | FieldAttributes.InitOnly);
ret = new StaticFieldSlot(fb);
GetOrMakeInitializer().EmitConstantBoxed(value);
initGen.EmitFieldSet(fb);
constants[value] = ret;
return ret;
}