00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030 #include "io_dh.h"
00031 #include "Mat_dh.h"
00032 #include "Vec_dh.h"
00033 #include "Mem_dh.h"
00034 #include "Timer_dh.h"
00035 #include "Parser_dh.h"
00036 #include "mat_dh_private.h"
00037
00038 #undef __FUNC__
00039 #define __FUNC__ "openFile_dh"
00040 FILE *
00041 openFile_dh (const char *filenameIN, const char *modeIN)
00042 {
00043 START_FUNC_DH FILE * fp = NULL;
00044
00045 if ((fp = fopen (filenameIN, modeIN)) == NULL)
00046 {
00047 sprintf (msgBuf_dh, "can't open file: %s for mode %s\n", filenameIN,
00048 modeIN);
00049 SET_ERROR (NULL, msgBuf_dh);
00050 }
00051 END_FUNC_VAL (fp)}
00052
00053 #undef __FUNC__
00054 #define __FUNC__ "closeFile_dh"
00055 void
00056 closeFile_dh (FILE * fpIN)
00057 {
00058 if (fclose (fpIN))
00059 {
00060 SET_V_ERROR ("attempt to close file failed");
00061 }
00062 }
00063
00064
00065 void
00066 io_dh_print_ebin_mat_private (int m, int beg_row,
00067 int *rp, int *cval, double *aval,
00068 int *n2o, int *o2n, Hash_i_dh hash,
00069 char *filename)
00070 {
00071 }
00072
00073 extern void
00074 io_dh_read_ebin_mat_private (int *m, int **rp, int **cval,
00075 double **aval, char *filename)
00076 {
00077 }
00078
00079 void
00080 io_dh_print_ebin_vec_private (int n, int beg_row, double *vals,
00081 int *n2o, int *o2n, Hash_i_dh hash,
00082 char *filename)
00083 {
00084 }
00085
00086 void
00087 io_dh_read_ebin_vec_private (int *n, double **vals, char *filename)
00088 {
00089 }