File: feat.c

package info (click to toggle)
libimager-perl 0.50-1etch1
  • links: PTS
  • area: main
  • in suites: etch
  • size: 3,120 kB
  • ctags: 2,907
  • sloc: ansic: 21,092; perl: 15,461; makefile: 56
file content (10 lines) | stat: -rw-r--r-- 179 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
10
 
#include "feat.h"

undef_int
i_has_format(char *frmt) {
  int rc,i;
  rc=0;
  i=0;
  while(i_format_list[i] != NULL) if ( !strcmp(frmt,i_format_list[i++]) ) rc=1;
  return(rc);
}