From d13e9426c6733206bd92d813c8ff2cd2a5d7c734 Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@finalrewind.org>
Date: Fri, 2 Jan 2015 23:32:53 +0100
Subject: add debug foo for ar / dp hi flag

---
 bin/db-iris | 10 ++++++++++
 1 file changed, 10 insertions(+)

(limited to 'bin/db-iris')

diff --git a/bin/db-iris b/bin/db-iris
index e30dc9b..3920f53 100755
--- a/bin/db-iris
+++ b/bin/db-iris
@@ -92,6 +92,7 @@ for my $efield (@edata_pre) {
 		when ('q') { $edata{qos}        = 1 }
 		when ('r') { $edata{route}      = 1 }
 		when ('t') { $edata{times}      = 1 }
+		when ('!') { $edata{debug}      = 1 }
 		default    { $edata{$efield}    = 1 }
 	}
 }
@@ -239,6 +240,15 @@ sub display_result {
 
 		}
 
+		if ( $edata{debug} ) {
+			if ( $d->{unk_ar_hi} ) {
+				say "[DEBUG] arr:hi = $d->{unk_ar_hi}";
+			}
+			if ( $d->{unk_dp_hi} ) {
+				say "[DEBUG] dep:hi = $d->{unk_dp_hi}";
+			}
+		}
+
 		if ( $edata{messages} ) {
 			for my $message ( $d->messages ) {
 
-- 
cgit v1.2.3