* 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:
sam 2003-09-04 11:26:55 +00:00
parent 306455fc25
commit 70f8be7a33
9 changed files with 0 additions and 9 deletions

View File

@ -563,5 +563,4 @@ void elk_init_lib_bitstring() {
Def_Prim(P_Bitstring_Xor, "bitstring-xor!", 2, 2, EVAL);
Def_Prim(P_Substring_Move, "bitstring-substring-move!", 5, 5, EVAL);
P_Provide (Intern ("bitstring.so"));
P_Provide (Intern ("bitstring.o"));
}

View File

@ -288,5 +288,4 @@ void elk_init_lib_gdbm () {
sizeof (struct S_gdbm_fh), Gdbm_fh_Equal, Gdbm_fh_Equal,
Gdbm_fh_Print, NOFUNC);
P_Provide (Intern ("gdbm.so"));
P_Provide (Intern ("gdbm.o"));
}

View File

@ -41,5 +41,4 @@ void elk_init_lib_hack () {
Define_Primitive (P_Hack_Procedure_Environment,
"hack-procedure-environment!", 2, 2, EVAL);
P_Provide (Intern ("hack.so"));
P_Provide (Intern ("hack.o"));
}

View File

@ -169,5 +169,4 @@ void elk_init_lib_record () {
Def_Prim (P_Record_Values, "record-values", 1, 1, EVAL);
Def_Prim (P_Make_Record, "make-record", 2, 2, EVAL);
P_Provide (Intern ("record.so"));
P_Provide (Intern ("record.o"));
}

View File

@ -250,5 +250,4 @@ void elk_init_lib_regexp() {
P_Provide(Intern(":regular-expressions"));
#endif
P_Provide(Intern ("regexp.so"));
P_Provide(Intern ("regexp.o"));
}

View File

@ -139,5 +139,4 @@ void elk_init_lib_struct () {
Define_Primitive (P_Structure_Set, "structure-set!", 4, 4, EVAL);
Define_Primitive (P_Make_Structure, "make-structure", 2, 2, EVAL);
P_Provide (Intern ("struct.so"));
P_Provide (Intern ("struct.o"));
}

View File

@ -65,5 +65,4 @@ void Check_Result_Vector(x, len) Object x; {
elk_init_unix_unix() {
P_Provide(Intern("unix.so"));
P_Provide(Intern("unix.o"));
}

View File

@ -58,7 +58,6 @@ elk_init_xlib_init () {
Define_Primitive (P_Xlib_Release_6_Or_Laterp,
"xlib-release-6-or-later?", 0, 0, EVAL);
P_Provide (Intern ("xlib.so"));
P_Provide (Intern ("xlib.o"));
}
#if defined(XLIB_RELEASE_5_OR_LATER) && (defined(sun) || defined(__sun__)) &&\

View File

@ -74,5 +74,4 @@ elk_init_xt_init () {
0, 0, EVAL);
XtToolkitInitialize ();
P_Provide (Intern ("xt.so"));
P_Provide (Intern ("xt.o"));
}