Print constants of type Address in hex

janvrany · Jun 16, 2023 · 8d8a75a · 8d8a75a
1 parent f8e7957
commit 8d8a75a
Showing 1 changed file with 8 additions and 2 deletions.
diff --git a/src/Tinyrossa/TRILNodePrinter.class.st b/src/Tinyrossa/TRILNodePrinter.class.st
@@ -49,8 +49,14 @@ TRILNodePrinter >> print: node on: aStream [
 		(opcode hasSymbolRef or:[opcode isBranch]) ifTrue: [ 
 			aStream nextPutAll: node symbol name
 		] ifFalse: [ 
-		   opcode isLoadConst ifTrue: [ 
-				node constant printOn: aStream.
+			opcode isLoadConst ifTrue: [
+				node type == 1 ifTrue: [
+					aStream 
+						nextPutAll: '0x';
+						nextPutAll: ( node constant printPaddedWith: $0 to: 16 base: 16).
+				] ifFalse: [
+					node constant printOn: aStream.
+				]
 			].
 		].
 	].