/[bison]/bison/src/reader.c
ViewVC logotype

Diff of /bison/src/reader.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.106 by marc, Wed Nov 28 21:31:13 2001 UTC revision 1.107 by marc, Wed Nov 28 22:28:01 2001 UTC
# Line 964  parse_muscle_decl (void) Line 964  parse_muscle_decl (void)
964  }  }
965    
966    
967    
968    /*---------------------------------.
969    | Parse a double quoted parameter. |      
970    `---------------------------------*/
971    
972    static const char *
973    parse_dquoted_param (const char *from)
974    {
975      struct obstack param_obstack;
976      const char *param = NULL;
977      int c;
978    
979      obstack_init (&param_obstack);
980      c = skip_white_space ();
981    
982      if (c != '"')
983        {
984          complain (_("invalid %s declaration"), from);
985          ungetc (c, finput);
986          skip_to_char ('%');
987          return NULL;
988        }
989    
990      for (;;)
991        {
992          if (literalchar (NULL, &c, '\"'))
993            obstack_1grow (&param_obstack, c);
994          else
995            break;
996        }
997      
998      obstack_1grow (&param_obstack, '\0');
999      param = obstack_finish (&param_obstack);
1000    
1001      if (c != '"' || strlen (param) == 0)
1002        {
1003          complain (_("invalid %s declaration"), from);
1004          if (c != '"')
1005            ungetc (c, finput);
1006          skip_to_char ('%');
1007          return NULL;
1008        }
1009    
1010      return param;
1011    }
1012    
1013  /*----------------------------------.  /*----------------------------------.
1014  | Parse what comes after %skeleton. |  | Parse what comes after %skeleton. |
1015  `----------------------------------*/  `----------------------------------*/
# Line 971  parse_muscle_decl (void) Line 1017  parse_muscle_decl (void)
1017  void  void
1018  parse_skel_decl (void)  parse_skel_decl (void)
1019  {  {
1020    /* Complete with parse_dquoted_param () on the CVS branch 1.29.  */    skeleton = parse_dquoted_param ("%skeleton");
1021  }  }
1022    
1023  /*----------------------------------------------------------------.  /*----------------------------------------------------------------.

Legend:
Removed from v.1.106  
changed lines
  Added in v.1.107

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26