diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2015-03-30 15:20:55 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2015-03-30 15:21:11 +0200 |
| commit | 96af558907fecb22086a4ebc260b20f34fb25335 (patch) | |
| tree | 56fd7e7091057473223ea1671b7f8881c9d15d19 | |
| parent | 8d30be32fa01a191d341804b7614a722da950f84 (diff) | |
| download | gnu-guix-96af558907fecb22086a4ebc260b20f34fb25335.tar gnu-guix-96af558907fecb22086a4ebc260b20f34fb25335.tar.gz | |
elf: Add missing argument in 'elf-segment'.
* guix/elf.scm (elf-segment): Add missing argument N.
| -rw-r--r-- | guix/elf.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/guix/elf.scm b/guix/elf.scm index a4b0e819a5..4283dbd2e4 100644 --- a/guix/elf.scm +++ b/guix/elf.scm @@ -1,6 +1,6 @@ ;;; Guile ELF reader and writer -;; Copyright (C) 2011, 2012, 2013, 2014 Free Software Foundation, Inc. +;; Copyright (C) 2011, 2012, 2013, 2014, 2015 Free Software Foundation, Inc. ;;;; This library is free software; you can redistribute it and/or ;;;; modify it under the terms of the GNU Lesser General Public @@ -571,6 +571,7 @@ ((4) parse-elf32-program-header) ((8) parse-elf64-program-header) (else (error "unhandled pointer size"))) + n (elf-bytes elf) (+ (elf-phoff elf) (* n (elf-phentsize elf))) (elf-byte-order elf))) |