URL
https://opencores.org/ocsvn/ssbcc/ssbcc/trunk
Subversion Repositories ssbcc
[/] [ssbcc/] [trunk/] [core/] [9x8/] [macros/] [storeoffset.py] - Rev 11
Compare with Previous | Blame | View Log
# Copyright 2014-2015, Sinclair R.F., Inc. from asmDef import AsmException def storeoffset(ad): """ Built-in macro to store the top of the data stack at the specified offset into the specified variable.\n Usage: <v> .storeoffset(variable,ix[,op]) where: <v> is the value to be stored variable is the name of the variable ix is the index into the variable op is an optional instruction to override the default "drop" instruction at the end of the instruction sequence\n The effect is: variable[ix] = v\n ( v - ) """ # Add the macro to the list of recognized macros. ad.AddMacro('.storeoffset', 3, [ ['','symbol'], ['','singlevalue','symbol'], ['drop','instruction','parameter','singlemacro','singlevalue','symbol'] ]); # Define the macro functionality. def emitFunction(ad,fp,argument): (addr,ixBank,bankName) = ad.Emit_GetAddrAndBank(argument[0]); offset = ad.Emit_EvalSingleValue(argument[1]); if addr+offset >= 256: raise asmDef.AsmException('Unreasonable address+length=0x%02X+0x%02X >= 256 at %s' % (addr,N,argument[0]['loc'],)) ad.EmitPush(fp,addr+offset,ad.Emit_String('%s+%s' % (argument[0]['value'],offset,)),argument[0]['loc']); ad.EmitOpcode(fp,ad.specialInstructions['store'] | ixBank,'store '+bankName); ad.EmitOptArg(fp,argument[2]); ad.EmitFunction['.storeoffset'] = emitFunction;