code: 9ferno

Download patch

ref: 82841b8f5f7600127bf16d4768f690617ec041f0
parent: 65261e2140eb129454fc25cfcae112e6c6c45569
author: joe9 <joe9mail@gmail.com>
date: Sat Jul 3 05:20:49 EDT 2021

limbo changes for the increased WORD size

--- a/appl/cmd/limbo/ecom.b
+++ b/appl/cmd/limbo/ecom.b
@@ -1236,8 +1236,8 @@
 			op = IINDL;
 			if(left.ty.tof == treal)
 				op = IINDF;
-		IBY2WD =>
-			op = IINDW;
+		#IBY2WD =>
+		#	op = IINDW;
 		1 =>
 			op = IINDB;
 		}
--- a/appl/cmd/limbo/isa.m
+++ b/appl/cmd/limbo/isa.m
@@ -216,7 +216,7 @@
 REGRET:		con 4;
 NREG:		con 5;
 
-IBY2WD:		con 4;
+IBY2WD:		con 8;		# changed from 4
 IBY2FT:		con 8;
 IBY2LG:		con 8;
 
--- a/appl/cmd/limbo/limbo.m
+++ b/appl/cmd/limbo/limbo.m
@@ -369,9 +369,9 @@
 
 PARENS: con	1;
 TEMP: con	2;
-FNPTRA: con	4;	# argument
-FNPTR2: con	8;	# 2nd parameter
-FNPTRN: con	16;	# use -ve offset
+FNPTRA: con	8;	# argument 4->8
+FNPTR2: con	16;	# 2nd parameter 8->16
+FNPTRN: con	32;	# use -ve offset 16->32
 FNPTR: con	FNPTRA|FNPTR2|FNPTRN;
 
 Node: adt