Jtag axi memory test tcl script

Question

Hi
For interactive testing memory AXI bus via JTAG AXI master, I use commands:
       create_hw_axi_txn wr_txn[get_hw_axis hw_axi_1] -address   -data -len 16 -size 32 -type write   
       create_hw_axi_txn rd_txn [get_hw_axis hw_axi_1] -address  -len 16 -size 32 -type read
       run_hw_axi wr_txn rd_txn
which output results to stdout
I want to write tcl script for testing all Memory. I am beginner in TCL programming.
How to redirect result of Read transaction in internal variable for comparing read and write data?
Maybe there is script for testing memory
Alexandr

Answer 1

 I dont if there is already tcl command to verify this but i will answer your question from tcl point of view
You can assign output to internal variable like
set b [create_hw_axi_txn rd_txn [get_hw_axis hw_axi_1] -address  -len 16 -size 32 -type read]
Comapre b with the write data. To see the varible b rub command puts $b
To compare you can use below command . $b is read data 00000_11111 write data here
string compare $b 00000_11111
If this tcl command returns 0 means read data is equal to write data