xref: /netbsd-src/lib/libc/arch/vax/sys/ptrace.S (revision 787e823fd1325737172861d30c613c7e6e7d2f3d)
1ce0bb6e8Sragge/*
2ce0bb6e8Sragge * Copyright (c) 1983, 1993
3ce0bb6e8Sragge *	The Regents of the University of California.  All rights reserved.
4ce0bb6e8Sragge *
5ce0bb6e8Sragge * Redistribution and use in source and binary forms, with or without
6ce0bb6e8Sragge * modification, are permitted provided that the following conditions
7ce0bb6e8Sragge * are met:
8ce0bb6e8Sragge * 1. Redistributions of source code must retain the above copyright
9ce0bb6e8Sragge *    notice, this list of conditions and the following disclaimer.
10ce0bb6e8Sragge * 2. Redistributions in binary form must reproduce the above copyright
11ce0bb6e8Sragge *    notice, this list of conditions and the following disclaimer in the
12ce0bb6e8Sragge *    documentation and/or other materials provided with the distribution.
13eb7c1594Sagc * 3. Neither the name of the University nor the names of its contributors
14ce0bb6e8Sragge *    may be used to endorse or promote products derived from this software
15ce0bb6e8Sragge *    without specific prior written permission.
16ce0bb6e8Sragge *
17ce0bb6e8Sragge * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18ce0bb6e8Sragge * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19ce0bb6e8Sragge * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20ce0bb6e8Sragge * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21ce0bb6e8Sragge * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22ce0bb6e8Sragge * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23ce0bb6e8Sragge * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24ce0bb6e8Sragge * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25ce0bb6e8Sragge * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26ce0bb6e8Sragge * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27ce0bb6e8Sragge * SUCH DAMAGE.
28ce0bb6e8Sragge */
29ce0bb6e8Sragge
30*787e823fSmatt#include "SYS.h"
31*787e823fSmatt
32ce0bb6e8Sragge#if defined(SYSLIBC_SCCS) && !defined(lint)
33ce0bb6e8Sragge	/* .asciz "@(#)ptrace.s	8.1 (Berkeley) 6/4/93" */
34*787e823fSmattRCSID("$NetBSD: ptrace.S,v 1.8 2011/01/25 02:38:15 matt Exp $")
35ce0bb6e8Sragge#endif /* SYSLIBC_SCCS and not lint */
36ce0bb6e8Sragge
3726639702SraggeENTRY(ptrace, 0)
38c3ed25e8Skleink#ifdef _REENTRANT
39ae4364e1Smatt	calls	$0,_C_LABEL(__errno)
400ce5ca14Smatt	clrl	(%r0)
41c3ed25e8Skleink#else
42ae4364e1Smatt	clrl	_C_LABEL(errno)
43c3ed25e8Skleink#endif
44ce0bb6e8Sragge	chmk	$ SYS_ptrace
45ce0bb6e8Sragge	jcs	err
46ce0bb6e8Sragge	ret
47ce0bb6e8Sraggeerr:
48c3530f0cSmatt	jmp	CERROR+2
49*787e823fSmattEND(ptrace)
50