tanya/lox-d
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Use UDAs for Op disassembly

Browse source
This commit is contained in:
nazrin 2025-06-08 06:11:10 +00:00
parent 8717d37445
commit 2cd7a44bc7
2 changed files with 18 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

24
src/clox/chunk.d
View file

@ -10,22 +10,28 @@ struct OpColour{
string r, g, b; string r, g, b;
} }
enum OpConst;
enum OpStack;
enum OpJump;
enum OpCode : ubyte{ enum OpCode : ubyte{
@(OpColour("200", "200", "100")) Constant, @OpConst @(OpColour("200", "200", "100")) Constant,
@(OpColour("255", "200", "100")) Nil, @(OpColour("255", "200", "100")) Nil,
@(OpColour("255", "200", "100")) True, @(OpColour("255", "200", "100")) True,
@(OpColour("255", "200", "100")) False, @(OpColour("255", "200", "100")) False,
@(OpColour("000", "200", "100")) Pop, @(OpColour("000", "200", "100")) Pop,
@(OpColour("060", "200", "150")) GetLocal, @OpStack @(OpColour("060", "200", "150")) GetLocal,
@(OpColour("000", "200", "150")) GetGlobal, @OpStack @(OpColour("060", "200", "150")) SetLocal,
@(OpColour("000", "200", "150")) DefineGlobal,
@(OpColour("060", "200", "150")) SetLocal,
@(OpColour("000", "200", "150")) SetGlobal,
@(OpColour("000", "255", "000")) Jump, @OpConst @(OpColour("000", "200", "150")) GetGlobal,
@(OpColour("000", "200", "000")) JumpIfFalse, @OpConst @(OpColour("000", "200", "150")) DefineGlobal,
@(OpColour("010", "255", "000")) Loop, @OpConst @(OpColour("000", "200", "150")) SetGlobal,
@OpJump @(OpColour("000", "255", "000")) Jump,
@OpJump @(OpColour("000", "200", "000")) JumpIfFalse,
@OpJump @(OpColour("010", "255", "000")) Loop,
@(OpColour("255", "100", "100")) Equal, @(OpColour("255", "100", "100")) Equal,
@(OpColour("255", "100", "100")) Greater, @(OpColour("255", "100", "100")) Greater,

6
src/clox/dbg.d
View file

@ -68,11 +68,11 @@ long disassembleInstruction(Chunk* chunk, long offset){
printf(colour!(" %02x ", Colour.Black).ptr, instruction); printf(colour!(" %02x ", Colour.Black).ptr, instruction);
switch(instruction){ switch(instruction){
static foreach(e; EnumMembers!OpCode){ static foreach(e; EnumMembers!OpCode){
static if(e == OpCode.Constant || e == OpCode.DefineGlobal || e == OpCode.GetGlobal || e == OpCode.SetGlobal){ static if(hasUDA!(e, OpConst)){
case e: return constantInstruction!(e)(e.stringof, chunk, offset); case e: return constantInstruction!(e)(e.stringof, chunk, offset);
} else static if(e == OpCode.GetLocal || e == OpCode.SetLocal){ } else static if(hasUDA!(e, OpStack)){
case e: return stackIndexInstruction!e(e.stringof, chunk, offset); case e: return stackIndexInstruction!e(e.stringof, chunk, offset);
} else static if(e == OpCode.Jump || e == OpCode.JumpIfFalse || e == OpCode.Loop){ } else static if(hasUDA!(e, OpJump)){
case e: return jumpInstruction!e(e.stringof, e == OpCode.Loop ? -1 : 1, chunk, offset); case e: return jumpInstruction!e(e.stringof, e == OpCode.Loop ? -1 : 1, chunk, offset);
} else { } else {
case e: return simpleInstruction!e(e.stringof, offset); case e: return simpleInstruction!e(e.stringof, offset);