Mercurial > emacs
comparison src/syntax.c @ 26272:1cbb1b30793d
Remove whitespace after open or in front of closing parentheses.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Mon, 01 Nov 1999 13:55:25 +0000 |
parents | 6edf64bf5e22 |
children | 216416ad34fe |
comparison
equal
deleted
inserted
replaced
26271:b47b74998eef | 26272:1cbb1b30793d |
---|---|
2456 oldstate = Fcdr (oldstate); | 2456 oldstate = Fcdr (oldstate); |
2457 oldstate = Fcdr (oldstate); | 2457 oldstate = Fcdr (oldstate); |
2458 oldstate = Fcdr (oldstate); | 2458 oldstate = Fcdr (oldstate); |
2459 tem = Fcar (oldstate); | 2459 tem = Fcar (oldstate); |
2460 /* Check whether we are inside string_fence-style string: */ | 2460 /* Check whether we are inside string_fence-style string: */ |
2461 state.instring = ( !NILP (tem) | 2461 state.instring = (!NILP (tem) |
2462 ? ( INTEGERP (tem) ? XINT (tem) : ST_STRING_STYLE) | 2462 ? (INTEGERP (tem) ? XINT (tem) : ST_STRING_STYLE) |
2463 : -1); | 2463 : -1); |
2464 | 2464 |
2465 oldstate = Fcdr (oldstate); | 2465 oldstate = Fcdr (oldstate); |
2466 tem = Fcar (oldstate); | 2466 tem = Fcar (oldstate); |
2467 state.incomment = ( !NILP (tem) | 2467 state.incomment = (!NILP (tem) |
2468 ? ( INTEGERP (tem) ? XINT (tem) : -1) | 2468 ? (INTEGERP (tem) ? XINT (tem) : -1) |
2469 : 0); | 2469 : 0); |
2470 | 2470 |
2471 oldstate = Fcdr (oldstate); | 2471 oldstate = Fcdr (oldstate); |
2472 tem = Fcar (oldstate); | 2472 tem = Fcar (oldstate); |
2473 start_quoted = !NILP (tem); | 2473 start_quoted = !NILP (tem); |
2475 /* if the eighth element of the list is nil, we are in comment | 2475 /* if the eighth element of the list is nil, we are in comment |
2476 style a. If it is non-nil, we are in comment style b */ | 2476 style a. If it is non-nil, we are in comment style b */ |
2477 oldstate = Fcdr (oldstate); | 2477 oldstate = Fcdr (oldstate); |
2478 oldstate = Fcdr (oldstate); | 2478 oldstate = Fcdr (oldstate); |
2479 tem = Fcar (oldstate); | 2479 tem = Fcar (oldstate); |
2480 state.comstyle = NILP (tem) ? 0 : ( EQ (tem, Qsyntax_table) | 2480 state.comstyle = NILP (tem) ? 0 : (EQ (tem, Qsyntax_table) |
2481 ? ST_COMMENT_STYLE : 1 ); | 2481 ? ST_COMMENT_STYLE : 1); |
2482 | 2482 |
2483 oldstate = Fcdr (oldstate); | 2483 oldstate = Fcdr (oldstate); |
2484 tem = Fcar (oldstate); | 2484 tem = Fcar (oldstate); |
2485 state.comstr_start = NILP (tem) ? -1 : XINT (tem) ; | 2485 state.comstr_start = NILP (tem) ? -1 : XINT (tem) ; |
2486 oldstate = Fcdr (oldstate); | 2486 oldstate = Fcdr (oldstate); |