[uim-commit] r1742 - branches/r5rs/sigscheme

yamaken at freedesktop.org yamaken at freedesktop.org
Sun Oct 2 09:29:16 PDT 2005


Author: yamaken
Date: 2005-10-02 09:29:13 -0700 (Sun, 02 Oct 2005)
New Revision: 1742

Modified:
   branches/r5rs/sigscheme/datas.c
Log:
* sigscheme/datas.c
  - Insert section headers


Modified: branches/r5rs/sigscheme/datas.c
===================================================================
--- branches/r5rs/sigscheme/datas.c	2005-10-02 16:15:58 UTC (rev 1741)
+++ branches/r5rs/sigscheme/datas.c	2005-10-02 16:29:13 UTC (rev 1742)
@@ -254,6 +254,9 @@
 }
 
 
+/*============================================================================
+  Heap Allocator & Garbage Collector
+============================================================================*/
 static void allocate_heap(ScmObjHeap **heaps, int num_heap, int HEAP_SIZE, ScmObj *freelist)
 {
     int i = 0;
@@ -629,7 +632,7 @@
 #endif /* !SCM_GCC4_READY_GC */
 
 /*===========================================================================
-  Allocate Structure Functions
+  Object Allocators
 ===========================================================================*/
 ScmObj Scm_NewCons(ScmObj a, ScmObj b)
 {
@@ -847,6 +850,9 @@
 }
 #endif /* SCM_USE_NONSTD_FEATURES */
 
+/*============================================================================
+  Symbol table
+============================================================================*/
 /*
  * Symbol Name Hash Related Functions
  *
@@ -908,6 +914,10 @@
     return sym;
 }
 
+/*============================================================================
+  Other functions: should be moved into appropriate files
+============================================================================*/
+
 ScmObj Scm_eval_c_string(const char *exp)
 {
 #if !SCM_GCC4_READY_GC



More information about the uim-commit mailing list