/[pspp]/pspp/src/vars-prs.c
ViewVC logotype

Diff of /pspp/src/vars-prs.c

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

revision 1.20 by blp, Mon Oct 24 02:51:31 2005 UTC revision 1.21 by jmd, Mon Oct 24 05:41:45 2005 UTC
# Line 91  parse_variable (void) Line 91  parse_variable (void)
91    return parse_dict_variable (default_dict);    return parse_dict_variable (default_dict);
92  }  }
93    
 /* Returns the dictionary class corresponding to a variable named  
    NAME. */  
 enum dict_class  
 dict_class_from_id (const char *name)  
 {  
   assert (name != NULL);  
   
   switch (name[0])  
     {  
     default:  
       return DC_ORDINARY;  
     case '$':  
       return DC_SYSTEM;  
     case '#':  
       return DC_SCRATCH;  
     }  
 }  
   
 /* Returns the name of dictionary class DICT_CLASS. */  
 const char *  
 dict_class_to_name (enum dict_class dict_class)  
 {  
   switch (dict_class)  
     {  
     case DC_ORDINARY:  
       return _("ordinary");  
     case DC_SYSTEM:  
       return _("system");  
     case DC_SCRATCH:  
       return _("scratch");  
     default:  
       assert (0);  
       abort ();  
     }  
 }  
94    
95  /* Parses a set of variables from dictionary D given options  /* Parses a set of variables from dictionary D given options
96     OPTS.  Resulting list of variables stored in *VAR and the     OPTS.  Resulting list of variables stored in *VAR and the

Legend:
Removed from v.1.20  
changed lines
  Added in v.1.21

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