groff-commit
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[groff] 01/01: Problem running gropdf on big endian (Sparc)


From: Deri James
Subject: [groff] 01/01: Problem running gropdf on big endian (Sparc)
Date: Sun, 9 Dec 2018 07:47:24 -0500 (EST)

deri pushed a commit to branch master
in repository groff.

commit 92f40b186aa2adda8039fff09c1246bdd30dbd3d
Author: Deri James <address@hidden>
Date:   Sun Dec 9 12:45:45 2018 +0000

    Problem running gropdf on big endian (Sparc)
    
    * src/devices/gropdf/gropdf.pl: Prior to perl v5.9 the 'L<'
    template for 'unpack' was unavailable. Solaris 10 uses v5.8.4
    so safer to use the template 'V' rather than 'L<'.
---
 ChangeLog                    | 9 +++++++++
 src/devices/gropdf/gropdf.pl | 2 +-
 2 files changed, 10 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index 1322f6a..5db9a12 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,11 @@
+2018-12-08  Deri James  <address@hidden>
+
+       Problem running gropdf on big endian (Sparc)
+
+       * src/devices/gropdf/gropdf.pl: Prior to perl v5.9 the 'L<'
+       template for 'unpack' was unavailable. Solaris 10 uses v5.8.4
+       so safer to use the template 'V' rather than 'L<'.
+
 2018-12-08 Bertrand Garrigues <address@hidden>
 
        Use gnulib's 'hypot' module.
@@ -5,6 +13,7 @@
        In 'configure.ac', the macro call
        'GROFF_NEED_DECLARATION([hypot])' checks whether the function
        'hypot' is correctly declared in 'math.h', but the test is buggy
+
        and may yields false results.
 
        * bootsrap.conf: add 'hypot' module.
diff --git a/src/devices/gropdf/gropdf.pl b/src/devices/gropdf/gropdf.pl
index 6ba05c0..2ec52d0 100644
--- a/src/devices/gropdf/gropdf.pl
+++ b/src/devices/gropdf/gropdf.pl
@@ -2425,7 +2425,7 @@ sub GetChunk
 
                Msg(1,"Failed to read binary segment length"), return if $ct != 
4;
 
-               my $sl=unpack('L<',$hdr);
+               my $sl=unpack('V',$hdr);
                my $data;
                my $chk=read($F,$data,$sl);
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]