2 * Copyright (C) 1995-2008 University of Karlsruhe. All right reserved.
4 * This file is part of libFirm.
6 * This file may be distributed and/or modified under the terms of the
7 * GNU General Public License version 2 as published by the Free Software
8 * Foundation and appearing in the file LICENSE.GPL included in the
9 * packaging of this file.
11 * Licensees holding valid libFirm Professional Edition licenses may use
12 * this file in accordance with the libFirm Commercial License.
13 * Agreement provided with the Software.
15 * This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
16 * WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 * @brief Interface for assembler output.
23 * @author Matthias Braun
29 #include "beemitter.h"
37 struct obstack emit_obst;
39 void be_emit_init(FILE *file)
42 obstack_init(&emit_obst);
45 void be_emit_exit(void)
47 obstack_free(&emit_obst, NULL);
50 void be_emit_ident(ident *id)
52 size_t len = get_id_strlen(id);
53 const char *str = get_id_str(id);
55 be_emit_string_len(str, len);
58 void be_emit_tarval(ir_tarval *tv)
62 tarval_snprintf(buf, sizeof(buf), tv);
66 void be_emit_irvprintf(const char *fmt, va_list args)
70 ir_vsnprintf(buf, sizeof(buf), fmt, args);
74 void be_emit_irprintf(const char *fmt, ...)
79 be_emit_irvprintf(fmt, ap);
83 void be_emit_write_line(void)
85 size_t len = obstack_object_size(&emit_obst);
86 char *line = (char*)obstack_finish(&emit_obst);
88 fwrite(line, 1, len, emit_file);
89 obstack_free(&emit_obst, line);
92 void be_emit_pad_comment(void)
94 size_t len = obstack_object_size(&emit_obst);
98 be_emit_string_len(" ", 34 - len);
101 void be_emit_finish_line_gas(const ir_node *node)
104 const char *sourcefile;
109 be_emit_write_line();
113 be_emit_pad_comment();
114 be_emit_cstring("/* ");
115 be_emit_irprintf("%+F ", node);
117 dbg = get_irn_dbg_info(node);
118 sourcefile = ir_retrieve_dbg_info(dbg, &lineno);
119 if (sourcefile != NULL) {
120 be_emit_string(sourcefile);
121 be_emit_irprintf(":%u", lineno);
123 be_emit_cstring(" */\n");
124 be_emit_write_line();