chiark - git - mdw - catacomb/blob - math/group-file.c

   1 /* -*-c-*-
   2  *
   3  * File I/O for group elements
   4  *
   5  * (c) 2004 Straylight/Edgeware
   6  */
   7
   8 /*----- Licensing notice --------------------------------------------------*
   9  *
  10  * This file is part of Catacomb.
  11  *
  12  * Catacomb is free software; you can redistribute it and/or modify
  13  * it under the terms of the GNU Library General Public License as
  14  * published by the Free Software Foundation; either version 2 of the
  15  * License, or (at your option) any later version.
  16  *
  17  * Catacomb is distributed in the hope that it will be useful,
  18  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20  * GNU Library General Public License for more details.
  21  *
  22  * You should have received a copy of the GNU Library General Public
  23  * License along with Catacomb; if not, write to the Free
  24  * Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
  25  * MA 02111-1307, USA.
  26  */
  27
  28 /*----- Header files ------------------------------------------------------*/
  29
  30 #include "group.h"
  31
  32 /*----- Main code ---------------------------------------------------------*/
  33
  34 /* --- @group_readfile@ --- *
  35  *
  36  * Arguments:   @group *g@ = an abstract group
  37  *              @ge *d@ = destination group element
  38  *              @FILE *fp@ = the file to read from
  39  *
  40  * Returns:     Zero on success, nonzero on failure.
  41  *
  42  * Use:         Parses a group element from a file.
  43  */
  44
  45 int group_readfile(group *g, ge *d, FILE *fp)
  46   { return (G_READ(g, d, &mptext_fileops, fp)); }
  47
  48 /* --- @group_writefile@ --- *
  49  *
  50  * Arguments:   @group *g@ = an abstract group
  51  *              @ge *x@ = a group element
  52  *              @FILE *fp@ = the file to write on
  53  *
  54  * Returns:     Zero on success, nonzero on failure.
  55  *
  56  * Use:         Writes a group element to a file.
  57  */
  58
  59 int group_writefile(group *g, ge *x, FILE *fp)
  60   { return (G_WRITE(g, x, &mptext_fileops, fp)); }
  61
  62 /*----- That's all, folks -------------------------------------------------*/