source: git/Singular/slInit_Static.cc @ cf11cb

spielwiese
Last change on this file since cf11cb was cf11cb, checked in by Hans Schoenemann <hannes@…>, 13 years ago
fix path git-svn-id: file:///usr/local/Singular/svn/trunk@13050 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 1.7 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 *  Version: $Id$
10 *******************************************************************/
11
12/***************************************************************
13 *
14 * MP link Extension inits
15 *
16 ***************************************************************/
17#include <Singular/mod2.h>
18#include <Singular/silink.h>
19#include <Singular/slInit.h>
20
21#ifdef HAVE_MPSR
22
23#include <MP.h>
24#include <Singular/mpsr_sl.h>
25
26extern void mpsr_Init();
27
28si_link_extension slInitMPFileExtension(si_link_extension s)
29{
30  mpsr_Init();
31  s->Open=slOpenMPFile;
32  s->Close=slCloseMP;
33  s->Kill=slCloseMP;
34  s->Read=slReadMP;
35  s->Dump=slDumpMP;
36  s->GetDump=slGetDumpMP;
37  s->Write=slWriteMP;
38  s->Status=slStatusMP;
39  s->type="MPfile";
40  return s;
41}
42
43si_link_extension slInitMPTcpExtension(si_link_extension s)
44{
45  mpsr_Init();
46  s->Open=slOpenMPTcp;
47  s->Close=slCloseMP;
48  s->Kill=slKillMP;
49  s->Read=slReadMP;
50  s->Dump=slDumpMP;
51  s->GetDump=slGetDumpMP;
52  s->Write=slWriteMP;
53  s->Status=slStatusMP;
54  s->type="MPtcp";
55  return s;
56}
57
58BatchDoProc slInitMPBatchDo()
59{
60  mpsr_Init();
61  return Batch_do;
62}
63#endif
64
65#ifdef HAVE_DBM
66#ifndef USE_GDBM
67#include <Singular/dbm_sl.h>
68#else
69#include <Singular/sing_dbm.h>
70#endif
71si_link_extension slInitDBMExtension(si_link_extension s)
72{
73  s->Open=dbOpen;
74  s->Close=dbClose;
75  s->Kill=dbClose;
76  s->Read=dbRead1;
77  s->Read2=dbRead2;
78  s->Write=dbWrite;
79  s->Status=slStatusAscii;
80  s->type="DBM";
81  return s;
82}
83#endif
Note: See TracBrowser for help on using the repository browser.