usr/src/lib/libpp/common/pppragma.c

   1 /***********************************************************************
   2 *                                                                      *
   3 *               This software is part of the ast package               *
   4 *          Copyright (c) 1986-2009 AT&T Intellectual Property          *
   5 *                      and is licensed under the                       *
   6 *                  Common Public License, Version 1.0                  *
   7 *                    by AT&T Intellectual Property                     *
   8 *                                                                      *
   9 *                A copy of the License is available at                 *
  10 *            http://www.opensource.org/licenses/cpl1.0.txt             *
  11 *         (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9)         *
  12 *                                                                      *
  13 *              Information and Software Systems Research               *
  14 *                            AT&T Research                             *
  15 *                           Florham Park NJ                            *
  16 *                                                                      *
  17 *                 Glenn Fowler <gsf@research.att.com>                  *
  18 *                                                                      *
  19 ***********************************************************************/
  20 #pragma prototyped
  21 /*
  22  * Glenn Fowler
  23  * AT&T Research
  24  *
  25  * common preprocessor pragma handler
  26  */
  27
  28 #include "pplib.h"
  29
  30 void
  31 pppragma(char* directive, char* pass, char* name, char* value, int newline)
  32 {
  33         register int    sep = 0;
  34
  35         ppsync();
  36         if (directive)
  37         {
  38                 ppprintf("#%s", directive);
  39                 sep = 1;
  40         }
  41         if (pass)
  42         {
  43                 if (sep)
  44                 {
  45                         sep = 0;
  46                         ppprintf(" ");
  47                 }
  48                 ppprintf("%s:", pass);
  49         }
  50         if (name)
  51         {
  52                 if (sep)
  53                         ppprintf(" ");
  54                 else
  55                         sep = 1;
  56                 ppprintf("%s", name);
  57         }
  58         if (value)
  59         {
  60                 if (sep || pass)
  61                         ppprintf(" ");
  62                 ppprintf("%s", value);
  63         }
  64         if (newline)
  65                 ppprintf("\n");
  66 }