Post Reply 
1,024 additional Registers on the CL
08-10-2016, 01:23 PM (This post was last modified: 08-10-2016 01:32 PM by Ángel Martin.)
Post: #21
RE: 1,024 additional Registers on the CL
(08-08-2016 02:18 PM)Ángel Martin Wrote:  Mission accomplished... all working as intended.

the only limitation is Stack arguments for the Indirect case (since obviously the direct case is the same as for the native functions) - and perhaps a XVIEW _ _ _, but there's no more room available for more code.

That limitation really bothered me, very relevant for ISG loops using the stack - so I've gone the extra mile and implemented the IND ST combination as well. The mask is 2,048, to be added to the actual register number, i.e. IND_X = 2051; IND_Y = 2052, etc. The range is from IND_T up to IND_e - yes, including {M,N,O,P,Q,K,a,b,c,d,e}.

Also fixed some weird issues due to flag incompatibilities in a running program that uses AVIEW, VIEW or AON instructions - those pesky system flags again...

Here's a quick test routine for the beta testers:

put in X the control word of extended registers you want to visualize, bbb.eee
run the routine below to visualize those values sequentially:

LBL 00
"XR" (alpha text)
ARCLI (from the OSX3 module)
2051 (IND X)
"|-: " (append, colon, blank)
GTO 00
Find all posts by this user
Quote this message in a reply
Post Reply 

Messages In This Thread
RE: 1,024 additional Registers on the CL - Ángel Martin - 08-10-2016 01:23 PM

User(s) browsing this thread: 1 Guest(s)