source: git/Singular/slInit_Static.cc @ 6ce030f

jengelh-datetimespielwiese
Last change on this file since 6ce030f was 6ce030f, checked in by Oleksandr Motsak <motsak@…>, 11 years ago
removal of the $Id$ svn tag from everywhere NOTE: the git SHA1 may be used instead (only on special places) NOTE: the libraries Singular/LIB/*.lib still contain the marker due to our current use of svn
  • Property mode set to 100644
File size: 1.8 KB
Line 
1/****************************************
2*  Computer Algebra System SINGULAR     *
3****************************************/
4/***************************************************************
5 *  File:    slInit_Static.cc
6 *  Purpose: link initialization for static linking
7 *  Author:  obachman (Olaf Bachmann)
8 *  Created: 12/00
9 *******************************************************************/
10
11/***************************************************************
12 *
13 * MP link Extension inits
14 *
15 ***************************************************************/
16#include "config.h"
17#include <kernel/mod2.h>
18
19#include <Singular/silink.h>
20#include <Singular/slInit.h>
21
22#ifdef HAVE_MPSR
23
24#include <MP.h>
25#include <Singular/mpsr_sl.h>
26
27extern void mpsr_Init();
28
29si_link_extension slInitMPFileExtension(si_link_extension s)
30{
31  mpsr_Init();
32  s->Open=slOpenMPFile;
33  s->Close=slCloseMP;
34  s->Kill=slCloseMP;
35  s->Read=slReadMP;
36  s->Dump=slDumpMP;
37  s->GetDump=slGetDumpMP;
38  s->Write=slWriteMP;
39  s->Status=slStatusMP;
40  s->type="MPfile";
41  return s;
42}
43
44si_link_extension slInitMPTcpExtension(si_link_extension s)
45{
46  mpsr_Init();
47  s->Open=slOpenMPTcp;
48  s->Close=slCloseMP;
49  s->Kill=slKillMP;
50  s->Read=slReadMP;
51  s->Dump=slDumpMP;
52  s->GetDump=slGetDumpMP;
53  s->Write=slWriteMP;
54  s->Status=slStatusMP;
55  s->type="MPtcp";
56  return s;
57}
58
59BatchDoProc slInitMPBatchDo()
60{
61  mpsr_Init();
62  return Batch_do;
63}
64#endif
65
66#ifdef HAVE_DBM
67
68# ifndef USE_GDBM
69#   include <Singular/dbm_sl.h>
70# else
71#   include <Singular/sing_dbm.h>
72#endif
73
74si_link_extension slInitDBMExtension(si_link_extension s)
75{
76  s->Open=dbOpen;
77  s->Close=dbClose;
78  s->Kill=dbClose;
79  s->Read=dbRead1;
80  s->Read2=dbRead2;
81  s->Write=dbWrite;
82  s->Status=slStatusAscii;
83  s->type="DBM";
84  return s;
85}
86#endif /* #ifdef HAVE_DBM */
Note: See TracBrowser for help on using the repository browser.