X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=src%2Fbuffer.c;h=703f0ceea31f537d487f6af6b13ee78e693fb04e;hb=f9fdf5a6cb58286f64f6f8bd0bfd2dab9b9b8816;hp=30489d44e3ba8dbb11c8e2dab0d7a0c48063efa8;hpb=5625b2eceaf697f104b5f883ffa73dca6e8fc005;p=chise%2Fxemacs-chise.git diff --git a/src/buffer.c b/src/buffer.c index 30489d4..703f0ce 100644 --- a/src/buffer.c +++ b/src/buffer.c @@ -541,7 +541,7 @@ get_truename_buffer (REGISTER Lisp_Object filename) static struct buffer * allocate_buffer (void) { - struct buffer *b = alloc_lcrecord_type (struct buffer, lrecord_buffer); + struct buffer *b = alloc_lcrecord_type (struct buffer, &lrecord_buffer); copy_lcrecord (b, XBUFFER (Vbuffer_defaults)); @@ -2073,8 +2073,8 @@ complex_vars_of_buffer (void) { /* Make sure all markable slots in buffer_defaults are initialized reasonably, so mark_buffer won't choke. */ - struct buffer *defs = alloc_lcrecord_type (struct buffer, lrecord_buffer); - struct buffer *syms = alloc_lcrecord_type (struct buffer, lrecord_buffer); + struct buffer *defs = alloc_lcrecord_type (struct buffer, &lrecord_buffer); + struct buffer *syms = alloc_lcrecord_type (struct buffer, &lrecord_buffer); staticpro (&Vbuffer_defaults); staticpro (&Vbuffer_local_symbols); @@ -2698,11 +2698,11 @@ directory_is_current_directory (char *pwd) GET_C_CHARPTR_INT_FILENAME_DATA_ALLOCA (pwd, pwd_internal); return (IS_DIRECTORY_SEP (*pwd_internal) - && stat (pwd_internal, &pwdstat) == 0 - && stat ("." , &dotstat) == 0 + && stat ((char *) pwd_internal, &pwdstat) == 0 + && stat (".", &dotstat) == 0 && dotstat.st_ino == pwdstat.st_ino && dotstat.st_dev == pwdstat.st_dev - && (int) strlen (pwd_internal) < MAXPATHLEN); + && (int) strlen ((char *) pwd_internal) < MAXPATHLEN); } void @@ -2734,7 +2734,7 @@ init_initial_directory (void) initial_directory[len + 1] = '\0'; } } - + /* XEmacs change: store buffer's default directory using preferred (i.e. as defined at compile-time) directory separator. --marcpa */