Mercurial > emacs

comparison src/syntax.c @ 26272:1cbb1b30793d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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);