aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorStefan Monnier2008-02-12 21:29:33 +0000
committerStefan Monnier2008-02-12 21:29:33 +0000
commit8b8bf8e68f19cdbe07521fa2d3c563265b27bd94 (patch)
treee3afb72291494452d1a427730c1a32a4eb3625d6 /src
parentf1c996283840d0a9fd60c90f1a9e2aa2a82251a4 (diff)
downloademacs-8b8bf8e68f19cdbe07521fa2d3c563265b27bd94.tar.gz
emacs-8b8bf8e68f19cdbe07521fa2d3c563265b27bd94.zip
(scan_lists): Follow coding convention.
Diffstat (limited to 'src')
-rw-r--r--src/syntax.c21
1 files changed, 14 insertions, 7 deletions
diff --git a/src/syntax.c b/src/syntax.c
index 648d7495db6..aa716a5aef0 100644
--- a/src/syntax.c
+++ b/src/syntax.c
@@ -2501,7 +2501,8 @@ scan_lists (from, count, depth, sexpflag)
2501 { 2501 {
2502 case Sescape: 2502 case Sescape:
2503 case Scharquote: 2503 case Scharquote:
2504 if (from == stop) goto lose; 2504 if (from == stop)
2505 goto lose;
2505 INC_BOTH (from, from_byte); 2506 INC_BOTH (from, from_byte);
2506 /* treat following character as a word constituent */ 2507 /* treat following character as a word constituent */
2507 case Sword: 2508 case Sword:
@@ -2520,7 +2521,8 @@ scan_lists (from, count, depth, sexpflag)
2520 case Scharquote: 2521 case Scharquote:
2521 case Sescape: 2522 case Sescape:
2522 INC_BOTH (from, from_byte); 2523 INC_BOTH (from, from_byte);
2523 if (from == stop) goto lose; 2524 if (from == stop)
2525 goto lose;
2524 break; 2526 break;
2525 case Sword: 2527 case Sword:
2526 case Ssymbol: 2528 case Ssymbol:
@@ -2586,7 +2588,8 @@ scan_lists (from, count, depth, sexpflag)
2586 stringterm = FETCH_CHAR_AS_MULTIBYTE (temp_pos); 2588 stringterm = FETCH_CHAR_AS_MULTIBYTE (temp_pos);
2587 while (1) 2589 while (1)
2588 { 2590 {
2589 if (from >= stop) goto lose; 2591 if (from >= stop)
2592 goto lose;
2590 UPDATE_SYNTAX_TABLE_FORWARD (from); 2593 UPDATE_SYNTAX_TABLE_FORWARD (from);
2591 c = FETCH_CHAR_AS_MULTIBYTE (from_byte); 2594 c = FETCH_CHAR_AS_MULTIBYTE (from_byte);
2592 if (code == Sstring 2595 if (code == Sstring
@@ -2615,7 +2618,8 @@ scan_lists (from, count, depth, sexpflag)
2615 } 2618 }
2616 2619
2617 /* Reached end of buffer. Error if within object, return nil if between */ 2620 /* Reached end of buffer. Error if within object, return nil if between */
2618 if (depth) goto lose; 2621 if (depth)
2622 goto lose;
2619 2623
2620 immediate_quit = 0; 2624 immediate_quit = 0;
2621 return Qnil; 2625 return Qnil;
@@ -2750,7 +2754,8 @@ scan_lists (from, count, depth, sexpflag)
2750 case Sstring_fence: 2754 case Sstring_fence:
2751 while (1) 2755 while (1)
2752 { 2756 {
2753 if (from == stop) goto lose; 2757 if (from == stop)
2758 goto lose;
2754 DEC_BOTH (from, from_byte); 2759 DEC_BOTH (from, from_byte);
2755 UPDATE_SYNTAX_TABLE_BACKWARD (from); 2760 UPDATE_SYNTAX_TABLE_BACKWARD (from);
2756 if (!char_quoted (from, from_byte) 2761 if (!char_quoted (from, from_byte)
@@ -2765,7 +2770,8 @@ scan_lists (from, count, depth, sexpflag)
2765 stringterm = FETCH_CHAR_AS_MULTIBYTE (from_byte); 2770 stringterm = FETCH_CHAR_AS_MULTIBYTE (from_byte);
2766 while (1) 2771 while (1)
2767 { 2772 {
2768 if (from == stop) goto lose; 2773 if (from == stop)
2774 goto lose;
2769 DEC_BOTH (from, from_byte); 2775 DEC_BOTH (from, from_byte);
2770 UPDATE_SYNTAX_TABLE_BACKWARD (from); 2776 UPDATE_SYNTAX_TABLE_BACKWARD (from);
2771 if (!char_quoted (from, from_byte) 2777 if (!char_quoted (from, from_byte)
@@ -2783,7 +2789,8 @@ scan_lists (from, count, depth, sexpflag)
2783 } 2789 }
2784 2790
2785 /* Reached start of buffer. Error if within object, return nil if between */ 2791 /* Reached start of buffer. Error if within object, return nil if between */
2786 if (depth) goto lose; 2792 if (depth)
2793 goto lose;
2787 2794
2788 immediate_quit = 0; 2795 immediate_quit = 0;
2789 return Qnil; 2796 return Qnil;