blob: 2aee8e4e6640f6500a1d12290b44959ec1205b6a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
#include <stdlib.h>
#include "cctk.h"
#include "cctk_FortranString.h"
#include "CactusBase/IOUtil/src/ioutil_AdvertisedFiles.h"
void CCTK_FCALL CCTK_FNAME(Extract_Advertise)
(cGH *GH, ONE_FORTSTRING_ARG);
void CCTK_FCALL CCTK_FNAME(Extract_Advertise)
(cGH *GH, ONE_FORTSTRING_ARG)
{
ONE_FORTSTRING_CREATE(file)
/* advertise new files for downloading */
ioAdvertisedFileDesc advertisedFile;
advertisedFile.slice = "";
advertisedFile.thorn = CCTK_THORNSTRING;
advertisedFile.varname = "Waveform";
advertisedFile.description = "Extract files";
advertisedFile.mimetype = "application/x-graph";
IOUtil_AdvertiseFile (GH, file, &advertisedFile);
free(file);
}
|