File: interpose_temporary.c

package info (click to toggle)
flick 2.1-1
  • links: PTS
  • area: main
  • in suites: potato
  • size: 11,692 kB
  • ctags: 10,069
  • sloc: ansic: 57,561; cpp: 51,276; sh: 1,913; yacc: 1,755; lex: 984; makefile: 892; lisp: 140
file content (66 lines) | stat: -rw-r--r-- 1,936 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
/*
 * Copyright (c) 1999 The University of Utah and
 * the Computer Systems Laboratory at the University of Utah (CSL).
 *
 * This file is part of Flick, the Flexible IDL Compiler Kit.
 *
 * Flick is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * Flick is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with Flick; see the file COPYING.  If not, write to
 * the Free Software Foundation, 59 Temple Place #330, Boston, MA 02111, USA.
 */

#include <assert.h>

#include <mom/libaoi.h>
#include <mom/c/libpres_c.h>
#include <mom/compiler.h>

void pres_c_interpose_temporary(cast_type ctype,
				const char *name,
				cast_expr init,
				const char *prehandler,
				const char *posthandler,
				int is_const,
				pres_c_temporary_type temp_type,
				pres_c_mapping *inout_mapping)
{
	pres_c_mapping new_mapping;
	pres_c_temporary *temp;
	
	assert(inout_mapping);
	assert(*inout_mapping);
	
	/*
	 * Create a PRES_C_MAPPING_TEMPORARY node.
	 */
	
	new_mapping = pres_c_new_mapping(PRES_C_MAPPING_TEMPORARY);
	temp = &new_mapping->pres_c_mapping_u_u.temp;
	
	assert(name);
	temp->name = flick_asprintf("%s", name);
	assert(ctype);
	temp->ctype = ctype;
	temp->init = init;
	/* `prehandler' and `posthandler' cannot be NULL. */
	temp->prehandler = ir_strlit(prehandler ? prehandler : "");
	temp->posthandler = ir_strlit(posthandler ? posthandler : "");
	temp->is_const = is_const;
	temp->type = temp_type;
	temp->map = *inout_mapping;
	
	*inout_mapping = new_mapping;
}

/* End of file. */