* Provide foo.so, not foo.o.
git-svn-id: svn://svn.zoy.org/elk/trunk@84 55e467fa-43c5-0310-a8a2-de718669efc6
This commit is contained in:
parent
306455fc25
commit
70f8be7a33
|
@ -563,5 +563,4 @@ void elk_init_lib_bitstring() {
|
||||||
Def_Prim(P_Bitstring_Xor, "bitstring-xor!", 2, 2, EVAL);
|
Def_Prim(P_Bitstring_Xor, "bitstring-xor!", 2, 2, EVAL);
|
||||||
Def_Prim(P_Substring_Move, "bitstring-substring-move!", 5, 5, EVAL);
|
Def_Prim(P_Substring_Move, "bitstring-substring-move!", 5, 5, EVAL);
|
||||||
P_Provide (Intern ("bitstring.so"));
|
P_Provide (Intern ("bitstring.so"));
|
||||||
P_Provide (Intern ("bitstring.o"));
|
|
||||||
}
|
}
|
||||||
|
|
|
@ -288,5 +288,4 @@ void elk_init_lib_gdbm () {
|
||||||
sizeof (struct S_gdbm_fh), Gdbm_fh_Equal, Gdbm_fh_Equal,
|
sizeof (struct S_gdbm_fh), Gdbm_fh_Equal, Gdbm_fh_Equal,
|
||||||
Gdbm_fh_Print, NOFUNC);
|
Gdbm_fh_Print, NOFUNC);
|
||||||
P_Provide (Intern ("gdbm.so"));
|
P_Provide (Intern ("gdbm.so"));
|
||||||
P_Provide (Intern ("gdbm.o"));
|
|
||||||
}
|
}
|
||||||
|
|
|
@ -41,5 +41,4 @@ void elk_init_lib_hack () {
|
||||||
Define_Primitive (P_Hack_Procedure_Environment,
|
Define_Primitive (P_Hack_Procedure_Environment,
|
||||||
"hack-procedure-environment!", 2, 2, EVAL);
|
"hack-procedure-environment!", 2, 2, EVAL);
|
||||||
P_Provide (Intern ("hack.so"));
|
P_Provide (Intern ("hack.so"));
|
||||||
P_Provide (Intern ("hack.o"));
|
|
||||||
}
|
}
|
||||||
|
|
|
@ -169,5 +169,4 @@ void elk_init_lib_record () {
|
||||||
Def_Prim (P_Record_Values, "record-values", 1, 1, EVAL);
|
Def_Prim (P_Record_Values, "record-values", 1, 1, EVAL);
|
||||||
Def_Prim (P_Make_Record, "make-record", 2, 2, EVAL);
|
Def_Prim (P_Make_Record, "make-record", 2, 2, EVAL);
|
||||||
P_Provide (Intern ("record.so"));
|
P_Provide (Intern ("record.so"));
|
||||||
P_Provide (Intern ("record.o"));
|
|
||||||
}
|
}
|
||||||
|
|
|
@ -250,5 +250,4 @@ void elk_init_lib_regexp() {
|
||||||
P_Provide(Intern(":regular-expressions"));
|
P_Provide(Intern(":regular-expressions"));
|
||||||
#endif
|
#endif
|
||||||
P_Provide(Intern ("regexp.so"));
|
P_Provide(Intern ("regexp.so"));
|
||||||
P_Provide(Intern ("regexp.o"));
|
|
||||||
}
|
}
|
||||||
|
|
|
@ -139,5 +139,4 @@ void elk_init_lib_struct () {
|
||||||
Define_Primitive (P_Structure_Set, "structure-set!", 4, 4, EVAL);
|
Define_Primitive (P_Structure_Set, "structure-set!", 4, 4, EVAL);
|
||||||
Define_Primitive (P_Make_Structure, "make-structure", 2, 2, EVAL);
|
Define_Primitive (P_Make_Structure, "make-structure", 2, 2, EVAL);
|
||||||
P_Provide (Intern ("struct.so"));
|
P_Provide (Intern ("struct.so"));
|
||||||
P_Provide (Intern ("struct.o"));
|
|
||||||
}
|
}
|
||||||
|
|
|
@ -65,5 +65,4 @@ void Check_Result_Vector(x, len) Object x; {
|
||||||
|
|
||||||
elk_init_unix_unix() {
|
elk_init_unix_unix() {
|
||||||
P_Provide(Intern("unix.so"));
|
P_Provide(Intern("unix.so"));
|
||||||
P_Provide(Intern("unix.o"));
|
|
||||||
}
|
}
|
||||||
|
|
|
@ -58,7 +58,6 @@ elk_init_xlib_init () {
|
||||||
Define_Primitive (P_Xlib_Release_6_Or_Laterp,
|
Define_Primitive (P_Xlib_Release_6_Or_Laterp,
|
||||||
"xlib-release-6-or-later?", 0, 0, EVAL);
|
"xlib-release-6-or-later?", 0, 0, EVAL);
|
||||||
P_Provide (Intern ("xlib.so"));
|
P_Provide (Intern ("xlib.so"));
|
||||||
P_Provide (Intern ("xlib.o"));
|
|
||||||
}
|
}
|
||||||
|
|
||||||
#if defined(XLIB_RELEASE_5_OR_LATER) && (defined(sun) || defined(__sun__)) &&\
|
#if defined(XLIB_RELEASE_5_OR_LATER) && (defined(sun) || defined(__sun__)) &&\
|
||||||
|
|
|
@ -74,5 +74,4 @@ elk_init_xt_init () {
|
||||||
0, 0, EVAL);
|
0, 0, EVAL);
|
||||||
XtToolkitInitialize ();
|
XtToolkitInitialize ();
|
||||||
P_Provide (Intern ("xt.so"));
|
P_Provide (Intern ("xt.so"));
|
||||||
P_Provide (Intern ("xt.o"));
|
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue