Fortran to C++ Conversion: PREDATA_tb Subroutine

void PREDATA_tb(FILE* IPP, int& MAL) { char AAA[201]; MAL = 0; rewind(IPP); while (fscanf(IPP, "%200s", AAA) != EOF) { if (strncmp(AAA, '$MATERIAL', 9) == 0) { MAL++; } else { continue; } break; } }