[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] scratch/record fff19c5 06/13: Use sizeof to get length of
From: |
Lars Brinkhoff |
Subject: |
[Emacs-diffs] scratch/record fff19c5 06/13: Use sizeof to get length of cl-struct prefix. |
Date: |
Mon, 20 Mar 2017 16:11:09 -0400 (EDT) |
branch: scratch/record
commit fff19c5c548c7404845c092030abdfaa9f6e8e46
Author: Lars Brinkhoff <address@hidden>
Commit: Lars Brinkhoff <address@hidden>
Use sizeof to get length of cl-struct prefix.
Also replace a `0' with `false'.
---
src/data.c | 8 +++-----
1 file changed, 3 insertions(+), 5 deletions(-)
diff --git a/src/data.c b/src/data.c
index 5a91d92..0e7f4b4 100644
--- a/src/data.c
+++ b/src/data.c
@@ -201,8 +201,7 @@ DEFUN ("null", Fnull, Snull, 1, 1, 0,
return Qnil;
}
-static const char *old_struct_prefix = "cl-struct-";
-static int old_struct_prefix_length;
+static const char old_struct_prefix[] = "cl-struct-";
static int
vector_struct_p (Lisp_Object object)
@@ -214,7 +213,7 @@ vector_struct_p (Lisp_Object object)
return SYMBOLP (type)
&& strncmp (SDATA (SYMBOL_NAME (type)),
old_struct_prefix,
- old_struct_prefix_length) == 0;
+ sizeof old_struct_prefix - 1) == 0;
}
static Lisp_Object
@@ -3899,8 +3898,7 @@ syms_of_data (void)
DEFVAR_BOOL ("old-struct-compat", old_struct_compat,
doc: /* Non-nil means hack for old structs is in effect. */);
- old_struct_compat = 0;
- old_struct_prefix_length = strlen (old_struct_prefix);
+ old_struct_compat = false;
DEFSYM (Qwatchers, "watchers");
DEFSYM (Qmakunbound, "makunbound");
- [Emacs-diffs] branch scratch/record created (now dbb4691), Lars Brinkhoff, 2017/03/20
- [Emacs-diffs] scratch/record 457791b 04/13: Test cases., Lars Brinkhoff, 2017/03/20
- [Emacs-diffs] scratch/record 29d7fef 03/13: Make EIEIO use records., Lars Brinkhoff, 2017/03/20
- [Emacs-diffs] scratch/record fff19c5 06/13: Use sizeof to get length of cl-struct prefix.,
Lars Brinkhoff <=
- [Emacs-diffs] scratch/record 6450a4c 07/13: Better doc string for `old-struct-compat'., Lars Brinkhoff, 2017/03/20
- [Emacs-diffs] scratch/record 953ceab 10/13: Fix cl-print-object to find the object class the new way., Lars Brinkhoff, 2017/03/20
- [Emacs-diffs] scratch/record 18e3aac 01/13: Add record objects with user-defined types., Lars Brinkhoff, 2017/03/20
- [Emacs-diffs] scratch/record f6e4882 11/13: Make a note that CHECK_RECORD_TYPE is a work in progress., Lars Brinkhoff, 2017/03/20
- [Emacs-diffs] scratch/record 9122e24 12/13: Signal errors from APIs., Lars Brinkhoff, 2017/03/20
- [Emacs-diffs] scratch/record be8079b 05/13: Backward compatibility with pre-existing struct instances., Lars Brinkhoff, 2017/03/20
- [Emacs-diffs] scratch/record 91584a7 09/13: Make it possible to compare records with `equal'., Lars Brinkhoff, 2017/03/20
- [Emacs-diffs] scratch/record dbb4691 13/13: Enable legacy defstruct compatibility., Lars Brinkhoff, 2017/03/20
- [Emacs-diffs] scratch/record db8ff08 08/13: Better doc strings for `make-record', `record', and `copy-record'., Lars Brinkhoff, 2017/03/20
- [Emacs-diffs] scratch/record 5d4f89f 02/13: Update cl-defstruct to use records., Lars Brinkhoff, 2017/03/20