mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-10 05:50:26 +02:00
*** empty log message ***
This commit is contained in:
parent
22d356150d
commit
fd937ecb02
3 changed files with 13 additions and 5 deletions
|
@ -46,7 +46,8 @@ libguile_la_SOURCES = \
|
|||
goops.c gsubr.c guardians.c hash.c hashtab.c hooks.c init.c ioext.c \
|
||||
iselect.c keywords.c lang.c list.c load.c macros.c mallocs.c \
|
||||
modules.c numbers.c objects.c objprop.c options.c pairs.c ports.c \
|
||||
print.c procprop.c procs.c random.c read.c root.c scmsigs.c \
|
||||
print.c procprop.c procs.c random.c rdelim.c \
|
||||
read.c root.c scmsigs.c \
|
||||
script.c simpos.c smob.c sort.c srcprop.c stackchk.c stacks.c \
|
||||
stime.c strings.c strop.c strorder.c strports.c struct.c symbols.c \
|
||||
tag.c throw.c values.c variable.c vectors.c version.c vports.c weaks.c \
|
||||
|
@ -61,7 +62,7 @@ DOT_X_FILES = \
|
|||
hooks.x init.x ioext.x iselect.x keywords.x lang.x list.x load.x \
|
||||
macros.x mallocs.x modules.x net_db.x numbers.x objects.x \
|
||||
objprop.x options.x pairs.x ports.x posix.x print.x procprop.x \
|
||||
procs.x random.x read.x root.x scmsigs.x \
|
||||
procs.x random.x rdelim.x read.x root.x scmsigs.x \
|
||||
script.x simpos.x smob.x socket.x sort.x srcprop.x stackchk.x \
|
||||
stacks.x stime.x strings.x strop.x strorder.x strports.x struct.x \
|
||||
symbols.x tag.x throw.x values.x variable.x vectors.x \
|
||||
|
@ -80,7 +81,8 @@ DOT_DOC_FILES = \
|
|||
ioext.doc iselect.doc keywords.doc lang.doc list.doc load.doc \
|
||||
macros.doc mallocs.doc modules.doc net_db.doc numbers.doc objects.doc \
|
||||
objprop.doc options.doc pairs.doc ports.doc posix.doc print.doc \
|
||||
procprop.doc procs.doc random.doc read.doc root.doc scmsigs.doc \
|
||||
procprop.doc procs.doc random.doc rdelim.doc \
|
||||
read.doc root.doc scmsigs.doc \
|
||||
script.doc simpos.doc smob.doc socket.doc sort.doc srcprop.doc \
|
||||
stackchk.doc stacks.doc stime.doc strings.doc strop.doc strorder.doc \
|
||||
strports.doc struct.doc symbols.doc tag.doc throw.doc values.doc \
|
||||
|
@ -127,7 +129,8 @@ modinclude_HEADERS = \
|
|||
ioext.h keywords.h lang.h list.h load.h macros.h mallocs.h \
|
||||
modules.h net_db.h numbers.h objects.h objprop.h options.h pairs.h \
|
||||
ports.h posix.h regex-posix.h print.h procprop.h procs.h random.h \
|
||||
ramap.h read.h root.h scmsigs.h validate.h script.h simpos.h \
|
||||
ramap.h rdelim.h \
|
||||
read.h root.h scmsigs.h validate.h script.h simpos.h \
|
||||
smob.h socket.h sort.h srcprop.h stackchk.h stacks.h stime.h \
|
||||
strings.h strop.h strorder.h strports.h struct.h symbols.h tag.h \
|
||||
tags.h throw.h unif.h values.h variable.h vectors.h version.h \
|
||||
|
|
|
@ -72,7 +72,6 @@ struct scm_fport {
|
|||
|
||||
extern SCM scm_setbuf0 (SCM port);
|
||||
extern SCM scm_setvbuf (SCM port, SCM mode, SCM size);
|
||||
extern void scm_setfileno (FILE *fs, int fd);
|
||||
extern void scm_evict_ports (int fd);
|
||||
extern SCM scm_open_file (SCM filename, SCM modes);
|
||||
extern SCM scm_fdes_to_port (int fdes, char *mode, SCM name);
|
||||
|
|
|
@ -112,6 +112,7 @@
|
|||
#include "libguile/properties.h"
|
||||
#include "libguile/ramap.h"
|
||||
#include "libguile/random.h"
|
||||
#include "libguile/rdelim.h"
|
||||
#include "libguile/read.h"
|
||||
#include "libguile/scmsigs.h"
|
||||
#include "libguile/script.h"
|
||||
|
@ -586,6 +587,11 @@ scm_init_guile_1 (SCM_STACKITEM *base)
|
|||
#endif
|
||||
|
||||
scm_load_startup_files ();
|
||||
|
||||
/* this is located here, not from a deep understanding of the
|
||||
module system, but as a way of avoiding segv and other
|
||||
undesirable side effects that arise from various alternatives. */
|
||||
scm_init_rdelim ();
|
||||
}
|
||||
|
||||
/* Record here whether SCM_BOOT_GUILE_1 has already been called. This
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue