//static PTR fixupPtr = { .tk = (fixupExpr + 1) }; // C99 \o/
static PTR fixupPtr = { (uint8_t *)(fixupExpr + 1) }; // meh, it works
-
//
// The main Object Processor assembler. Basically just calls the sub functions
// to generate the appropriate code.
if (!robjproc)
return error("opcode only valid in OP mode");
+ // It's OK to call this before validating state. If the state is invalid, an
+ // error will be generated and no object file will be produced, so it
+ // doesn't matter if the line number symbols are a little off.
+ GENLINENOSYM();
+
switch (state)
{
case MO_BITMAP:
return error("unknown OP opcode");
}
-
static inline void GetSymbolUCFromTokenStream(char * s)
{
strcpy(s, string[tok[1]]);
tok += 2;
}
-
static inline uint64_t CheckFlags(char * s)
{
GetSymbolUCFromTokenStream(s);
return 0;
}
-
//
// Define a bitmap object
// Form: bitmap <data>, <xloc>, <yloc>, <dwidth>, <iwidth>, <iheight>, <bpp>,
return OK;
}
-
//
// Define a scaled bitmap object
// Form: scbitmap <data>, <xloc>, <yloc>, <dwidth>, <iwidth>, <iheight>,
return OK;
}
-
//
// Insert GPU object
-// Form: gpuobj <line #>, <userdata> (bits 14-63 of this object)
+// Form: gpuobj <userdata> (bits 3-63 of this object)
//
static int HandleGPUObject(void)
{
uint16_t eattr;
SYM * esym = 0;
- if (expr(exprbuf, &eval, &eattr, &esym) != OK)
- return ERROR;
-
- if (!(eattr & DEFINED))
- return error("bad expression in y position");
-
- uint64_t ypos = eval;
-
- CHECK_COMMA;
-
if (expr(exprbuf, &eval, &eattr, &esym) != OK)
return ERROR;
ErrorIfNotAtEOL();
- uint64_t p1 = 0x02 | ((ypos * 2) << 3) | (eval << 14);
+ uint64_t p1 = 0x02 | (eval << 3);
lastObjType = 2;
D_quad(p1);
return OK;
}
-
//
// Insert a branch object
// Form: branch VC <condition (<, =, >)> <line #>, <link addr>
return OK;
}
-
//
// Insert a stop object
// Form: stop
return OK;
}
-
//
// Insert a phrase sized "NOP" in the object list (psuedo-op)
// Form: nop
return OK;
}
-
//
// Insert an unconditional jump in the object list (psuedo-op)
// Form: jump <link addr>
return OK;
}
-