diff options
author | Jim Meyering <meyering@redhat.com> | 2008-01-06 13:38:03 +0100 |
---|---|---|
committer | Jim Meyering <meyering@redhat.com> | 2008-01-30 21:34:34 +0100 |
commit | 2985ff255ce9ae7736d27a903209d661ba638c75 (patch) | |
tree | 5e0419f9e0ed7697755982346bb40daf103e81e5 /libidu | |
parent | 82ca819d41c07a57497e0439f9c1293241d8e632 (diff) | |
download | idutils-2985ff255ce9ae7736d27a903209d661ba638c75.tar.gz idutils-2985ff255ce9ae7736d27a903209d661ba638c75.tar.bz2 idutils-2985ff255ce9ae7736d27a903209d661ba638c75.zip |
Remove trailing blanks.
* README-alpha:
* TODO:
* doc/idutils.texi:
* libidu/scanners.c (set_uchar_ctype, ARGS, get_token_lisp):
* src/Makefile.am:
* src/fid.c (main):
* src/lid.c (report_edit):
* Makefile.cfg (local-checks-to-skip): Remove sc_trailing_blank,
thus enabling that check.
Diffstat (limited to 'libidu')
-rw-r--r-- | libidu/scanners.c | 30 |
1 files changed, 15 insertions, 15 deletions
diff --git a/libidu/scanners.c b/libidu/scanners.c index 9efe16f..98343c4 100644 --- a/libidu/scanners.c +++ b/libidu/scanners.c @@ -333,8 +333,8 @@ clear_ushort_ctype (unsigned short *ctype, char const *chars, int type) static void set_uchar_ctype (unsigned char *ctype, char const *chars, int type) { - unsigned char *rct; - unsigned char const *uc; + unsigned char *rct; + unsigned char const *uc; rct = &ctype[1]; uc = (unsigned char const *) chars; @@ -1400,7 +1400,7 @@ get_token_perl (FILE *in_FILE, void const *args, int *flags) obstack_blank (&tokens_obstack, OFFSETOF_TOKEN_NAME); -top: +top: c = getc (in_FILE); while (ISBORING (c)) c = getc (in_FILE); @@ -1447,7 +1447,7 @@ top: } break; - default: + default: if (ISEOF (c)) { new_line = 1; @@ -1500,7 +1500,7 @@ top: { skip_doc = 0; } - else + else { state |= EQ; /* documentation = 1; */ } @@ -1606,7 +1606,7 @@ get_token_lisp (FILE *in_FILE, void const *args, int *flags) int c; obstack_blank (&tokens_obstack, OFFSETOF_TOKEN_NAME); - + top: c = getc (in_FILE); recheck: @@ -1615,23 +1615,23 @@ get_token_lisp (FILE *in_FILE, void const *args, int *flags) case EOF: obstack_free (&tokens_obstack, obstack_finish (&tokens_obstack)); return 0; - + case '(': case ')': case '\'': case '`': /* quote, quasiquote */ goto top; - + case ',': /* unquote */ c = getc (in_FILE); if (c == '@') /* unquote-splicing */ goto top; goto recheck; - + case ';': /* comment */ do { c = getc (in_FILE); } while ( (c != EOF) && (c != '\n')); goto top; - + case '"': /* string with/without ansi-C escapes*/ string: do { @@ -1667,11 +1667,11 @@ get_token_lisp (FILE *in_FILE, void const *args, int *flags) if (c != EOF) ungetc (c, in_FILE); goto ident; - + case '#': id = scanner_buffer; *id++ = c; - + c = getc (in_FILE); if (c == EOF) goto top; @@ -1732,12 +1732,12 @@ get_token_lisp (FILE *in_FILE, void const *args, int *flags) goto top; /* Ignore invalide #-construct */ goto top; - + case '[': case ']': /* EMACS vector aka # (...) in Scheme */ /* EMACS vector object vs Kawa ident */ /* rational: Kawa ident could not start with [ nor with ] */ goto top; - + default: if (is_IDENT1 (c)) { @@ -1785,7 +1785,7 @@ get_token_lisp (FILE *in_FILE, void const *args, int *flags) } } goto top; - + } #undef DG #undef LT |