public void BasicChecks()
{
ThreadLocalVariable<int> threadVar = new ThreadLocalVariable<int>(123);
Thread parent = Thread.CurrentThread;
bool eventOccurred = false;
bool valueOk = true, eventOk = true;
bool stop = false;
bool started = false;
ThreadEx t = new ThreadEx(delegate(object o)
{
started = true;
try
{
if ((int)o != 123 || threadVar.Value != 123)
valueOk = false;
}
catch
{
valueOk = false;
}
while (!stop)
GC.KeepAlive(""); // Waste time
started = false;
});
EventHandler<ThreadStartEventArgs> eh = null;
ThreadEx.ThreadStarting += (eh = delegate(object o, ThreadStartEventArgs e)
{
eventOccurred = true;
if (e.ChildThread != t || e.ParentThread != parent)
eventOk = false;
ThreadEx.ThreadStarting -= eh;
});
Assert.IsFalse(t.IsAlive);
Assert.AreEqual(System.Threading.ThreadState.Unstarted, t.ThreadState);
t.Start(123);
Assert.IsTrue(t.IsAlive);
Assert.IsTrue(eventOccurred);
Assert.IsTrue(eventOk);
while (!started)
ThreadEx.Sleep(0);
Assert.AreEqual(System.Threading.ThreadState.Running, t.ThreadState);
stop = true;
Assert.IsTrue(t.Join(5000));
Assert.IsTrue(valueOk);
Assert.IsFalse(started);
}
public void SpinOnce()
{
ntime += 1;
if (isSingleCpu)
{
// On a single-CPU system, spinning does no good
ThreadEx.Yield();
}
else
{
if (ntime % step == 0)
{
ThreadEx.Yield();
}
else
{
// Multi-CPU system might be hyper-threaded, let other thread run
Thread.SpinWait(Math.Min(ntime, maxTime) << 1);
}
}
}
public static void MemoryBarrier()
{
ThreadEx.MemoryBarrier();
}
[STAThread] // Required by ICSharpCode.TextEditor
public static void Main(string[] args)
{
BMultiMap<string,string> options = new BMultiMap<string,string>();
var argList = args.ToList();
UG.ProcessCommandLineArguments(argList, options, "", ShortOptions, TwoArgOptions);
if (!options.ContainsKey("nologo"))
Console.WriteLine("LeMP macro compiler (pre-alpha)");
string _;
if (options.TryGetValue("help", out _) || options.TryGetValue("?", out _)) {
ShowHelp(KnownOptions.OrderBy(p => p.Key));
return;
}
if (options.ContainsKey("editor")) {
Console.WriteLine("Starting editor...");
System.Windows.Forms.Application.EnableVisualStyles();
System.Windows.Forms.Application.SetCompatibleTextRenderingDefault(false);
System.Windows.Forms.Application.Run(new TextEditor.LempDemoForm());
return;
}
Severity minSeverity = Severity.Note;
#if DEBUG
minSeverity = Severity.Debug;
#endif
var filter = new SeverityMessageFilter(MessageSink.Console, minSeverity);
Compiler c = ProcessArguments(options, filter, typeof(Macros), argList);
Compiler.WarnAboutUnknownOptions(options, MessageSink.Console, KnownOptions);
if (c != null) {
c.AddMacros(typeof(global::LeMP.StandardMacros).Assembly);
c.MacroProcessor.PreOpenedNamespaces.Add(GSymbol.Get("LeMP.Prelude"));
c.MacroProcessor.PreOpenedNamespaces.Add(GSymbol.Get("LeMP"));
using (LNode.PushPrinter(Ecs.EcsNodePrinter.PrintPlainCSharp))
c.Run();
} else if (args.Length == 0) {
ShowHelp(KnownOptions.OrderBy(p => p.Key));
Console.WriteLine();
Console.WriteLine("LeMP started without arguments. Starting editor (--editor)");
var thread = new ThreadEx(() => {
System.Windows.Forms.Application.EnableVisualStyles();
System.Windows.Forms.Application.Run(new TextEditor.LempDemoForm());
});
thread.Thread.SetApartmentState(ApartmentState.STA);
thread.Start();
Console.WriteLine("Press Enter to run unit tests. Using the editor? Keep the terminal open.");
Console.ReadLine();
RunTests.Run(new Loyc.Syntax.Lexing.TokenTests());
RunTests.Run(new Loyc.Syntax.Les.LesLexerTests());
RunTests.Run(new Loyc.Syntax.Les.LesParserTests());
RunTests.Run(new Loyc.Syntax.Les.LesPrinterTests());
RunLeMPTests();
Ecs.Program.RunEcsTests();
}
}
public static bool Read(ref bool location)
{
return(ThreadEx.VolatileRead(ref location));
}
