1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
|
/*-----------------------------------------------------------------*-C-*---
* File: handc/runtime/rsmodule.c
*
* Copyright (C)1997 Donovan Kolbly <d.kolbly@rscheme.org>
* as part of the RScheme project, licensed for free use.
* See <http://www.rscheme.org/> for the latest information.
*
* File version: 1.6
* File mod date: 1997.11.29 23:10:50
* System build: v0.7.2, 97.12.21
*
* Purpose: "RScheme" C module defn, to include runtime and hasht parts
*------------------------------------------------------------------------*/
#include <rscheme/linktype.h>
#include <rscheme/rsmodule.h>
#include <rscheme/scheme.h>
/****************************************************/
static struct part_descr *(tab[]) = {
&rscheme_hasht_part,
(struct part_descr *)0 };
struct module_descr module_rscheme = {
/* name */ "RScheme",
/* parts */ tab,
/* num_roots */ NUM_RSCHEME_GLOBALS,
/* root_vector */ rscheme_global,
/* roots (info) */ NULL,
/* bc_extensions */ NULL,
/* num_bc_extensions */ 0 };
|
