ensure name of a thread is a string

This commit is contained in:
Tom Tromey 2012-08-19 03:26:42 -06:00
parent 3cbf5b1d3b
commit 9dad5e59e3

View file

@ -661,6 +661,9 @@ If NAME is given, it names the new thread. */)
if (!initialized)
abort ();
if (!NILP (name))
CHECK_STRING (name);
new_thread = ALLOCATE_PSEUDOVECTOR (struct thread_state, m_gcprolist,
PVEC_THREAD);
memset ((char *) new_thread + offsetof (struct thread_state, m_gcprolist),