pascalabcnet/VisualPascalABCNETLinux/MonoDebugging/Debugger/Mirror.cs
2023-04-18 17:53:21 +02:00

40 lines
618 B
C#

using System;
namespace Mono.Debugger.Soft
{
public abstract class Mirror : IMirror
{
protected VirtualMachine vm;
protected long id; // The id used in the protocol
internal Mirror (VirtualMachine vm, long id) {
this.vm = vm;
this.id = id;
}
internal Mirror () {
}
public VirtualMachine VirtualMachine {
get {
return vm;
}
}
internal long Id {
get {
return id;
}
}
protected void SetVirtualMachine (VirtualMachine vm) {
this.vm = vm;
}
protected void CheckMirror (Mirror m) {
if (vm != m.VirtualMachine)
throw new VMMismatchException ();
}
}
}