2010-12-26 Ivan Maidanski <ivmai@mail.ru>

	* alloc.c (GC_collect_or_expand): Replace NIL with NULL in message.
	* dbg_mlc.c (GC_debug_malloc, GC_debug_malloc_ignore_off_page,
	GC_debug_malloc_atomic_ignore_off_page,
	GC_debug_generic_malloc_inner,
	GC_generic_malloc_inner_ignore_off_page, GC_debug_malloc_stubborn,
	GC_debug_malloc_atomic, GC_debug_malloc_uncollectable,
	GC_debug_malloc_atomic_uncollectable): Ditto.
	* gcj_mlc.c (GC_debug_gcj_malloc): Ditto.
	* dbg_mlc.c (GC_check_annotated_obj): Replace NIL with NULL in a
	comment.
	* dyn_load.c (GC_FirstDLOpenedLinkMap): Ditto.
	* mark_rts.c (GC_roots_present): Ditto.
	* doc/README: Ditto.
	* include/private/gc_hdrs.h (IS_FORWARDING_ADDR_OR_NIL): Ditto.
	* include/private/gc_priv.h (_GC_arrays): Ditto.

diff --git a/ChangeLog b/ChangeLog
index 382fa1b005df610d5b411c5a003dade1e8f2b618..db09a9c01f775c0ad6a27940729161e4a07b9cd6 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,21 @@
+2010-12-26  Ivan Maidanski  <ivmai@mail.ru>
+
+       * alloc.c (GC_collect_or_expand): Replace NIL with NULL in message.
+       * dbg_mlc.c (GC_debug_malloc, GC_debug_malloc_ignore_off_page,
+       GC_debug_malloc_atomic_ignore_off_page,
+       GC_debug_generic_malloc_inner,
+       GC_generic_malloc_inner_ignore_off_page, GC_debug_malloc_stubborn,
+       GC_debug_malloc_atomic, GC_debug_malloc_uncollectable,
+       GC_debug_malloc_atomic_uncollectable): Ditto.
+       * gcj_mlc.c (GC_debug_gcj_malloc): Ditto.
+       * dbg_mlc.c (GC_check_annotated_obj): Replace NIL with NULL in a
+       comment.
+       * dyn_load.c (GC_FirstDLOpenedLinkMap): Ditto.
+       * mark_rts.c (GC_roots_present): Ditto.
+       * doc/README: Ditto.
+       * include/private/gc_hdrs.h (IS_FORWARDING_ADDR_OR_NIL): Ditto.
+       * include/private/gc_priv.h (_GC_arrays): Ditto.
+
 2010-12-26  Ivan Maidanski  <ivmai@mail.ru> (mostly really Geoff Norton
                                              and Jonathan Pryor)
 

diff --git a/alloc.c b/alloc.c
index 061c0747075f9300e4cef8511965cbf61df79eb0..9cadfecad6565d9a2129d064d6204a2244db77a7 100644 (file)
--- a/alloc.c
+++ b/alloc.c
@@ -1275,7 +1275,7 @@ GC_INNER GC_bool GC_collect_or_expand(word needed_blocks,
       } else {
 #       if !defined(AMIGA) || !defined(GC_AMIGA_FASTALLOC)
           WARN("Out of Memory! Heap size: %" GC_PRIdPTR " MiB."
-               " Returning NIL!\n", (GC_heapsize - GC_unmapped_bytes) >> 20);
+               " Returning NULL!\n", (GC_heapsize - GC_unmapped_bytes) >> 20);
 #       endif
         RESTORE_CANCEL(cancel_state);
         return(FALSE);

diff --git a/dbg_mlc.c b/dbg_mlc.c
index 1a7d0f2a9171d6012d997d32a2bf6ebd8ab917f1..1de97ff85eab3ddf6e3c9633e8e5622baf782791 100644 (file)
--- a/dbg_mlc.c
+++ b/dbg_mlc.c
@@ -307,7 +307,7 @@ STATIC ptr_t GC_store_debug_info_inner(ptr_t p, word sz, char *string,
 
 #ifndef SHORT_DBG_HDRS
   /* Check the object with debugging info at ohdr       */
-  /* return NIL if it's OK.  Else return clobbered      */
+  /* return NULL if it's OK.  Else return clobbered     */
   /* address.                                           */
   STATIC ptr_t GC_check_annotated_obj(oh *ohdr)
   {
@@ -471,7 +471,7 @@ GC_API void * GC_CALL GC_debug_malloc(size_t lb, GC_EXTRA_PARAMS)
     void * result = GC_malloc(lb + DEBUG_BYTES);
 
     if (result == 0) {
-        GC_err_printf("GC_debug_malloc(%lu) returning NIL (",
+        GC_err_printf("GC_debug_malloc(%lu) returning NULL (",
                       (unsigned long) lb);
         GC_err_puts(s);
         GC_err_printf(":%ld)\n", (unsigned long)i);
@@ -490,7 +490,7 @@ GC_API void * GC_CALL GC_debug_malloc_ignore_off_page(size_t lb,
     void * result = GC_malloc_ignore_off_page(lb + DEBUG_BYTES);
 
     if (result == 0) {
-        GC_err_printf("GC_debug_malloc_ignore_off_page(%lu) returning NIL (",
+        GC_err_printf("GC_debug_malloc_ignore_off_page(%lu) returning NULL (",
                        (unsigned long) lb);
         GC_err_puts(s);
         GC_err_printf(":%lu)\n", (unsigned long)i);
@@ -510,7 +510,7 @@ GC_API void * GC_CALL GC_debug_malloc_atomic_ignore_off_page(size_t lb,
 
     if (result == 0) {
         GC_err_printf("GC_debug_malloc_atomic_ignore_off_page(%lu)"
-                       " returning NIL (", (unsigned long) lb);
+                       " returning NULL (", (unsigned long) lb);
         GC_err_puts(s);
         GC_err_printf(":%lu)\n", (unsigned long)i);
         return(0);
@@ -536,7 +536,7 @@ GC_API void * GC_CALL GC_debug_malloc_atomic_ignore_off_page(size_t lb,
     void * result = GC_generic_malloc_inner(lb + DEBUG_BYTES, k);
 
     if (result == 0) {
-        GC_err_printf("GC internal allocation (%lu bytes) returning NIL\n",
+        GC_err_printf("GC internal allocation (%lu bytes) returning NULL\n",
                        (unsigned long) lb);
         return(0);
     }
@@ -551,7 +551,7 @@ GC_API void * GC_CALL GC_debug_malloc_atomic_ignore_off_page(size_t lb,
                                                 lb + DEBUG_BYTES, k);
 
     if (result == 0) {
-        GC_err_printf("GC internal allocation (%lu bytes) returning NIL\n",
+        GC_err_printf("GC internal allocation (%lu bytes) returning NULL\n",
                        (unsigned long) lb);
         return(0);
     }
@@ -566,7 +566,7 @@ GC_API void * GC_CALL GC_debug_malloc_stubborn(size_t lb, GC_EXTRA_PARAMS)
     void * result = GC_malloc_stubborn(lb + DEBUG_BYTES);
 
     if (result == 0) {
-        GC_err_printf("GC_debug_malloc(%lu) returning NIL (",
+        GC_err_printf("GC_debug_malloc(%lu) returning NULL (",
                       (unsigned long) lb);
         GC_err_puts(s);
         GC_err_printf(":%lu)\n", (unsigned long)i);
@@ -633,7 +633,7 @@ GC_API void * GC_CALL GC_debug_malloc_atomic(size_t lb, GC_EXTRA_PARAMS)
     void * result = GC_malloc_atomic(lb + DEBUG_BYTES);
 
     if (result == 0) {
-        GC_err_printf("GC_debug_malloc_atomic(%lu) returning NIL (",
+        GC_err_printf("GC_debug_malloc_atomic(%lu) returning NULL (",
                       (unsigned long) lb);
         GC_err_puts(s);
         GC_err_printf(":%lu)\n", (unsigned long)i);
@@ -674,7 +674,7 @@ GC_API void * GC_CALL GC_debug_malloc_uncollectable(size_t lb,
     void * result = GC_malloc_uncollectable(lb + UNCOLLECTABLE_DEBUG_BYTES);
 
     if (result == 0) {
-        GC_err_printf("GC_debug_malloc_uncollectable(%lu) returning NIL (",
+        GC_err_printf("GC_debug_malloc_uncollectable(%lu) returning NULL (",
                       (unsigned long) lb);
         GC_err_puts(s);
         GC_err_printf(":%lu)\n", (unsigned long)i);
@@ -695,7 +695,7 @@ GC_API void * GC_CALL GC_debug_malloc_uncollectable(size_t lb,
 
     if (result == 0) {
         GC_err_printf(
-                "GC_debug_malloc_atomic_uncollectable(%lu) returning NIL (",
+                "GC_debug_malloc_atomic_uncollectable(%lu) returning NULL (",
                 (unsigned long) lb);
         GC_err_puts(s);
         GC_err_printf(":%lu)\n", (unsigned long)i);

diff --git a/doc/README b/doc/README
index b2822904fd91fe1203a81926d8a39d213081ca51..4a4ff77b61b6500200f9265eb332148d14a01c81 100644 (file)
--- a/doc/README
+++ b/doc/README
@@ -440,8 +440,7 @@ collector is invoked while the object is live.  The first deallocation
 of an object will clear the debugging info associated with an
 object, so accidentally repeated calls to GC_debug_free will report the
 deallocation of an object without debugging information.  Out of
-memory errors will be reported to stderr, in addition to returning
-NIL.
+memory errors will be reported to stderr, in addition to returning NULL.
 
   GC_debug_malloc checking  during garbage collection is enabled
 with the first call to GC_debug_malloc.  This will result in some

diff --git a/dyn_load.c b/dyn_load.c
index 37dd75a2c7d8d4a05d34dd71172ba382b74b3d31..128be6edac9d1665785d2935b9627e5f15a698d2 100644 (file)
--- a/dyn_load.c
+++ b/dyn_load.c
@@ -162,7 +162,7 @@ GC_FirstDLOpenedLinkMap(void)
             if( tag == DT_DEBUG ) {
                 struct link_map *lm
                         = ((struct r_debug *)(dp->d_un.d_ptr))->r_map;
-                if( lm != 0 ) cachedResult = lm->l_next; /* might be NIL */
+                if( lm != 0 ) cachedResult = lm->l_next; /* might be NULL */
                 break;
             }
         }
@@ -628,7 +628,7 @@ GC_FirstDLOpenedLinkMap(void)
             if( tag == DT_DEBUG ) {
                 struct link_map *lm
                         = ((struct r_debug *)(dp->d_un.d_ptr))->r_map;
-                if( lm != 0 ) cachedResult = lm->l_next; /* might be NIL */
+                if( lm != 0 ) cachedResult = lm->l_next; /* might be NULL */
                 break;
             }
         }

diff --git a/gcj_mlc.c b/gcj_mlc.c
index 3108bce604fbc370d740f93332d72bc4ddb0ca44..7d0169629fc8fe50ae09508a616ad5d64afb9cbb 100644 (file)
--- a/gcj_mlc.c
+++ b/gcj_mlc.c
@@ -217,7 +217,7 @@ GC_API void * GC_CALL GC_debug_gcj_malloc(size_t lb,
     if (result == 0) {
         GC_oom_func oom_fn = GC_oom_fn;
         UNLOCK();
-        GC_err_printf("GC_debug_gcj_malloc(%ld, %p) returning NIL (",
+        GC_err_printf("GC_debug_gcj_malloc(%ld, %p) returning NULL (",
                       (unsigned long)lb, ptr_to_struct_containing_descr);
         GC_err_puts(s);
         GC_err_printf(":%d)\n", i);

diff --git a/include/private/gc_hdrs.h b/include/private/gc_hdrs.h
index c5cf27f47f186bbaf12e87266c44783cd06bd2c5..b11365ab850f2dd5c8be8ed3c43bcb4d1af38e8d 100644 (file)
--- a/include/private/gc_hdrs.h
+++ b/include/private/gc_hdrs.h
@@ -194,7 +194,7 @@ typedef struct bi {
 # endif
 
 /* Is the result a forwarding address to someplace closer to the        */
-/* beginning of the block or NIL?                                       */
+/* beginning of the block or NULL?                                      */
 # define IS_FORWARDING_ADDR_OR_NIL(hhdr) ((size_t) (hhdr) <= MAX_JUMP)
 
 /* Get an HBLKSIZE aligned address closer to the beginning of the block */

diff --git a/include/private/gc_priv.h b/include/private/gc_priv.h
index b518bf68617abc4bbe0ed21b4ad7c05bb4918de5..ee801a39456ccc8b81207585dc21d4c16ce76fd3 100644 (file)
--- a/include/private/gc_priv.h
+++ b/include/private/gc_priv.h
@@ -1045,7 +1045,7 @@ struct _GC_arrays {
                           /* free list for immutable objects    */
 # ifdef MARK_BIT_PER_GRANULE
     short * _obj_map[MAXOBJGRANULES+1];
-                       /* If not NIL, then a pointer to a map of valid  */
+                       /* If not NULL, then a pointer to a map of valid */
                        /* object addresses.                             */
                        /* _obj_map[sz_in_granules][i] is                */
                        /* i % sz_in_granules.                           */

diff --git a/mark_rts.c b/mark_rts.c
index c47e17a553bf0a0f5d6a84a00050c9d7821e9aee..d808e8e51fdc2b45640b4a6e83245136860a201e 100644 (file)
--- a/mark_rts.c
+++ b/mark_rts.c
@@ -109,8 +109,8 @@ static int n_root_sets = 0;
     return(result);
   }
 
-  /* Is a range starting at b already in the table? If so return a        */
-  /* pointer to it, else NIL.                                             */
+  /* Is a range starting at b already in the table? If so return a      */
+  /* pointer to it, else NULL.                                          */
   GC_INNER struct roots * GC_roots_present(ptr_t b)
   {
     int h = rt_hash(b);