public StringToCodepoints(TaskMaster task_master, SourceReference source_ref,
Context context, Frame self, Frame container) : base(task_master)
{
this.source_reference = source_ref;
this.context = context;
this.container = self;
}
public Frame(Stringish id, SourceReference source_ref, Context context, Frame container)
{
SourceReference = source_ref;
Context = Context.Prepend(this, context);
Container = container ?? this;
Id = id;
}
public ParseInt(TaskMaster master, SourceReference source_ref,
Context context, Frame self, Frame container)
{
this.master = master;
this.source_reference = source_ref;
this.context = context;
}
public Escape(TaskMaster task_master, SourceReference source_ref,
Context context, Frame self, Frame container) : base(task_master)
{
this.source_ref = source_ref;
this.context = context;
this.self = self;
}
public CharacterCategory(TaskMaster task_master, SourceReference source_ref,
Context context, Frame self, Frame container) : base(task_master)
{
this.source_reference = source_ref;
this.context = context;
this.container = self;
}
public Frame(long id, SourceReference source_ref, Context context, Frame container)
{
this.SourceReference = source_ref;
this.Context = context;
this.Container = container;
this.Id = TaskMaster.OrdinalName(id);
}
public Instantiation(TaskMaster task_master, SourceReference src_ref, Context context, Frame container, params string[] names) : base(task_master)
{
this.src_ref = src_ref;
this.context = context;
this.container = container;
this.names = names;
}
public override void ReportOtherError(SourceReference reference, string message)
{
Dirty = true;
Console.Error.WriteLine(message);
var seen = new Dictionary <SourceReference, bool>();
reference.Write(Console.Error, " ", seen);
}
public CharacterCategory(TaskMaster task_master, SourceReference source_ref,
Context context, Frame self, Frame container)
: base(task_master)
{
this.source_reference = source_ref;
this.context = context;
this.container = self;
}
public DbQuery(TaskMaster task_master, SourceReference source_ref,
Context context, Frame self, Frame container)
: base(task_master)
{
this.source_ref = source_ref;
this.context = context;
this.self = self;
}
public Frame(TaskMaster task_master, long id, SourceReference source_ref, Context context, Frame container)
{
this.task_master = task_master;
SourceReference = source_ref;
Context = Context.Prepend(this, context);
Container = container ?? this;
Id = TaskMaster.OrdinalName(id);
}
public SourceReference(string message, string filename, int start_line, int start_column, int end_line, int end_column, SourceReference caller)
{
Message = message;
FileName = filename;
StartLine = start_line;
StartColumn = start_column;
EndLine = end_line;
EndColumn = end_column;
Caller = caller;
}
public Lookup(TaskMaster master, SourceReference source_ref, Context context, string[] names)
{
this.master = master;
this.SourceReference = source_ref;
this.names = names;
/* Create grid where the first entry is the frame under consideration. */
var values = new object[context.Length, names.Length + 1];
context.Fill((index, frame) => values[index, 0] = frame);
}
public BasicSourceReference(string message, string filename, int start_line, int start_column, int end_line,
int end_column, SourceReference caller)
{
Message = message;
FileName = filename;
StartLine = start_line;
StartColumn = start_column;
EndLine = end_line;
EndColumn = end_column;
Caller = caller;
}
public Lookup(TaskMaster task_master, SourceReference source_ref, string[] names, Context context) : base(task_master)
{
SourceReference = source_ref;
this.names = names;
/* Create grid where the first entry is the frame under consideration. */
frames = new Frame[context.Length];
var index = 0;
foreach (var frame in context.Fill())
{
frames[index++] = frame;
}
}
public static Frame Through(TaskMaster task_master, long id, SourceReference source_ref, long start, long end,
Context context, Frame container)
{
var result = new Frame(task_master, id, source_ref, context, container);
if (end < start)
{
return(result);
}
for (long it = 0; it <= (end - start); it++)
{
result[TaskMaster.OrdinalNameStr(it + 1)] = start + it;
}
return(result);
}
public MutableFrame(TaskMaster task_master, SourceReference source_ref, Context context, Frame container) : base(task_master, source_ref, context, container)
{
}
public Template(SourceReference source_ref, Context context, Frame container)
{
SourceReference = source_ref;
Context = context;
Container = container;
}
public static Frame Through(TaskMaster task_master, long id, SourceReference source_ref, long start, long end,
Context context, Frame container)
{
var result = new Frame(task_master, id, source_ref, context, container);
if (end < start)
return result;
for (long it = 0; it <= (end - start); it++) {
result[TaskMaster.OrdinalNameStr(it + 1)] = start + it;
}
return result;
}
public StringFromBytes(TaskMaster task_master, SourceReference source_ref,
Context context, Frame self, Frame container) : base(task_master)
{
this.source_reference = source_ref;
this.context = context;
}
public ParseDouble(TaskMaster master, SourceReference source_ref,
Context context, Frame self, Frame container) : base(master)
{
this.source_reference = source_ref;
this.context = context;
}
public bool VerifySymbol(SourceReference source_reference, string str)
{
return(VerifySymbol(str, msg => ReportOtherError(source_reference, msg)));
}
public FixedFrame(string id, SourceReference source_ref) : base(id, source_ref, null, null)
{
}
private ReflectedFrame(TaskMaster task_master, SourceReference source_ref,
Object backing, IDictionary <string, object> attributes) : base(task_master, source_ref, null, null)
{
Backing = backing;
this.attributes = attributes;
}
/** * Report an error during execution of the program. */ public abstract void ReportOtherError(SourceReference reference, string message);
public Frame(TaskMaster task_master, long id, SourceReference source_ref, Context context, Frame container)
{
this.task_master = task_master;
SourceReference = source_ref;
Context = Context.Prepend(this, context);
Container = container ?? this;
Id = TaskMaster.OrdinalName(id);
}
public ParseInt(TaskMaster task_master, SourceReference source_ref,
Context context, Frame self, Frame container)
: base(task_master)
{
this.source_reference = source_ref;
this.context = context;
}
public StringToCodepoints(TaskMaster task_master, SourceReference source_ref,
Context context, Frame self, Frame container)
: base(task_master)
{
this.source_reference = source_ref;
this.context = context;
this.container = self;
}
public FailureComputation(TaskMaster task_master, SourceReference reference, string message) : base(task_master)
{
this.source_reference = reference;
this.message = message;
}
public Escape(TaskMaster master, SourceReference source_ref,
Context context, Frame self, Frame container)
{
this.master = master;
this.source_ref = source_ref;
this.context = context;
this.self = self;
}
public Frame(string id, SourceReference source_ref, Context context, Frame container) : this(new SimpleStringish(id), source_ref, context, container)
{
}
public Frame(TaskMaster task_master, SourceReference source_ref, Context context, Frame container) : this(TaskMaster.OrdinalName(task_master.NextId()), source_ref, context, container)
{
}
public JunctionReference(string message, string filename, int start_line, int start_column, int end_line,
int end_column, SourceReference caller, SourceReference junction)
: base(message, filename, start_line, start_column, end_line, end_column, caller)
{
Junction = junction;
}
public ParseDouble(TaskMaster master, SourceReference source_ref,
Context context, Frame self, Frame container)
{
this.master = master;
this.source_reference = source_ref;
this.context = context;
}
public bool VerifySymbol(SourceReference source_reference, Stringish strish)
{
return(VerifySymbol(source_reference, strish.ToString()));
}
public override void ReportOtherError(SourceReference reference, string message)
{
}
public override void ReportOtherError(SourceReference reference, string message)
{
}
public override void ReportOtherError(SourceReference reference, string message)
{
Dirty = true;
Console.Error.WriteLine(message);
var seen = new Dictionary<SourceReference, bool>();
reference.Write(Console.Error, " ", seen);
}
public JunctionReference(string message, string filename, int start_line, int start_column, int end_line,
int end_column, SourceReference caller, SourceReference junction)
: base(message, filename, start_line, start_column, end_line, end_column, caller)
{
Junction = junction;
}
public Template(SourceReference source_ref, Context context)
{
this.SourceReference = source_ref;
this.Context = context;
}
public Template(SourceReference source_ref, Context context, Frame container)
{
SourceReference = source_ref;
Context = context;
Container = container;
}
public Computation ComputeValue(
TaskMaster task_master, SourceReference reference, Context context, Frame self, Frame container)
{
return(this);
}
