1 files changed, 4 insertions, 0 deletions
diff --git a/src/tcl/commands.tcl b/src/tcl/commands.tcl
new file mode 100644
index 00000000..0c5132a9
--- /dev/null
+++ b/src/tcl/commands.tcl
@@ -0,0 +1,4 @@
+# implements Tcl procedures/functions
+proc peek {address} {
+	return [openocd mdw $address]
+}
+\ No newline at end of file