1// A wrapper around free to enable a realloc implementation.
2
3// Copyright (C) 2014-2015 Free Software Foundation, Inc.
4
5// This file is free software; you can redistribute it and/or modify it
6// under the terms of the GNU General Public License as published by the
7// Free Software Foundation; either version 3, or (at your option) any
8// later version.
9
10// This file is distributed in the hope that it will be useful, but
11// WITHOUT ANY WARRANTY; without even the implied warranty of
12// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13// General Public License for more details.
14
15// Under Section 7 of GPL version 3, you are granted additional
16// permissions described in the GCC Runtime Library Exception, version
17// 3.1, as published by the Free Software Foundation.
18
19// You should have received a copy of the GNU General Public License and
20// a copy of the GCC Runtime Library Exception along with this program;
21// see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
22// <http://www.gnu.org/licenses/>.
23
24        .version        3.1
25        .target sm_30
26        .address_size 64
27
28.extern .func free(.param.u64 %in_ar1);
29
30// BEGIN GLOBAL FUNCTION DEF: __nvptx_free
31.visible .func __nvptx_free(.param.u64 %in_ar1)
32{
33	.reg.u64 %ar1;
34	.reg.u64 %hr10;
35	.reg.u64 %r23;
36	.reg.pred %r25;
37	.reg.u64 %r27;
38	ld.param.u64 %ar1, [%in_ar1];
39		mov.u64	%r23, %ar1;
40		setp.eq.u64 %r25,%r23,0;
41	@%r25	bra	$L1;
42		add.u64	%r27, %r23, -8;
43	{
44		.param.u64 %out_arg0;
45		st.param.u64 [%out_arg0], %r27;
46		call free, (%out_arg0);
47	}
48$L1:
49	ret;
50	}
51