:TITLE[Ufn.0mc, September 10, 1982  4:00 PM, van Melle];

Ufns:
UfnsP4:	*		000                           	* NWWINT
	*		001                           	* CAR
	*		002                           	* CDR
	*		003                           	* ListP
	*		004                           	* NTypeX
	*		005                           	* TypeP
	*		006                           	* DTest
	lspUFN← (007c), goto[lspUfnxP4], opcode[007];	* Cddr
	*		010                           	* Fn0
	*		011                           	* Fn1
	*		012                           	* Fn2
	*		013                           	* Fn3
	*		014                           	* Fn4
	*		015                           	* FnX
	*		016                           	* ApplyFn
	*		017                           	* Apply
	*		020                           	* Return
	*		021                           	* Bind
	*		022                           	* UnBind
	*		023                           	* DUnBind
	*		024                           	* RplPtr.n
	*		025                           	* GCRef
	lspUFN← (026c), goto[lspUfnxP4], opcode[026];	* --unallocated--
	*		027                           	* SetGVar
	*		030				* Rplaca
	*lspUFN← (031c), goto[lspUfnxP4], opcode[031];	* Rplacd
	*		032				* Cons
	lspUFN← (033c), goto[lspUfnxP4], opcode[033];	* Getp
	lspUFN← (034c), goto[lspUfnxP4], opcode[034];	* Fmemb
	lspUFN← (035c), goto[lspUfnxP4], opcode[035];	* Gethash
	lspUFN← (036c), goto[lspUfnxP4], opcode[036];	* Puthash
	*		037				* Createcell
	*		040                           	* Bin
	lspUFN← (041c), goto[lspUfnxP4], opcode[041];	* Bout
	lspUFN← (042c), goto[lspUfnxP4], opcode[042];	* Bitblt
	lspUFN← (043c), goto[lspUfnxP4], opcode[043];	* was List1
	lspUFN← (044c), goto[lspUfnxP4], opcode[044];	* DoCollect
	lspUFN← (045c), goto[lspUfnxP4], opcode[045];	* --unallocated--
	*		046				* RplCons
	lspUFN← (047c), goto[lspUfnxP4], opcode[047];	* --unallocated--
	lspUFN← (050c), goto[lspUfnxP4], opcode[050];	* Elt
	lspUFN← (051c), goto[lspUfnxP4], opcode[051];	* NthChrC
	lspUFN← (052c), goto[lspUfnxP4], opcode[052];	* Seta
	lspUFN← (053c), goto[lspUfnxP4], opcode[053];	* RplCharCode
	*		054                           	* Eval
	lspUFN← (055c), goto[lspUfnxP4], opcode[055];	* EvalV
	lspUFN← (056c), goto[lspUfnxP4], opcode[056];	* --unallocated--
	*		057                           	* StkScan
	lspUFN← (060c), goto[lspUfnxP4], opcode[060];	* --unallocated--
	lspUFN← (061c), goto[lspUfnxP4], opcode[061];	* --unallocated--
	lspUFN← (062c), goto[lspUfnxP4], opcode[062];	* --unallocated--
	lspUFN← (063c), goto[lspUfnxP4], opcode[063];	* --unallocated--
	lspUFN← (064c), goto[lspUfnxP4], opcode[064];	* --unallocated--
	lspUFN← (065c), goto[lspUfnxP4], opcode[065];	* --unallocated--
	lspUFN← (066c), goto[lspUfnxP4], opcode[066];	* --unallocated--
	lspUFN← (067c), goto[lspUfnxP4], opcode[067];	* --unallocated--
	lspUFN← (070c), goto[lspUfnxP4], opcode[070];	* --unallocated--
	lspUFN← (071c), goto[lspUfnxP4], opcode[071];	* --unallocated--
	lspUFN← (072c), goto[lspUfnxP4], opcode[072];	* --unallocated--
	lspUFN← (073c), goto[lspUfnxP4], opcode[073];	* --unallocated--
	lspUFN← (074c), goto[lspUfnxP4], opcode[074];	* --unallocated--
	lspUFN← (075c), goto[lspUfnxP4], opcode[075];	* --unallocated--
	lspUFN← (076c), goto[lspUfnxP4], opcode[076];	* --unallocated--
	lspUFN← (077c), goto[lspUfnxP4], opcode[077];	* \return

UfnsP5:	*		100                           	* IVar0
	*		101                           	* IVar1
	*		102                           	* IVar2
	*		103                           	* IVar3
	*		104                           	* IVar4
	*		105                           	* IVar5
	*		106                           	* IVar6
	*		107                           	* IVarX
	*		110                           	* PVar0
	*		111                           	* PVar1
	*		112                           	* PVar2
	*		113                           	* PVar3
	*		114                           	* PVar4
	*		115                           	* PVar5
	*		116                           	* PVar6
	*		117                           	* PVarX
	*		120                           	* FVar0
	*		121                           	* FVar1
	*		122                           	* FVar2
	*		123                           	* FVar3
	*		124                           	* FVar4
	*		125                           	* FVar5
	*		126                           	* FVar6
	*		127                           	* FVarX
	*		130                           	* SetPVar0
	*		131                           	* SetPVar1
	*		132                           	* SetPVar2
	*		133                           	* SetPVar3
	*		134                           	* SetPVar4
	*		135                           	* SetPVar5
	*		136                           	* SetPVar6
	*		137                           	* SetPVarX
	*		140                           	* GVarX
	lspUFN← (141c), goto[lspUfnxP5], opcode[141];	* Arg0
	*		142                           	* SetIVarX
	*		143                           	* SetFVarX
	*		144                           	* Copy
	lspUFN← (145c), goto[lspUfnxP5], opcode[145];	* MyArgCount
	*		146                           	* MyAlink
	*		147                           	* AConst
	*		150                           	* NIL
	*		151                           	* T
	*		152                           	* Zero
	*		153                           	* One
	*		154                           	* SIC
	*		155                           	* SNIC
	*		156                           	* SICX
	*		157                           	* GConst
	*		160                           	* AtomNumber
	*		161				* ReadFlags
	*		162				* ReadRP
	*		163				* WriteMap
	*		164				* ReadPrinterPort
	*		165				* WritePrinterPort
	*		166				* PilotBitBlt
	*		167				* RCLK
	*		170				* MISC1
	*		171				* MISC2
	*		172				* ReclaimCell
	*		173                           	* GcScan1
	*		174                           	* GcScan2
	*		175                           	* Subr
	*		176				* ContextSwitch
	*		177				* audio inst

UfnsP6:	*		200                           	* Jump
	*		201                           	* Jump
	*		202                           	* Jump
	*		203                           	* Jump
	*		204                           	* Jump
	*		205                           	* Jump
	*		206                           	* Jump
	*		207                           	* Jump
	*		210                           	* Jump
	*		211                           	* Jump
	*		212                           	* Jump
	*		213                           	* Jump
	*		214                           	* Jump
	*		215                           	* Jump
	*		216                           	* Jump
	*		217                           	* Jump
	*		220                           	* FJump
	*		221                           	* FJump
	*		222                           	* FJump
	*		223                           	* FJump
	*		224                           	* FJump
	*		225                           	* FJump
	*		226                           	* FJump
	*		227                           	* FJump
	*		230                           	* FJump
	*		231                           	* FJump
	*		232                           	* FJump
	*		233                           	* FJump
	*		234                           	* FJump
	*		235                           	* FJump
	*		236                           	* FJump
	*		237                           	* FJump
	*		240                           	* TJump
	*		241                           	* TJump
	*		242                           	* TJump
	*		243                           	* TJump
	*		244                           	* TJump
	*		245                           	* TJump
	*		246                           	* TJump
	*		247                           	* TJump
	*		250                           	* TJump
	*		251                           	* TJump
	*		252                           	* TJump
	*		253                           	* TJump
	*		254                           	* TJump
	*		255                           	* TJump
	*		256                           	* TJump
	*		257                           	* TJump
	*		260                           	* JumpX
	*		261                           	* JumpXX
	*		262                           	* FJumpX
	*		263                           	* TJumpX
	*		264                           	* NFJumpX
	*		265                           	* NTJumpX
	lspUFN← (266c), goto[lspUfnxP6], opcode[266];	* --unallocated--
	lspUFN← (267c), goto[lspUfnxP6], opcode[267];	* --unallocated--
	*		270                           	* SetPVarPop0
	*		271                           	* SetPVarPop1
	*		272                           	* SetPVarPop2
	*		273                           	* SetPVarPop3
	*		274                           	* SetPVarPop4
	*		275                           	* SetPVarPop5
	*		276                           	* SetPVarPop6
	*		277                           	* Pop

UfnsP7:	lspUFN← (300c), goto[lspUfnxP7], opcode[300];	* --unallocated--
	lspUFN← (301c), goto[lspUfnxP7], opcode[301];	* --unallocated--
	*		302                           	* GetBaseByte
	lspUFN← (303c), goto[lspUfnxP7], opcode[303];	* ScanBase (obsolete)
	*		304				* Blt
	lspUFN← (305c), goto[lspUfnxP7], opcode[305];	* --unallocated--
	lspUFN← (306c), goto[lspUfnxP7], opcode[306];	* --unallocated--
	*		307                           	* PutBaseByte
	*		310                           	* GetBaseN
	*		311                           	* GetBasePtr.N
	*		312                           	* GetField.N.FD
	lspUFN← (313c), goto[lspUfnxP7], opcode[313];	* --unallocated--
	lspUFN← (314c), goto[lspUfnxP7], opcode[314];	* --unallocated--
	*		315                           	* PutBase.N
	*		316                           	* PutBasePtr.N
	*		317                           	* PutField.N.FD
	*		320                           	* AddBase
	*		321                           	* Vag2
	*		322                           	* HiLoc
	*		323                           	* LoLoc
	*		324                           	* Plus2
	*		325                           	* Difference
	*		326                           	* Times2
	*		327				* Quotient
	*		330                           	* IPlus
	*		331                           	* IDiff
	*		332                           	* ITimes
	*		333				* IQuotient
	*		334				* IRemainder
	lspUFN← (335c), goto[lspUfnxP7], opcode[335];	* IPlus.N (obsolete)
	lspUFN← (336c), goto[lspUfnxP7], opcode[336];	* IDiff.N (obsolete)
	lspUFN← (337c), goto[lspUfnxP7], opcode[337];	* --unallocated--
	*		340                           	* Llsh1
	*		341                           	* Llsh8
	*		342                           	* Lrsh1
	*		343                           	* Lrsh8
	*		344                           	* LogOr
	*		345                           	* LogAnd
	*		346                           	* LogXor
	lspUFN← (347c), goto[lspUfnxP7], opcode[347];	* --unallocated--
	*		350				* Fplus
	*		351				* Fdifference
	*		352				* Ftimes
	*		353				* Fquotient
	lspUFN← (354c), goto[lspUfnxP7], opcode[354];	* --unallocated (floating)--
	lspUFN← (355c), goto[lspUfnxP7], opcode[355];	* --unallocated (floating)--
	lspUFN← (356c), goto[lspUfnxP7], opcode[356];	* --unallocated (floating)--
	lspUFN← (357c), goto[lspUfnxP7], opcode[357];	* --unallocated (floating)--
	*		360                           	* Eq
	*		361                           	* IGreaterp
	*		362				* FGreaterp
	*		363                           	* Greaterp
	lspUFN← (364c), goto[lspUfnxP7], opcode[364];	* Equal
	*		365				* MakeNumber
	*		366				* BoxIPlus
	*		367				* BoxIDifference
	lspUFN← (370c), goto[lspUfnxP7], opcode[370];	* --unallocated--
	lspUFN← (371c), goto[lspUfnxP7], opcode[371];	* --unallocated--
	lspUFN← (372c), goto[lspUfnxP7], opcode[372];	* --unallocated--
	lspUFN← (373c), goto[lspUfnxP7], opcode[373];	* --unallocated--
	*		374                           	* reserved for D0
	*		375                           	* Swap
	*		376                           	* Nop
	*		377                           	* Page Fault

	:END[Ufn];