Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
mpim-sw
libcdi
Commits
f19009a1
Commit
f19009a1
authored
Nov 19, 2013
by
Thomas Jahns
🤸
Browse files
Declare filename prefix const.
parent
93e16a7c
Changes
1
Hide whitespace changes
Inline
Side-by-side
tests/simple_model.c
View file @
f19009a1
...
...
@@ -71,7 +71,7 @@ void
modelRun
(
struct
model_config
setup
,
MPI_Comm
comm
)
{
static
int
varCodes
[
nVars
]
=
{
129
,
130
,
131
,
132
,
133
};
static
c
har
*
name
=
"example"
;
static
c
onst
char
*
const
fname_prefix
=
"example"
;
int
gridID
,
zaxisID
[
nVars
],
taxisID
;
int
vlistID
,
varIDs
[
nVars
],
streamID
,
tsID
,
tfID
=
0
;
...
...
@@ -188,7 +188,7 @@ modelRun(struct model_config setup, MPI_Comm comm)
taxisID
=
taxisCreate
(
TAXIS_ABSOLUTE
);
vlistDefTaxis
(
vlistID
,
taxisID
);
sprintf
(
&
filename
[
0
],
"%s_%d.%s"
,
name
,
tfID
,
setup
.
suffix
);
sprintf
(
&
filename
[
0
],
"%s_%d.%s"
,
f
name
_prefix
,
tfID
,
setup
.
suffix
);
streamID
=
streamOpenWrite
(
filename
,
setup
.
filetype
);
xassert
(
streamID
>=
0
);
streamDefVlist
(
streamID
,
vlistID
);
...
...
@@ -203,7 +203,7 @@ modelRun(struct model_config setup, MPI_Comm comm)
if
(
tfID
>
0
)
{
streamClose
(
streamID
);
sprintf
(
&
filename
[
0
],
"%s_%d.%s"
,
name
,
tfID
,
setup
.
suffix
);
sprintf
(
&
filename
[
0
],
"%s_%d.%s"
,
f
name
_prefix
,
tfID
,
setup
.
suffix
);
streamID
=
streamOpenWrite
(
filename
,
setup
.
filetype
);
xassert
(
streamID
>=
0
);
streamDefVlist
(
streamID
,
vlistID
);
...
...
@@ -276,7 +276,7 @@ modelRun(struct model_config setup, MPI_Comm comm)
{
FILE
*
tablefp
;
{
sprintf
(
filename
,
"%s_%d.cksum"
,
name
,
tfID
);
sprintf
(
filename
,
"%s_%d.cksum"
,
f
name
_prefix
,
tfID
);
if
(
!
(
tablefp
=
fopen
(
filename
,
"w"
)))
{
perror
(
"failed to open table file"
);
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment