[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