GitLab

(fortran-indent-to-column): Make turning of lines that begin with
`fortran-continuation-string' into properly formated continuation
lines work for fortran TAB mode.

Cleaned up some doc strings.

(fortran-abbrev-help, fortran-prepare-abbrev-list-buffer): Use
`insert-abbrev-table-description' and make buffer in abbrevs-mode.

Many changes since version 1.28.3.   Added auto-fill-mode, support
for some Fortran 90 statements.  Adjust comments to conform to new
gnu conventions.

(fortran-mode): Fix `comment-line-start-skip' by changing \\1 to
\\2 and include cpp statements in matching.  Changes for auto fill.

(fortran-auto-fill-mode, fortran-do-auto-fill,
fortran-break-line): New functions to implement auto fill.

(fortran-indent-line, fortran-reindent-then-newline-and-indent):
Added auto fill support.

(find-comment-start-skip, is-in-fortran-string-p): New functions.

(fortran-electric-line-number): Works better in overwrite mode.

(fortran-indent-comment, fortran-indent-line,
fortran-indent-to-column):  Use find-comment-start-skip instead of
searching for `comment-start-skip'.

(fortran-mode, calculate-fortran-indent): Added indentation
for fortran 90 statements.

(fortran-next-statement, fortran-previous-statement): Bug fixes.

(fortran-mode, calculate-fortran-indent,
fortran-setup-tab-format-style, fortran-setup-fixed-format-style):
`fortran-comment-line-column' meaning changed.  Now defaults to 0.

-ib was used for two things.  Use -itype for icon type.

(dired-map-over-marks-check): Likewise.

Optional argument says whether to create parent dirs.
Invoke file-name handler here.
(after-find-file): Delete code that offers to create dir.
Instead, just print a message.

doc string in this function's DEFUN.

	file-name-handler-alist to recognized ange-ftp filenames; the
	slash, username and hostname must be at the start of the filename,
	not just anywhere in the filename.

Pass nil as third arg to handler.
Lisp function `make-directory' is now in files.el.

Don't compile the interactive spec if it is a call to `list'.

	x_screen_height_mm, x_screen_width, x_screen_width_mm,
	x_save_under, x_screen_planes): Declare this as ints, to match
	their definitions in xterm.c.

	unsigned int, not a Lisp_Object.  Remember that the quiescent
	value for part is Qnil, not zero, that x_mouse_x and x_mouse_y
	are ints, not Lisp_Objects, and that RESULT->x and RESULT->y are
	Lisp_Objects, not ints.
	(XTread_socket): Declare this to return int, not Lisp_Object.
	When calling construct_mouse_click on a non-scrollbar click, pass
	PART as Qnil, not zero.
	(x_calc_absolute_position): Remember that x_screen_width and
	x_screen_height are ints, not Lisp_Objects.
e

	not a Lisp_Object.
	(x_selection_arrival): Declare this static, and add a forward
	declaration at the top of the page.

	an int, not a Lisp_Object.
	(x_set_mouse_color): Give separate error messages for the
	different cursors we try to set.
	(Fx_geometry): Declare STRING to be a Lisp_Object.
	(Fx_create_frame): No need to use XSET to assign NAME to f->name;
	they're both Lisp_Objects.
	(adjust_scrollbars): Use XINT to access w->hscroll.
	(Fx_open_connection): x_screen_count, x_release, x_screen_height,
	x_screen_height_mm, x_screen_width, x_screen_width_mm,
	x_save_under, and x_screen_planes are integers, not Lisp_Objects.
	(syms_of_xfns): x_mouse_x, x_mouse_y, and mouse_buffer_offset are
	integers, not Lisp_Objects.

	positions, not !=.
	(mark_window_display_accurate): Barf if WINDOW isn't a window.
	(display_string): Test buffer_defaults.ctl_arrow using NILP,
	instead of comparing it with zero.

	* xdisp.c (last_arrow_position, last_arrow_string): Make these
	static.

	* xdisp.c (message): Re-write this in terms of message1.
	(message1): Move code to clear out echo_area_glyphs and
	previous_echo_glyphs from message to here.

	Fwindow_dedicated_p): Add extern declarations for these.

	w->width, w->left, w->hscroll, and arguments.
	(replace_window): Use EQ, not ==.
	(Fdelete_window): p->top and p->left are not C integers.
	(Fnext_window, Fprevious_window): Use EQ, not ==.

	(truncate_undo_list): Use NILP, not == Qnil.

	integer.

	Lisp_Object at the top of the file.
	(decode_status): Don't untag XCONS (tem)->cdr before storing it in
	tem; tem is a Lisp_Object, too.
	(process_send_signal): Declare this to be static void.  Don't
	return Qnil; nobody cares.
	(sigchld_handler): Use XFASTINT to manipulate p->infd.

	* process.c (pty_process): Variable deleted; it's no longer used.
	(syms_of_process): Don't initialize it.

	passing it to sprintf to form the frame's printed form.

	(temp_echo_area_glyphs): Use XFASTINT to assign to
	unread_command_char.

	indicating that it returns a Lisp_Object.

	Fmake_byte_code, Fverify_visited_file_modtime, Ffile_exists_p,
	Fdirectory_file_name, Ffile_name_directory,
	expand_and_dir_to_file, Ffile_accessible_directory_p, Fbyte_code,
	Fundo_boundary, truncate_undo_list): Add extern declarations for
	these.

	* lisp.h (DEFVARLISP, DEFVARBOOL, DEFVARINT, DEFVARPERBUFFER):
	Removed these definitions; we should be using the versions whose
	names use underscores.

	that Flength returns an integer.

	* keymap.c: Deal with autoloaded keymaps properly.
        (get_keymap_1): Renamed to inner_get_keymap; made
	static.  New argument AUTOLOAD says to pursue autoloads if
	non-zero.
	(Fkeymapp, get_keymap, get_keyelt, Flookup_key): Ask get_keymap_1
	not to perform autoloads.
	(Fdefine_key): Ask get_keymap_1 to perform autoloads.  Since
	autoloading may GC, remember that we have to GCPRO our local
	variables now.
	(Fminor_mode_key_binding): Call get_keymap instead of calling
	get_keymap_1 with equivalent arguments.

	Fmouse_click_p, read_char): Add external declarations for these.

	(recursive_edit_unwind, command_loop, Fthis_command_keys): Declare
	these to return Lisp_Objects at the very top of the file, to avoid
	having them implicitly declared as ints.
	(echo_char): Use EQ to compare C to help_char.
	(read_char): Remember to apply XFASTINT to the return value of
	Flength before using it.  Apply XINT to c when clearing its high
	bits and meta bits, and when writing it to the dribble file.
	(read_char_menu_prompt): Use EQ to compare obj with
	menu_prompt_more_char and its control-character analog.
	(read_key_sequence): Declare PROMPT to be char *, not a
	Lisp_Object.  Use the appropriate accessors on keybuf when looking
	for ASCII function key sequences.

	* keyboard.c (echobuf): Make this 300 characters, not 100.  This
	isn't a real fix, but it's quick.

	* keyboard.c (read_char): When returning an unread switch-frame
	event, jump to reread_first to return it, rather than reread; this
	makes sure the event gets echoed (if appropriate) and goes into
	this_command_keys.

	* keyboard.c (read_key_sequence): If the key sequence starts with
	a mouse click, read the key sequence using the keymaps of the
	buffer clicked on, not the current buffer.

	* keyboard.c (unread_switch_frame): Make this static, to indicate
	that nobody outside of this file uses it.

	* keyboard.c (follow_key): Ask get_keymap_1 to perform autoloads.
	(read_key_sequence): When pursuing potential bindings in the
	function key map, ask get_keymap_1 to perform autoloading.  This
	is hardly important, but it's consistent.

	(Fdelete): Check if Fequal returns Qnil, not zero.

	Lisp_Object.

	* floatfns.c (Fexpt): Don't return the value of the XSET function
	call; that's not guaranteed to be the value assigned.

	* doc.c (Fsubstitute_command_keys): Ask get_keymap_1 to
	perform autoloads.  Autoloading might GC; we need to GCPRO our
	local variables now.
	(Fdocumentation, Fdocumentation_property): Autoloading in
	Fsubstitute_command_keys might GC; we need to GCPRO our
	local variables now.

	(Ffile_attributes): Use NILP, not == Qnil.

	* dired.c (Ffile_attributes): Doc fix.