Changeset 7731 for branches/UKMO/dev_r5518_v3.6_asm_nemovar_community/NEMOGCM/EXTERNAL/AGRIF/LIB/WorkWithlistmoduleinfile.c
- Timestamp:
- 2017-02-23T14:23:32+01:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_v3.6_asm_nemovar_community/NEMOGCM/EXTERNAL/AGRIF/LIB/WorkWithlistmoduleinfile.c
r7730 r7731 38 38 #include "decl.h" 39 39 40 void Save_Length(c har *nom, int whichone)40 void Save_Length(const char *nom, int whichone) 41 41 { 42 if ( whichone == 1 && strlen(nom) > length_last ) 42 size_t len_nom = strlen(nom); 43 44 if ( whichone == 1 && len_nom > length_last ) 43 45 { 44 length_last = strlen(nom); 45 if ( length_last > LONG_C ) 46 { 47 printf("WARNING 1 : The value of LONG_C - define in decl.h -\n"); 48 printf(" should be upgrated to %d\n",length_last+100); 49 } 46 length_last = len_nom; 47 if ( length_last > LONG_M ) 48 printf("WARNING 1 : The value of LONG_M (defined in decl.h) should be upgrated to %lu\n", length_last+100); 50 49 } 51 if ( whichone == 2 && strlen(nom)> length_first )50 if ( whichone == 2 && len_nom > length_first ) 52 51 { 53 length_first = strlen(nom); 54 if ( length_first > LONG_C ) 55 { 56 printf("WARNING 2 : The value of LONG_C - define in decl.h -\n"); 57 printf(" should be upgrated to %d\n",length_first+100); 58 } 52 length_first = len_nom; 53 if ( length_first > LONG_M ) 54 printf("WARNING 2 : The value of LONG_M (defined in decl.h) should be upgrated to %lu\n", length_first+100); 59 55 } 60 if ( whichone == 3 && strlen(nom) > length_v_typevar)56 if ( whichone == 8 && len_nom > length_v_vallengspec ) 61 57 { 62 length_v_typevar = strlen(nom); 63 if ( length_v_typevar > LONG_C ) 64 { 65 printf("WARNING 3 : The value of LONG_C - define in decl.h -\n"); 66 printf(" should be upgrated to %d\n",length_v_typevar+100); 67 } 58 length_v_vallengspec = len_nom; 59 if ( length_v_vallengspec > LONG_M ) 60 printf("WARNING 8 : The value of LONG_M (defined in decl.h) should be upgrated to %lu\n", length_v_vallengspec+100); 68 61 } 69 if ( whichone == 4 && strlen(nom) > length_v_nomvar)62 if ( whichone == 12 && len_nom > length_v_precision ) 70 63 { 71 length_v_nomvar = strlen(nom); 72 if ( length_v_nomvar > LONG_C ) 73 { 74 printf("WARNING 4 : The value of LONG_C - define in decl.h -\n"); 75 printf(" should be upgrated to %d\n",length_v_nomvar+100); 76 } 64 length_v_precision = len_nom; 65 if ( length_v_precision > LONG_M ) 66 printf("WARNING 12 : The value of LONG_M (defined in decl.h) should be upgrated to %lu\n", length_v_precision+100); 77 67 } 78 if ( whichone == 5 && strlen(nom) > length_v_dimchar)68 if ( whichone == 13 && len_nom > length_v_IntentSpec ) 79 69 { 80 length_v_dimchar = strlen(nom); 81 if ( length_v_dimchar > LONG_C ) 82 { 83 printf("WARNING 5 : The value of LONG_C - define in decl.h -\n"); 84 printf(" should be upgrated to %d\n", 85 length_v_dimchar+100); 86 } 70 length_v_IntentSpec = len_nom; 71 if ( length_v_IntentSpec > LONG_M ) 72 printf("WARNING 13 : The value of LONG_M (defined in decl.h) should be upgrated to %lu\n", length_v_IntentSpec+100); 87 73 } 88 if ( whichone == 6 && strlen(nom) > length_v_modulename )74 if ( whichone == 14 && len_nom > length_v_initialvalue ) 89 75 { 90 length_v_modulename = strlen(nom); 91 if ( length_v_modulename > LONG_C ) 92 { 93 printf("WARNING 6 : The value of LONG_C - define in decl.h -\n"); 94 printf(" should be upgrated to %d\n", 95 length_v_modulename+100); 96 } 76 length_v_initialvalue = len_nom; 77 if ( length_v_initialvalue > LONG_M ) 78 printf("WARNING 14 : The value of LONG_M (defined in decl.h) should be upgrated to %lu\n", length_v_initialvalue+100); 97 79 } 98 if ( whichone == 7 && strlen(nom) > length_v_commonname)80 if ( whichone == 15 && len_nom > length_v_readedlistdimension ) 99 81 { 100 length_v_commonname = strlen(nom); 101 if ( length_v_commonname > LONG_C ) 102 { 103 printf("WARNING 7 : The value of LONG_C - define in decl.h -\n"); 104 printf(" should be upgrated to %d\n", 105 length_v_commonname+100); 106 } 82 length_v_readedlistdimension = len_nom; 83 if ( length_v_readedlistdimension > LONG_M ) 84 printf("WARNING 15 : The value of LONG_M (defined in decl.h) should be upgrated to %lu\n", length_v_readedlistdimension+100); 107 85 } 108 if ( whichone == 8 && strlen(nom) > length_v_vallengspec)86 if ( whichone == 25 && len_nom > length_a_nomvar ) 109 87 { 110 length_v_vallengspec = strlen(nom); 111 if ( length_v_vallengspec > LONG_C ) 112 { 113 printf("WARNING 8 : The value of LONG_C - define in decl.h -\n"); 114 printf(" should be upgrated to %d\n", 115 length_v_vallengspec+100); 116 } 88 length_a_nomvar = len_nom; 89 if ( length_a_nomvar > LONG_C ) 90 printf("WARNING 25 : The value of LONG_C (defined in decl.h) should be upgrated to %lu\n", length_a_nomvar+100); 117 91 } 118 if ( whichone == 9 && strlen(nom) > length_v_nameinttypename)92 if ( whichone == 39 && len_nom > length_toprintglob ) 119 93 { 120 length_v_nameinttypename = strlen(nom); 121 if ( length_v_nameinttypename > LONG_C ) 122 { 123 printf("WARNING 9 : The value of LONG_C - define in decl.h -\n"); 124 printf(" should be upgrated to %d\n", 125 length_v_nameinttypename+100); 126 } 94 length_toprintglob = len_nom; 95 if ( length_toprintglob > LONG_M ) 96 printf("WARNING 39 : The value of LONG_M (defined in decl.h) should be upgrated to %lu\n", length_toprintglob+100); 127 97 } 128 if ( whichone == 10 && strlen(nom) > length_v_commoninfile )98 if ( whichone == 40 && len_nom > length_tmpvargridname ) 129 99 { 130 length_v_commoninfile = strlen(nom); 131 if ( length_v_commoninfile > LONG_C ) 132 { 133 printf("WARNING 10 : The value of LONG_C - define in decl.h -\n"); 134 printf(" should be upgrated to %d\n", 135 length_v_commoninfile+100); 136 } 100 length_tmpvargridname = len_nom; 101 if ( length_tmpvargridname > LONG_M ) 102 printf("WARNING 40 : The value of LONG_M (defined in decl.h) should be upgrated to %lu\n", length_tmpvargridname+100); 137 103 } 138 if ( whichone == 11 && strlen(nom) > length_v_subroutinename)104 if ( whichone == 41 && len_nom > length_ligne_Subloop ) 139 105 { 140 length_v_subroutinename = strlen(nom); 141 if ( length_v_subroutinename > LONG_C ) 142 { 143 printf("WARNING 11 : The value of LONG_C - define in decl.h -\n"); 144 printf(" should be upgrated to %d\n", 145 length_v_subroutinename+100); 146 } 106 length_ligne_Subloop = len_nom; 107 if ( length_ligne_Subloop > LONG_M ) 108 printf("WARNING 41 : The value of LONG_M (defined in decl.h) should be upgrated to %lu\n",length_ligne_Subloop+100); 147 109 } 148 if ( whichone == 12 && strlen(nom) > length_v_precision)110 if ( whichone == 43 && len_nom > length_toprint_utilagrif ) 149 111 { 150 length_v_precision = strlen(nom); 151 if ( length_v_precision > LONG_C ) 152 { 153 printf("WARNING 12 : The value of LONG_C - define in decl.h -\n"); 154 printf(" should be upgrated to %d\n", 155 length_v_precision+100); 156 } 112 length_toprint_utilagrif = len_nom; 113 if ( length_toprint_utilagrif > LONG_M ) 114 printf("WARNING 43 : The value of LONG_M (defined in decl.h) should be upgrated to %lu\n", length_toprint_utilagrif+100); 157 115 } 158 if ( whichone == 13 && strlen(nom) > length_v_IntentSpec)116 if ( whichone == 44 && len_nom > length_toprinttmp_utilchar ) 159 117 { 160 length_v_IntentSpec = strlen(nom); 161 if ( length_v_IntentSpec > LONG_C ) 162 { 163 printf("WARNING 13 : The value of LONG_C - define in decl.h -\n"); 164 printf(" should be upgrated to %d\n", 165 length_v_IntentSpec+100); 166 } 118 length_toprinttmp_utilchar = len_nom; 119 if ( length_toprinttmp_utilchar > LONG_M) 120 printf("WARNING 44 : The value of LONG_M (defined in decl.h) should be upgrated to %lu\n", length_toprinttmp_utilchar+100); 167 121 } 168 if ( whichone == 14 && strlen(nom) > length_v_initialvalue)122 if ( whichone == 45 && len_nom > length_ligne_writedecl ) 169 123 { 170 length_v_initialvalue = strlen(nom); 171 if ( length_v_initialvalue > LONG_4C ) 172 { 173 printf("WARNING 14 : The value of LONG_4C - define in decl.h -\n"); 174 printf(" should be upgrated to %d\n", 175 length_v_initialvalue+100); 176 } 124 length_ligne_writedecl = len_nom; 125 if ( length_ligne_writedecl > LONG_M ) 126 printf("WARNING 45 : The value of LONG_M (defined in decl.h) should be upgrated to %lu\n", length_ligne_writedecl+100); 177 127 } 178 if ( whichone == 15 && strlen(nom) > length_v_readedlistdimension)128 if ( whichone == 46 && len_nom > length_newname_toamr ) 179 129 { 180 length_v_readedlistdimension = strlen(nom); 181 if ( length_v_readedlistdimension > LONG_C ) 182 { 183 printf("WARNING 15 : The value of LONG_C - define in decl.h -\n"); 184 printf(" should be upgrated to %d\n", 185 length_v_readedlistdimension+100); 186 } 130 length_newname_toamr = len_nom; 131 if ( length_newname_toamr > LONG_C ) 132 printf("WARNING 46 : The value of LONG_C (defined in decl.h) should be upgrated to %lu\n", length_newname_toamr+100); 187 133 } 188 if ( whichone == 16 && strlen(nom) > length_u_usemodule)134 if ( whichone == 47 && len_nom > length_newname_writedecl ) 189 135 { 190 length_u_usemodule = strlen(nom); 191 if ( length_u_usemodule > LONG_C ) 192 { 193 printf("WARNING 16 : The value of LONG_C - define in decl.h -\n"); 194 printf(" should be upgrated to %d\n", 195 length_u_usemodule+100); 196 } 136 length_newname_writedecl = len_nom; 137 if ( length_newname_writedecl > LONG_M ) 138 printf("WARNING 47 : The value of LONG_M (defined in decl.h) should be upgrated to %lu\n", length_newname_writedecl +100); 197 139 } 198 if ( whichone == 17 && strlen(nom) > length_u_charusemodule)140 if ( whichone == 48 && len_nom > length_ligne_toamr ) 199 141 { 200 length_u_charusemodule = strlen(nom); 201 if ( length_u_charusemodule > LONG_C ) 202 { 203 printf("WARNING 17 : The value of LONG_C - define in decl.h -\n"); 204 printf(" should be upgrated to %d\n", 205 length_u_charusemodule+100); 206 } 142 length_ligne_toamr = len_nom; 143 if ( length_ligne_toamr > LONG_M ) 144 printf("WARNING 48 : The value of LONG_M (defined in decl.h) should be upgrated to %lu\n", length_ligne_toamr +100); 207 145 } 208 if ( whichone == 18 && strlen(nom) > length_u_cursubroutine)146 if ( whichone == 49 && len_nom > length_tmpligne_writedecl ) 209 147 { 210 length_u_cursubroutine = strlen(nom); 211 if ( length_u_cursubroutine > LONG_C ) 212 { 213 printf("WARNING 18 : The value of LONG_C - define in decl.h -\n"); 214 printf(" should be upgrated to %d\n", 215 length_u_cursubroutine+100); 216 } 217 } 218 if ( whichone == 19 && strlen(nom) > length_u_modulename ) 219 { 220 length_u_modulename = strlen(nom); 221 if ( length_u_modulename > LONG_C ) 222 { 223 printf("WARNING 19 : The value of LONG_C - define in decl.h -\n"); 224 printf(" should be upgrated to %d\n", 225 length_u_modulename+100); 226 } 227 } 228 if ( whichone == 20 && strlen(nom) > length_n_name ) 229 { 230 length_n_name = strlen(nom); 231 if ( length_n_name > LONG_C ) 232 { 233 printf("WARNING 20 : The value of LONG_C - define in decl.h -\n"); 234 printf(" should be upgrated to %d\n",length_n_name+100); 235 } 236 } 237 if ( whichone == 21 && strlen(nom) > length_c_namevar ) 238 { 239 length_c_namevar = strlen(nom); 240 if ( length_c_namevar > LONG_C ) 241 { 242 printf("WARNING 21 : The value of LONG_C - define in decl.h -\n"); 243 printf(" should be upgrated to %d\n",length_c_namevar+100); 244 } 245 } 246 if ( whichone == 22 && strlen(nom) > length_c_namepointedvar ) 247 { 248 length_c_namepointedvar = strlen(nom); 249 if ( length_c_namepointedvar > LONG_C ) 250 { 251 printf("WARNING 22 : The value of LONG_C - define in decl.h -\n"); 252 printf(" should be upgrated to %d\n", 253 length_c_namepointedvar+100); 254 } 255 } 256 if ( whichone == 23 && strlen(nom) > length_o_nom ) 257 { 258 length_o_nom = strlen(nom); 259 if ( length_o_nom > LONG_C ) 260 { 261 printf("WARNING 23 : The value of LONG_C - define in decl.h -\n"); 262 printf(" should be upgrated to %d\n",length_o_nom+100); 263 } 264 } 265 if ( whichone == 24 && strlen(nom) > length_o_module ) 266 { 267 length_o_module = strlen(nom); 268 if ( length_o_module > LONG_C ) 269 { 270 printf("WARNING 24 : The value of LONG_C - define in decl.h -\n"); 271 printf(" should be upgrated to %d\n",length_o_module+100); 272 } 273 } 274 if ( whichone == 25 && strlen(nom) > length_a_nomvar ) 275 { 276 length_a_nomvar = strlen(nom); 277 if ( length_a_nomvar > LONG_C ) 278 { 279 printf("WARNING 25 : The value of LONG_C - define in decl.h -\n"); 280 printf(" should be upgrated to %d\n",length_a_nomvar+100); 281 } 282 } 283 if ( whichone == 26 && strlen(nom) > length_a_subroutine ) 284 { 285 length_a_subroutine = strlen(nom); 286 if ( length_a_subroutine > LONG_C ) 287 { 288 printf("WARNING 26 : The value of LONG_C - define in decl.h -\n"); 289 printf(" should be upgrated to %d\n", 290 length_a_subroutine+100); 291 } 292 } 293 if ( whichone == 27 && strlen(nom) > length_a_module ) 294 { 295 length_a_module = strlen(nom); 296 if ( length_a_module > LONG_C ) 297 { 298 printf("WARNING 27 : The value of LONG_C - define in decl.h -\n"); 299 printf(" should be upgrated to %d\n",length_a_module+100); 300 } 301 } 302 if ( whichone == 28 && strlen(nom) > length_t_usemodule ) 303 { 304 length_t_usemodule = strlen(nom); 305 if ( length_t_usemodule > LONG_C ) 306 { 307 printf("WARNING 28 : The value of LONG_C - define in decl.h -\n"); 308 printf(" should be upgrated to %d\n", 309 length_t_usemodule+100); 310 } 311 } 312 if ( whichone == 29 && strlen(nom) > length_t_cursubroutine ) 313 { 314 length_t_cursubroutine = strlen(nom); 315 if ( length_t_cursubroutine > LONG_C ) 316 { 317 printf("WARNING 29 : The value of LONG_C - define in decl.h -\n"); 318 printf(" should be upgrated to %d\n", 319 length_t_cursubroutine+100); 320 } 321 } 322 if ( whichone == 30 && strlen(nom) > length_curfilename ) 323 { 324 length_curfilename = strlen(nom); 325 if (length_curfilename > LONG_C ) 326 { 327 printf("WARNING 30 : The value of LONG_C - define in decl.h -\n"); 328 printf(" should be upgrated to %d\n", 329 length_curfilename+100); 330 } 331 } 332 if ( whichone == 31 && strlen(nom) > length_nomfileoutput ) 333 { 334 length_nomfileoutput = strlen(nom); 335 if ( length_nomfileoutput > LONG_C ) 336 { 337 printf("WARNING 31 : The value of LONG_C - define in decl.h -\n"); 338 printf(" should be upgrated to %d\n", 339 length_nomfileoutput+100); 340 } 341 } 342 if ( whichone == 32 && strlen(nom) > length_motparse ) 343 { 344 length_motparse = strlen(nom); 345 if ( length_motparse > LONG_4C ) 346 { 347 printf("WARNING 32 : The value of LONG_4C - define in decl.h -\n"); 348 printf(" should be upgrated to %d\n",length_motparse+100); 349 } 350 } 351 if ( whichone == 33 && strlen(nom) > length_mainfile ) 352 { 353 length_mainfile = strlen(nom); 354 if ( length_mainfile > LONG_C ) 355 { 356 printf("WARNING 33 : The value of LONG_C - define in decl.h -\n"); 357 printf(" should be upgrated to %d\n",length_mainfile+100); 358 } 359 } 360 if ( whichone == 34 && strlen(nom) > length_nomdir ) 361 { 362 length_nomdir = strlen(nom); 363 if ( length_nomdir > LONG_C ) 364 { 365 printf("WARNING 34 : The value of LONG_C - define in decl.h -\n"); 366 printf(" should be upgrated to %d\n",length_nomdir+100); 367 } 368 } 369 if ( whichone == 35 && strlen(nom) > length_commondirout ) 370 { 371 length_commondirout = strlen(nom); 372 if ( length_commondirout > LONG_C ) 373 { 374 printf("WARNING 35 : The value of LONG_C - define in decl.h -\n"); 375 printf(" should be upgrated to %d\n", 376 length_commondirout+100); 377 } 378 } 379 if ( whichone == 36 && strlen(nom) > length_commondirin ) 380 { 381 length_commondirin = strlen(nom); 382 if ( length_commondirin > LONG_C ) 383 { 384 printf("WARNING 36 : The value of LONG_C - define in decl.h -\n"); 385 printf(" should be upgrated to %d\n", 386 length_commondirin+100); 387 } 388 } 389 if ( whichone == 37 && strlen(nom) > length_filetoparse ) 390 { 391 length_filetoparse = strlen(nom); 392 if ( length_filetoparse > LONG_C ) 393 { 394 printf("WARNING 37 : The value of LONG_C - define in decl.h -\n"); 395 printf(" should be upgrated to %d\n", 396 length_filetoparse+100); 397 } 398 } 399 if ( whichone == 38 && strlen(nom) > length_curbuf ) 400 { 401 length_curbuf = strlen(nom); 402 if ( length_curbuf > LONG_40M ) 403 { 404 printf("WARNING 38 : The value of LONG_40M - define in decl.h -\n"); 405 printf(" should be upgrated to %d\n",length_curbuf+100); 406 } 407 } 408 if ( whichone == 39 && strlen(nom) > length_toprintglob ) 409 { 410 length_toprintglob = strlen(nom); 411 if ( length_toprintglob > LONG_4C ) 412 { 413 printf("WARNING 39 : The value of LONG_4C - define in decl.h -\n"); 414 printf(" should be upgrated to %d\n", 415 length_toprintglob+100); 416 } 417 } 418 if ( whichone == 40 && strlen(nom) > length_tmpvargridname ) 419 { 420 length_tmpvargridname = strlen(nom); 421 if ( length_tmpvargridname > LONG_4C ) 422 { 423 printf("WARNING 40 : The value of LONG_4C - define in decl.h -\n"); 424 printf(" should be upgrated to %d\n", 425 length_tmpvargridname+100); 426 } 427 } 428 if ( whichone == 41 && strlen(nom) > length_ligne_Subloop ) 429 { 430 length_ligne_Subloop = strlen(nom); 431 if ( length_ligne_Subloop > LONG_40M ) 432 { 433 printf("WARNING 41 : The value of LONG_40M - define in decl.h -\n"); 434 printf(" should be upgrated to %d\n", 435 length_ligne_Subloop+100); 436 } 437 } 438 if ( whichone == 42 && strlen(nom) > length_lvargridname_toamr ) 439 { 440 length_lvargridname_toamr = strlen(nom); 441 if ( length_lvargridname_toamr > LONG_4C ) 442 { 443 printf("WARNING 42 : The value of LONG_4C - define in decl.h -\n"); 444 printf(" should be upgrated to %d\n", 445 length_lvargridname_toamr+100); 446 } 447 } 448 if ( whichone == 43 && strlen(nom) > length_toprint_utilagrif ) 449 { 450 length_toprint_utilagrif = strlen(nom); 451 if ( length_toprint_utilagrif > LONG_C ) 452 { 453 printf("WARNING 43 : The value of LONG_C - define in decl.h -\n"); 454 printf(" should be upgrated to %d\n", 455 length_toprint_utilagrif+100); 456 } 457 } 458 if ( whichone == 44 && strlen(nom) > length_toprinttmp_utilchar ) 459 { 460 length_toprinttmp_utilchar = strlen(nom); 461 if ( length_toprinttmp_utilchar > LONG_4C) 462 { 463 printf("WARNING 44 : The value of LONG_4C - define in decl.h -\n"); 464 printf(" should be upgrated to %d\n", 465 length_toprinttmp_utilchar+100); 466 } 467 } 468 if ( whichone == 45 && strlen(nom) > length_ligne_writedecl ) 469 { 470 length_ligne_writedecl = strlen(nom); 471 if ( length_ligne_writedecl > LONG_4C ) 472 { 473 printf("WARNING 45 : The value of LONG_4C - define in decl.h -\n"); 474 printf(" should be upgrated to %d\n", 475 length_ligne_writedecl+100); 476 } 477 } 478 if ( whichone == 46 && strlen(nom) > length_newname_toamr ) 479 { 480 length_newname_toamr = strlen(nom); 481 if ( length_newname_toamr > LONG_4C ) 482 { 483 printf("WARNING 46 : The value of LONG_4C - define in decl.h -\n"); 484 printf(" should be upgrated to %d\n", 485 length_newname_toamr+100); 486 } 487 } 488 if ( whichone == 47 && strlen(nom) > length_newname_writedecl ) 489 { 490 length_newname_writedecl = strlen(nom); 491 if ( length_newname_writedecl > LONG_4C ) 492 { 493 printf("WARNING 47 : The value of LONG_4C - define in decl.h -\n"); 494 printf(" should be upgrated to %d\n", 495 length_newname_writedecl +100); 496 } 497 } 498 if ( whichone == 48 && strlen(nom) > length_ligne_toamr ) 499 { 500 length_ligne_toamr = strlen(nom); 501 if ( length_ligne_toamr > LONGNOM ) 502 { 503 printf("WARNING 48 : The value of LONGNOM - define in decl.h -\n"); 504 printf(" should be upgrated to %d\n", 505 length_ligne_toamr +100); 506 } 507 } 508 if ( whichone == 49 && strlen(nom) > length_tmpligne_writedecl ) 509 { 510 length_tmpligne_writedecl = strlen(nom); 511 if ( length_tmpligne_writedecl > LONG_4C ) 512 { 513 printf("WARNING 49 : The value of LONG_4C - define in decl.h -\n"); 514 printf(" should be upgrated to %d\n", 515 length_tmpligne_writedecl+100); 516 } 148 length_tmpligne_writedecl = len_nom; 149 if ( length_tmpligne_writedecl > LONG_M ) 150 printf("WARNING 49 : The value of LONG_M (defined in decl.h) should be upgrated to %lu\n", length_tmpligne_writedecl+100); 517 151 } 518 152 } … … 520 154 void Save_Length_int(int val, int whichone) 521 155 { 522 if ( whichone == 1 && val > value_char_size ) 523 value_char_size = val; 524 if ( whichone == 2 && val > value_char_size1 ) 525 value_char_size1 = val; 526 if ( whichone == 3 && val > value_char_size2 ) 527 value_char_size2 = val; 528 if ( whichone == 4 && val > value_char_size3 ) 529 value_char_size3 = val; 156 if ( whichone == 1 && val > value_char_size ) value_char_size = val; 157 if ( whichone == 2 && val > value_char_size1 ) value_char_size1 = val; 158 if ( whichone == 3 && val > value_char_size2 ) value_char_size2 = val; 159 if ( whichone == 4 && val > value_char_size3 ) value_char_size3 = val; 530 160 }
Note: See TracChangeset
for help on using the changeset viewer.