Use TRCodeCache in test shell

This commit makes use of `TRCodeCache` introduced in previous commit.
This is a necessary step for writing tests that compile multiple functions
and/or refer to external (relocatable) symbols.

src/Tinyrossa-Tests/TRCompilationTestShell.class.st

@@ -4,7 +4,8 @@ Class {
 	#instVars : [
 		'target',
 		'binary',
-		'debugger'
+		'debugger',
+		'nzone'
 	],
 	#classVars : [
 		'DefaultImpl'
@@ -92,7 +93,7 @@ TRCompilationTestShell >> initializeWithTarget: aTRCompilationTarget [
 TRCompilationTestShell >> inject: compilation [
 	"Utility: inject compiled code into the shell" 
 
-	debugger memoryAt: self nzone put: compilation codeBuffer bytes
+	self nzone add: compilation codeBuffer symbol: compilation functionSymbol
 ]
 
 { #category : #utilities }
@@ -132,7 +133,7 @@ TRCompilationTestShell >> invoke: symbol with: arguments types: argumentTypes [
 			self error: 'Parameter type not supported yet: ' , typ name
 		].
 	].
-	self debugger setRegister: 'pc' to: self nzone.
+	self debugger setRegister: 'pc' to: symbol address.
 
 	"Call injected function"
 	"
@@ -153,7 +154,18 @@ TRCompilationTestShell >> invoke: symbol with: arguments types: argumentTypes [
 
 { #category : #accessing }
 TRCompilationTestShell >> nzone [
-	"Return the address of nzone. See shell.link linker script."
+	nzone isNil ifTrue: [
+		| runtime |
+
+		runtime := TRRuntime forTarget: target.
+		nzone := TRCodeCache runtime: runtime base: self nzoneBase size: 512 memory: debugger selectedInferior memory.
+	].
+	^ nzone
+]
+
+{ #category : #accessing }
+TRCompilationTestShell >> nzoneBase [
+	"Return the base address of nzone. See shell.link linker script."
 
 	^ 16r00080000
 ]