civodul pushed a commit to branch master
in repository guile.
commit dfa11aa3f60847a252b797023530e8cd19ed03da
Author: Ludovic Courtès <[email protected]>
Date: Mon Mar 30 15:19:58 2015 +0200
elf: Add missing argument in 'elf-segment'.
* module/system/vm/elf.scm (elf-segment): Add missing argument N.
---
module/system/vm/elf.scm | 3 ++-
1 files changed, 2 insertions(+), 1 deletions(-)
diff --git a/module/system/vm/elf.scm b/module/system/vm/elf.scm
index b618761..6ee62f1 100644
--- a/module/system/vm/elf.scm
+++ b/module/system/vm/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
@@ -567,6 +567,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)))
