STY: Use TABLE_ENTRY for the max length of the KPP names

I think there's a way to pass this as a parameter to snprintf instead, but I don't remember what that is at the moment.
DWesl · Jan 25, 2024 · 47e8e94 · 47e8e94
1 parent 35dfa23
commit 47e8e94
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/tools/gen_irr_diag.c b/tools/gen_irr_diag.c
@@ -271,9 +271,9 @@ int irr_diag_scalar_indices( char *dirname )
    sprintf( line,"  chm_opts_ndx(:nchm_opts) = (/ ");
    for( i = 0; i < nChmOpts; i++ ) {
      if( i == 0 ) 
-       snprintf( piece,135,"%.128s_kpp",chm_scheme[i]);
+       snprintf( piece,TABLE_ENTRY+EXTRA_FOR_DEST_BUFFER,"%." #TABLE_ENTRY "s_kpp",chm_scheme[i]);
      else
-       snprintf( piece,135," ,%.128s_kpp",chm_scheme[i]);
+       snprintf( piece,TABLE_ENTRY+EXTRA_FOR_DEST_BUFFER," ,%." #TABLE_ENTRY "s_kpp",chm_scheme[i]);
      strcat( line,piece );
    }
    strcat( line," /)\n" );