[Guile-commits] GNU Guile branch, master, updated. release_1-9-11-270-g4b02bf4

[Andy Wingo]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU Guile".

http://git.savannah.gnu.org/cgit/guile.git/commit/?id=4b02bf47f46f5030ded456984aca16945af57645

The branch, master has been updated
       via  4b02bf47f46f5030ded456984aca16945af57645 (commit)
       via  9a690dfb4575c8b6162d2eba17d13da6c6d74d3f (commit)
      from  319b53dd1c177891990d7436fd89f987abe0d1bc (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 4b02bf47f46f5030ded456984aca16945af57645
Author: Andy Wingo <address@hidden>
Date:   Wed Aug 18 22:47:55 2010 -0700

    objcodes.c comments
    
    * libguile/objcodes.c: Comments from Noah Lavine

commit 9a690dfb4575c8b6162d2eba17d13da6c6d74d3f
Author: Noah Lavine <address@hidden>
Date:   Sun Jul 18 13:25:23 2010 -0400

    Whitespace fix
    
    Add a space in libguile/objcodes.c to comply with the GNU Coding Standards.

-----------------------------------------------------------------------

Summary of changes:
 libguile/objcodes.c |   16 +++++++++++++---
 1 files changed, 13 insertions(+), 3 deletions(-)

diff --git a/libguile/objcodes.c b/libguile/objcodes.c
index 2931468..f54e79b 100644
--- a/libguile/objcodes.c
+++ b/libguile/objcodes.c
@@ -33,8 +33,10 @@
 #include "programs.h"
 #include "objcodes.h"
 
-/* SCM_OBJCODE_COOKIE is defined in _scm.h */
-/* The length of the header must be a multiple of 8 bytes.  */
+/* SCM_OBJCODE_COOKIE, defined in _scm.h, is a magic value prepended
+   to objcode on disk but not in memory.
+
+   The length of the header must be a multiple of 8 bytes.  */
 verify (((sizeof (SCM_OBJCODE_COOKIE) - 1) & 7) == 0);
 
 
@@ -42,6 +44,14 @@ verify (((sizeof (SCM_OBJCODE_COOKIE) - 1) & 7) == 0);
  * Objcode type
  */
 
+/* The words in an objcode SCM object are as follows:
+     - scm_tc7_objcode | the flags for this objcode
+     - the struct scm_objcode C object
+     - the parent of this objcode, if this is a slice, or #f if none
+     - the file descriptor this objcode came from if this was mmaped,
+       or 0 if none
+ */
+
 static SCM
 make_objcode_by_mmap (int fd)
 #define FUNC_NAME "make_objcode_by_mmap"
@@ -221,7 +231,7 @@ SCM_DEFINE (scm_objcode_to_bytecode, "objcode->bytecode", 
1, 0, 0,
 
   SCM_VALIDATE_OBJCODE (1, objcode);
 
-  len = sizeof(struct scm_objcode) + SCM_OBJCODE_TOTAL_LEN (objcode);
+  len = sizeof (struct scm_objcode) + SCM_OBJCODE_TOTAL_LEN (objcode);
 
   s8vector = scm_malloc (len);
   memcpy (s8vector, SCM_OBJCODE_DATA (objcode), len);


hooks/post-receive
-- 
GNU Guile