comp-chem/cp2k
1
0
Fork 0
mirror of https://github.com/cp2k/cp2k.git synced 2026-07-28 14:15:19 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fixed Dashboard

Browse source 
- Fixed line-truncation (#4461).
- Fixed GCC 8/9/10 (#4460).
This commit is contained in:
Hans Pabst 2025-10-02 08:12:47 +02:00
parent e966546746
commit 67ae283c5d
2 changed files with 5 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/dbm/dbm_miniapp.c
View file

@ -26,7 +26,8 @@
* \brief Wrapper for printf, passed to dbm_library_print_stats.
* \author Ole Schuett
******************************************************************************/
static void print_func(const char *msg, int /*msglen*/, int output_unit) {
static void print_func(const char *msg, int msglen, int output_unit) {
(void)msglen; // mark used
if (output_unit == 0) { // i.e. my_rank == 0
printf("%s", msg);
}

4
src/pao_model.F
View file

@ -358,7 +358,9 @@ CONTAINS
NULLIFY (predicted_xblock)
CALL torch_dict_get(model_outputs, "xblock", predicted_xblock_tensor)
CALL torch_tensor_data_ptr(predicted_xblock_tensor, predicted_xblock)
CPASSERT(SIZE(predicted_xblock, 1) == n .AND. SIZE(predicted_xblock, 2) == m .AND. SIZE(predicted_xblock, 3) == 1)
CPASSERT(SIZE(predicted_xblock, 1) == n)
CPASSERT(SIZE(predicted_xblock, 2) == m)
CPASSERT(SIZE(predicted_xblock, 3) == 1)
IF (PRESENT(block_X)) THEN
block_X = RESHAPE(predicted_xblock, [n*m, 1])
END IF