- error = FSMakeFSSpec(tmpVRefNum, tmpDirID, "\pPuTTY Random Seed",
- &tmpfile);
- if (error != noErr && error != fnfErr) return;
- if (error == noErr) {
- error = FSpDelete(&tmpfile);
- if (error != noErr) return;
- }
- error = FSpCreate(&tmpfile, PUTTY_CREATOR, SEED_TYPE, smRoman);
- if (error != noErr) return;
-
- if (FSpOpenDF(&tmpfile, fsWrPerm, &refnum) != noErr) goto fail;