From ae7418177e590dfcd572194a3953e806f2ace187 Mon Sep 17 00:00:00 2001
From: Holger Hans Peter Freyther <zecke@selfish.org>
Date: Wed, 8 Dec 2010 11:28:12 +0100
Subject: mtp: Print a TFP message on the screen when we get a message

---
 contrib/TestSender.st | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'contrib')

diff --git a/contrib/TestSender.st b/contrib/TestSender.st
index c059dae..fa3a2c6 100644
--- a/contrib/TestSender.st
+++ b/contrib/TestSender.st
@@ -18,6 +18,12 @@ Eval [
     datagram data: msg.
     socket nextPut: datagram.
 
+    "TFP"
+    msg := #(2 0 0 1 0 0 0 0 0 0 0 8
+             192 232 197 7 0 20 62 2) asByteArray.
+    datagram data: msg.
+    socket nextPut: datagram.
+
     "TRA"
     msg := #(2 0 0 1 0 0 0 0 0 0 0 6 192 232 197 7 0 23) asByteArray.
     datagram data: msg.
-- 
cgit v1.2.3