+int savefile(FILE *fp, long version)
+/* Save game to file. No input or output from user. */
+{
+ long i, k;
+ datime(&i, &k);
+ k = i + 650 * k;
+ save.savetime = k;
+ save.mode = -1;
+
+ save.version = (version == 0) ? VRSION : version;
+
+ memcpy(&save.game, &game, sizeof(struct game_t));
+ IGNORE(fwrite(&save, sizeof(struct save_t), 1, fp));
+ return (0);
+}
+