Example #1
0
static bool verify_List(const char *&input, const char *, bool)
{
   input++ ;			       // consume initial left parenthesis
   char c ;
   while ((c = FrSkipWhitespace(input)) != ')' && c != '\0')
      {
      if (!valid_FrObject_string(input,true))
	 return false ;
      }
   if (c == ')')
      {
      input++ ;				// skip terminating right paren
      return true ;			//   and indicate success
      }
   else
      return false ;
}
Example #2
0
static bool verify_Facet(const char *&input)
{
   input++ ;				// consume the left bracket
   if (!verify_Symbol(input,true))	// check facet name
      return false ;
   char c ;
   while ((c = FrSkipWhitespace(input)) != ']' && c != '\0')
      {
      if (!valid_FrObject_string(input,true))
	 return false ;
      }
   if (c == ']')
      {
      input++ ;				// skip over terminator
      return true ;			//   and indicate success
      }
   else
      return false ;
}
Example #3
0
static bool verify_Queue(const char *&input, const char *, bool strict)
{
   return valid_FrObject_string(input,strict) ;
}