/**************************************************************************/

/*  mmglue: midipix architecture- and target-specific bits for musl libc  */

/*  Copyright (C) 2013--2023  SysDeer Technologies, LLC                   */

/*  Released under GPLv2 and GPLv3; see COPYING.MMGLUE.                   */

/**************************************************************************/

#include <errno.h>

#include "pthread_impl.h"

int __set_thread_area(void * p)

{

	struct pthread ** ptlca;

	ptlca = __psx_tlca();

	if (!ptlca) return -ESRCH;

	*ptlca = p;

	return 0;

}