New test for make_symbol_constant

* test/src/data-tests.el (data-tests-make_symbol_constant): New
test.

diff --git a/test/src/data-tests.el b/test/src/data-tests.el
index 7d8535f5f37e06be31518b9868d45f448367b6a3..7ce2995e562cec5ad04abb48a5b21f9bc1ff2326 100644 (file)
--- a/test/src/data-tests.el
+++ b/test/src/data-tests.el
@@ -768,4 +768,8 @@ comparing the subr with a much slower Lisp implementation."
                          (default-value 'last-coding-system-used))
                    '(no-conversion bug34318)))))
 
+(ert-deftest data-tests-make_symbol_constant ()
+  "Can't set variable marked with 'make_symbol_constant'."
+  (should-error (setq most-positive-fixnum 1) :type 'setting-constant))
+
 ;;; data-tests.el ends here