private PastelContext GenerateCoreVmParseTree(
Platform.AbstractPlatform platform,
IInlineImportCodeLoader codeLoader,
Dictionary <string, object> constantFlags)
{
using (new PerformanceSection("VmGenerator.GenerateCoreVmParseTree"))
{
PastelContext context = new PastelContext(platform.Language, codeLoader);
foreach (string key in constantFlags.Keys)
{
context.SetConstant(key, constantFlags[key]);
}
foreach (string file in INTERPRETER_BASE_FILES)
{
context.CompileFile(file);
}
context.FinalizeCompilation();
return(context);
}
}
private Dictionary <string, PastelContext> GenerateLibraryParseTree(
Platform.AbstractPlatform platform,
Dictionary <string, object> constantFlags,
IInlineImportCodeLoader codeLoader,
ICollection <LibraryMetadata> relevantLibraries,
PastelContext sharedScope)
{
using (new PerformanceSection("VmGenerator.GenerateLibraryParseTree"))
{
Dictionary <string, PastelContext> libraries = new Dictionary <string, PastelContext>();
foreach (LibraryMetadata libraryMetadata in relevantLibraries)
{
LibraryExporter library = LibraryExporter.Get(libraryMetadata, platform);
Dictionary <string, object> constantsLookup = Util.MergeDictionaries <string, object>(constantFlags, library.CompileTimeConstants);
List <ExtensibleFunction> libraryFunctions = library.GetPastelExtensibleFunctions();
if (!libraryMetadata.IsMoreThanJustEmbedCode)
{
continue;
}
PastelContext context = new PastelContext(platform.Language, codeLoader);
Dictionary <string, string> exFnTranslations = library.GetExtensibleFunctionTranslations(platform);
foreach (ExtensibleFunction exFn in libraryFunctions)
{
string exFnTranslation = null;
if (exFnTranslations.ContainsKey(exFn.Name))
{
exFnTranslation = exFnTranslations[exFn.Name];
}
else if (exFnTranslations.ContainsKey("$" + exFn.Name))
{
exFnTranslation = exFnTranslations["$" + exFn.Name];
}
context.AddExtensibleFunction(exFn, exFnTranslation);
}
context.AddDependency(sharedScope);
foreach (string constKey in constantsLookup.Keys)
{
context.SetConstant(constKey, constantsLookup[constKey]);
}
libraries[library.Metadata.ID] = context;
Dictionary <string, string> supplementalCode = library.Metadata.GetSupplementalTranslatedCode();
Dictionary <string, string> translatedCode = library.GetNativeCode();
Dictionary <string, string> structCode = library.Metadata.GetStructFilesCode();
// need to load from the actual Library instance, which could have come from either CRAYON_HOME or source
string registryCode = library.Metadata.GetRegistryCode();
if (registryCode == null)
{
if (supplementalCode.Count > 0 || translatedCode.Count > 0)
{
throw new InvalidOperationException("The library '" + library.Metadata.ID + "' has translated code but no function_registry.pst file.");
}
}
else
{
string filename = "LIB:" + library.Metadata.ID + "/function_registry.pst";
context.CompileCode(filename, registryCode);
foreach (string structFile in structCode.Keys)
{
filename = "LIB:" + library.Metadata.ID + "/structs/" + structFile;
context.CompileCode(filename, structCode[structFile]);
}
foreach (string supplementalFile in supplementalCode.Keys)
{
filename = "LIB:" + library.Metadata.ID + "/supplemental/" + supplementalFile;
context.CompileCode(filename, supplementalCode[supplementalFile]);
}
foreach (string translatedFile in translatedCode.Keys)
{
filename = "LIB:" + library.Metadata.ID + "/translate/" + translatedFile;
context.CompileCode(filename, translatedCode[translatedFile]);
}
context.FinalizeCompilation();
}
}
return(libraries);
}
}