From: Ben Pfaff 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?p=pintos-anon;a=commitdiff_plain;h=1ad0c77d73ca08232a94215a006a821c77d8fbf1 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";