Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Server maintenance on Tue 24.5. at 12:00.
Estimated downtime less than 30 minutes.
Open sidebar
Vesa Oikonen
tpcclib
Commits
be044821
Commit
be044821
authored
Feb 04, 2021
by
Vesa Oikonen
Browse files
more header content
parent
b1d4f321
Changes
1
Hide whitespace changes
Inline
Side-by-side
v2/tacfits/fit_dexp.c
View file @
be044821
...
...
@@ -584,9 +584,21 @@ int main(int argc, char **argv)
/* Print and save */
if
(
verbose
>
0
)
parWrite
(
&
par
,
stdout
,
PAR_FORMAT_TSV_UK
,
1
,
NULL
);
if
(
parfile
[
0
])
{
/* Set file format */
par
.
format
=
parFormatFromExtension
(
parfile
);
if
(
verbose
>
2
)
printf
(
"parameter file format := %s
\n
"
,
parFormattxt
(
par
.
format
));
if
(
par
.
format
==
PAR_FORMAT_UNKNOWN
)
par
.
format
=
PAR_FORMAT_FIT
;
/* set header contents */
{
iftPut
(
&
par
.
h
,
"datafile"
,
tacfile
,
0
,
NULL
);
{
char
buf
[
256
];
time_t
t
=
time
(
NULL
);
iftPut
(
&
par
.
h
,
"analysis_time"
,
ctime_r_int
(
&
t
,
buf
),
0
,
NULL
);
tpcProgramName
(
argv
[
0
],
1
,
1
,
buf
,
256
);
iftPut
(
&
par
.
h
,
"program"
,
buf
,
0
,
NULL
);
}
}
/* Save file */
if
(
verbose
>
1
)
printf
(
" saving %s
\n
"
,
parfile
);
FILE
*
fp
=
fopen
(
parfile
,
"w"
);
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a 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