.#,*ü" 14 ! d $ cbeg $ cend $ file $ mode+ü" 15" /*°$ cbegü" 16" */°$ cendü" 18 ) what_mode°$ modePü" 19 $ mode! 2F.w/bü" 21 + getbuf_infoPPP°$ fileü" 23 $ mode! 8F.ü" 25! %°$ cbegü" 26 °$ cend/cü" 30 # eolýü" 31 $ cbegþ % bfind.ü" 33 $ bolp.ü" 35 ) go_left_1ü" 36 $ trimýü" 37 $ cbegþ % ffindP/bü" 39 0 C_Comment_Column + what_column:°! dü" 40 ! d! 0?.ý ! dþ * whitespace/cýü" 41 $ cendþ % ffind.ü" 43 # eolýü" 44! 2þ - insert_spacesýü" 45 $ cendþ & insert/býü" 48 $ cbegþ % bfindPýýü" 49 $ cbegþ & strlen! 19þ ( go_right/.ü" 53 + what_column 0 C_Comment_Column>.ýü" 55 0 C_Comment_Columnþ + goto_column/.ýü" 57# þ & insert/dýü" 58 $ cbegþ & insertý" þ & insertýü" 59 $ cendþ & strlen.ýü" 61 $ cendþ & insertýü" 62! 3þ ' go_left/c/dü" 12y. c_mak e_comment(ü" 69 0 Cmode_Fill_Chars+ °0 Cmode_Fill_Chars,ýü" 72 0 Cmode_Fill_Charsþ & strlen.! 0w/cü" 73 ) push_spotü" 74 . bol_skip_whiteýü" 75! *þ * looking_at.ýü" 76! *þ * skip_chars/.ýü" 77" //þ * looking_at.ýü" 79! 2þ ( go_right/c/dü" 81 * ski p_whiteýü" 82" @ þ * looking_at. # eol/cü" 83 $ eolp" -2 . parse_to_pointBDü" 84 ( pop_spotü" 70y/ c_paragraph_sep,ü" 87y2 c_format_paragraph,*ü" 90 ! n % dwrap+ü" 93 °0 Cmode_Fill_Charsü" 94 / c_paragraph_sep.w/cü" 95 ) push_spot ) push_spot ) push _spot.ü" 96 / c_paragraph_sepN/.ü" 98 $ up_1.v/b/fü# 100 / c_paragraph_sep. ) go_down_1/cü# 101 ) push_markü# 102 ( pop_spot.ü# 104 / c_paragraph_sepN/.ü# 106 & down_1.v/b/fü# 108 / c_paragraph_sep. ' go_up_1/cü# 109 & narrowü# 110 ( pop_spotü# 111 # bo lü# 112 ) push_markü# 113 * skip_whiteýü# 114" * þ * looking_at.ý! 2þ ( go_right/.ýü# 115" //þ * looking_at.ý! 2þ ( go_right/c/dü# 117 ) bufsubstr°0 Cmode_Fill_Charsü# 118 + what_column°% dwrapü# 119 # bob.ü# 122 ( bol_trimýü# 123" * þ * looking_at.ý ! 2þ $ deln/.ýü# 124" //þ * looking_at.ý! 2þ $ deln/c/d/.ü# 126 & down_1/kü# 127 % dwrap²$ WRAPýü# 1285 format_paragraph_hookþ 1 unset_buffer_hookýü# 1290 format_paragraphþ $ callýü# 1305 format_paragraph_hook}2 c_format_paragraphþ / set_buffer_hoo kü# 131 % dwrap±$ WRAPü# 132 # bob.ýü# 135 0 Cmode_Fill_Charsþ & insert/.ü# 137 & down_1/kü# 139 # bolýýü# 140 0 Cmode_Fill_Charsþ & strlenþ ( go_rightü# 142 * skip_whiteýü# 143" */þ * looking_at.ü# 145 ) push_markü# 146 . bol_skip_whiteü# 147 * del_reg ion/cü# 150 °0 Cmode_Fill_Charsü# 151 % widenü# 152 ( pop_spotü" 88y2 c_format_paragraph,*ü# 160 $ cbeg+# /* °$ cbeg* $ cmid+# * °$ cmid* $ cend+# */°$ cend*ü# 161 ! c " c1 $ celm % extra+ýü# 163! 1þ , check_regionü# 164 7 exchange_point_and_mark ü# 165 + what_column°! cü# 167 & narrowü# 168 # bob.ü# 172°% extra°$ celmü# 173 . bol_skip_whiteü# 174 + what_column°" c1ü# 175 " c1 ! c?.ýü# 177 ! cþ + goto_columnýü# 178 $ celmþ & insertü# 179 $ trimýü# 180 " c1 + what_column: % extra9þ * whitespace/.ü# 184 $ eolp.ý ! cþ + goto_column/cýü# 185 $ celmþ & insert/d/pýü# 189 $ cbeg! 0þ - X_USER_BLOCK0.ü# 191 & down_1/.ýü# 193 $ cmid! 1þ - X_USER_BLOCK0/fü# 195 % widenü# 196 . bol_skip_whiteýü# 197 $ cmidþ * looking_at.ýü# 199! 3þ $ deln/.ü# 203 # eolýü# 204! 1þ % right. ' newline/b/dýü# 206 $ cend! 0þ - X_USER_BLOCK0ü# 207 ( pop_spotü# 155y0 c_comment_region,ýü# 213# 123þ 0 bol_bsearch_char.ýü# 215: Top of function not found.þ % error/bü# 211y1 c_top_of_function,ü# 221 # eolýü# 222# 125þ 0 bol_fs earch_char.ýü# 2239 End of function not foundþ % error/bü# 219y1 c_end_of_function,ü# 232 1 c_end_of_functionü# 233 1 push_visible_markü# 234 # eolü# 235 ) go_down_1ü# 236 7 exchange_point_and_markü# 237 1 c_top_of_functionýü# 238! 2þ % go_upü# 239 # b olü# 230y/ c_mark_function,*ü# 248 ! d $ cbeg $ mode+ü# 249" //°$ cbegü# 252 # eolýü# 253 $ cbegþ % bfind.ü# 255 $ bolp.ü# 257 ) go_left_1ü# 258 $ trimýü# 259 $ cbegþ % ffindP/bü# 261 0 C_Comment_Column + what_column:°! dü# 262 ! d! 0?.ý ! dþ * whitesp ace/cýü# 264 $ cbegþ % bfindPýýü# 265 $ cbegþ & strlen! 19þ ( go_right/.ü# 269 + what_column 0 C_Comment_Column>.ýü# 271 0 C_Comment_Columnþ + goto_column/.ýü# 273! þ & insert/dýü# 274 $ cbegþ & insertý! þ & insert/dü# 246y8 c_plus_plus_make_comment