From: Ben Pfaff <blp@cs.stanford.edu>
Date: Mon, 22 Nov 2004 19:34:42 +0000 (+0000)
Subject: Oops.  unpack("%V") -> unpack("V")
X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=1ad0c77d73ca08232a94215a006a821c77d8fbf1;p=pintos-anon

Oops.  unpack("%V") -> unpack("V")
---

diff --git a/src/utils/pintos b/src/utils/pintos
index a27384d..f30e03a 100755
--- a/src/utils/pintos
+++ b/src/utils/pintos
@@ -126,7 +126,7 @@ if ($cmd eq 'run') {
     open (DST, ">$hostfn") or die "$hostfn: create: $!\n";
     my ($input);
     read (SRC, $input, 512) == 512 or die "$disks[2]: read error\n";
-    my ($size) = unpack ("%V", $input);
+    my ($size) = unpack ("V", $input);
     $size != 0xffffffff or die "$guestfn: too big for $disks[2]?";
     my ($src);
     read (SRC, $src, $size) == $size or die "$disks[2]: read error\n";