rem: printf ("PutGroupInfo(%lu): %u out of %u -- %u/%u/%u\n",
add: fprintf (stderr, "PutGroupInfo(%lu): %u out of %u -- %u/%u/%u\n",
context: PutGroupInfo (DWORD offset, BYTE which_group){	PVOID fp;	fp = OpenResFile (			offset && which_group ? DEFGRPINFO_FILE : RANDGRPINFO_FILE,			"r+b"			);	if (fp)	{		GROUP_HEADER GH;		if (offset == (DWORD) ~0L)		{			offset = LengthResFile (fp);			GH.NumGroups = 0;			GH.GroupOffset[0] = 0;			SeekResFile (fp, offset, SEEK_SET);			WriteResFile (&GH, sizeof (GH), 1, fp);		}		if (which_group)		{			SeekResFile (fp, offset, SEEK_SET);			if (which_group == (BYTE)~0)			{				cur_player = 0;				which_group = 0;			}		}		ReadResFile (&GH, sizeof (GH), 1, fp);#ifdef NEVER		if (GetHeadLink (&GLOBAL (npc_built_ship_q))				|| GH.GroupOffset[0] == 0)#endif /* NEVER */		{			COUNT month_index, day_index, year_index;			month_index = 0;			day_index = 7;			year_index = 0;			ValidateEvent (RELATIVE_EVENT, &month_index, &day_index, &year_index);			GH.day_index = (BYTE)day_index;			GH.month_index = (BYTE)month_index;			GH.year_index = year_index;		}		GH.star_index = CurStarDescPtr - star_array;#ifdef DEBUGprintf ("PutGroupInfo(%lu): %u out of %u -- %u/%u/%u\n",offset, which_group, GH.NumGroups,GH.month_index, GH.day_index, GH.year_index);#endif /* DEBUG */		FlushGroupInfo (&GH, offset, which_group, fp);		CloseResFile (fp);	}	return (offset);}