+# SPDX-License-Identifier: GPL-2.0-or-later
+
# Embedded Artists eval board for LPC2478
# http://www.embeddedartists.com/
# Helper
#
proc read_register {register} {
- set result ""
- mem2array result 32 $register 1
- return $result(0)
+ return [read_memory $register 32 1]
}
proc init_board {} {