Added a few more API functions to the Fortran API

This commit is contained in:
Veronica K. B. Olsen 2019-05-14 09:33:08 +02:00
parent 921659b797
commit 5b9e491523
No known key found for this signature in database
GPG Key ID: 3DA1732F448CE703
1 changed files with 12 additions and 0 deletions

View File

@ -103,10 +103,22 @@ void boinc_checkpoint_completed_() {
boinc_checkpoint_completed(); boinc_checkpoint_completed();
} }
void boinc_begin_critical_section_() {
boinc_begin_critical_section();
}
void boinc_end_critical_section_() {
boinc_end_critical_section();
}
void boinc_fraction_done_(double* d) { void boinc_fraction_done_(double* d) {
boinc_fraction_done(*d); boinc_fraction_done(*d);
} }
void boinc_get_fraction_done_(double* d) {
*d = boinc_get_fraction_done();
}
void boinc_wu_cpu_time_(double* d_out) { void boinc_wu_cpu_time_(double* d_out) {
boinc_wu_cpu_time(*d_out); boinc_wu_cpu_time(*d_out);
} }