From 70fbe7822024d0acc68df3607ff25bf8d7a71751 Mon Sep 17 00:00:00 2001 From: "Suren A. Chilingaryan" Date: Thu, 16 Jun 2005 23:19:27 +0000 Subject: initial import (automatically generated log message) --- statgen/debug.c | 33 +++++++++++++++++++++++++++++++++ 1 file changed, 33 insertions(+) create mode 100644 statgen/debug.c (limited to 'statgen/debug.c') diff --git a/statgen/debug.c b/statgen/debug.c new file mode 100644 index 0000000..85b950b --- /dev/null +++ b/statgen/debug.c @@ -0,0 +1,33 @@ +#include +#define _AUTO_DEBUG +#include "charset_auto_russian.h" + + +main(int argc, char *argv[]) { + FILE *f; + int len,st; + char word[256]; + + + if (argc!=2) { + printf("Usage: %s \n",argv[0]); + exit(0); + } + + f=fopen(argv[1],"r"); + if (!f) { + printf("Failed to open specified file. Check permissions!\n"); + exit(1); + } + + while(!feof(f)) { + fscanf(f,"%s",&word); +// len=strlen(word)-1; + for(st=0;word[st]=='"'||word[st]=='\''||word[st]=='(';st++); + for(len=strlen(word)-1;word[len]==','||word[len]=='.'||word[len]=='!'||word[len]=='?'||word[len]==';'||word[len]=='-'||word[len]==':'||word[len]=='"'||word[len]=='\''||word[len]==')';len--); + if (len<5) continue; + else word[len+1]=0; + + autocharset_russian_uc(word+st,len+1-st); + } +} -- cgit v1.2.3