From: Michal Sojka <sojkam1@fel.cvut.cz>
Date: Mon, 7 Sep 2015 21:12:13 +0000 (+0200)
Subject: Preparation for storing U-Boot output to local files
X-Git-Tag: 20160503~12
X-Git-Url: https://rtime.felk.cvut.cz/gitweb/novaboot.git/commitdiff_plain/8513863e1bc342e6ee5834cd41f1aeb9860c3219?hp=6328617c0e5daa6c36c3ddcd6b224659d71c7424

Preparation for storing U-Boot output to local files
---

diff --git a/novaboot b/novaboot
index 6823011..5f2b3ed 100755
--- a/novaboot
+++ b/novaboot
@@ -1099,7 +1099,13 @@ if (defined $uboot) {
 	}
 	chomp($cmd);
 	$exp->send("$cmd\n");
-	$exp->expect($timeout, $uboot_prompt) || die "U-Boot prompt timeout";
+
+	my ($matched_pattern_position, $error,
+	    $successfully_matching_string,
+	    $before_match, $after_match) =
+		$exp->expect($timeout, $uboot_prompt);
+	die "No U-Boot prompt: $error" if $error;
+	#print "\n>>>>$before_match<<<<\n";
     }
 
     # Load files if there are some load lines in the script