projects
/
libfirm
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
cleanup backend: make pre_spill_prepare_constraint independent of chordal allocator...
[libfirm]
/
ir
/
be
/
beemitter.c
diff --git
a/ir/be/beemitter.c
b/ir/be/beemitter.c
index
31777e5
..
62381f0
100644
(file)
--- a/
ir/be/beemitter.c
+++ b/
ir/be/beemitter.c
@@
-1,5
+1,5
@@
/*
/*
- * Copyright (C) 1995-200
7
University of Karlsruhe. All right reserved.
+ * Copyright (C) 1995-200
8
University of Karlsruhe. All right reserved.
*
* This file is part of libFirm.
*
*
* This file is part of libFirm.
*
@@
-17,97
+17,108
@@
* PURPOSE.
*/
* PURPOSE.
*/
-/*
- * Author: Matthias Braun
- * Date: 12.03.2007
- * Copyright: (c) Universitaet Karlsruhe
- * License: This file is protected by GPL - GNU GENERAL PUBLIC LICENSE.
+/**
+ * @file
+ * @brief Interface for assembler output.
+ * @author Matthias Braun
+ * @date 12.03.2007
+ * @version $Id$
*/
*/
-#ifdef HAVE_CONFIG_H
#include "config.h"
#include "config.h"
-#endif
#include "beemitter.h"
#include "irprintf.h"
#include "beemitter.h"
#include "irprintf.h"
+#include "ident.h"
+#include "tv.h"
+#include "dbginfo.h"
-void be_emit_init_env(be_emit_env_t *env, FILE *F)
-{
- memset(env, 0, sizeof(env[0]));
+FILE *emit_file;
+struct obstack emit_obst;
- env->F = F;
- obstack_init(&env->obst);
- env->linelength = 0;
+void be_emit_init(FILE *file)
+{
+ emit_file = file;
+ obstack_init(&emit_obst);
}
}
-void be_emit_
destroy_env(be_emit_env_t *env
)
+void be_emit_
exit(void
)
{
{
- obstack_free(&e
nv->
obst, NULL);
+ obstack_free(&e
mit_
obst, NULL);
}
}
-void be_emit_ident(
be_emit_env_t *env,
ident *id)
+void be_emit_ident(ident *id)
{
{
- size_t len = get_id_strlen(id);
+ size_t
len = get_id_strlen(id);
const char *str = get_id_str(id);
const char *str = get_id_str(id);
- be_emit_string_len(env, str, len);
+ be_emit_string_len(str, len);
+}
+
+void be_emit_tarval(tarval *tv)
+{
+ char buf[64];
+
+ tarval_snprintf(buf, sizeof(buf), tv);
+ be_emit_string(buf);
}
}
-void be_emit_irvprintf(
be_emit_env_t *env,
const char *fmt, va_list args)
+void be_emit_irvprintf(const char *fmt, va_list args)
{
char buf[256];
ir_vsnprintf(buf, sizeof(buf), fmt, args);
{
char buf[256];
ir_vsnprintf(buf, sizeof(buf), fmt, args);
- be_emit_string(
env,
buf);
+ be_emit_string(buf);
}
}
-void be_emit_irprintf(
be_emit_env_t *env,
const char *fmt, ...)
+void be_emit_irprintf(const char *fmt, ...)
{
va_list ap;
va_start(ap, fmt);
{
va_list ap;
va_start(ap, fmt);
- be_emit_irvprintf(
env,
fmt, ap);
+ be_emit_irvprintf(fmt, ap);
va_end(ap);
}
va_end(ap);
}
-void be_emit_write_line(
be_emit_env_t *env
)
+void be_emit_write_line(
void
)
{
{
- char *finished_line = obstack_finish(&env->obst);
+ size_t len = obstack_object_size(&emit_obst);
+ char *line = obstack_finish(&emit_obst);
- fwrite(finished_line, env->linelength, 1, env->F);
- env->linelength = 0;
- obstack_free(&env->obst, finished_line);
+ fwrite(line, 1, len, emit_file);
+ obstack_free(&emit_obst, line);
}
}
-void be_emit_pad_comment(
be_emit_env_t *env
)
+void be_emit_pad_comment(
void
)
{
{
- while(env->linelength <= 30) {
- be_emit_char(env, ' ');
- }
- be_emit_cstring(env, " ");
+ size_t len = obstack_object_size(&emit_obst);
+ if (len > 30)
+ len = 30;
+ /* 34 spaces */
+ be_emit_string_len(" ", 34 - len);
}
}
-void be_emit_finish_line_gas(
be_emit_env_t *env,
const ir_node *node)
+void be_emit_finish_line_gas(const ir_node *node)
{
{
- dbg_info *dbg;
+ dbg_info
*dbg;
const char *sourcefile;
const char *sourcefile;
- unsigned lineno;
+ unsigned
lineno;
if(node == NULL) {
if(node == NULL) {
- be_emit_char(
env,
'\n');
- be_emit_write_line(
env
);
+ be_emit_char('\n');
+ be_emit_write_line();
return;
}
return;
}
- be_emit_pad_comment(
env
);
- be_emit_cstring(
env,
"/* ");
- be_emit_irprintf(
env,
"%+F ", node);
+ be_emit_pad_comment();
+ be_emit_cstring("/* ");
+ be_emit_irprintf("%+F ", node);
- dbg = get_irn_dbg_info(node);
- sourcefile =
be
_retrieve_dbg_info(dbg, &lineno);
+ dbg
= get_irn_dbg_info(node);
+ sourcefile =
ir
_retrieve_dbg_info(dbg, &lineno);
if(sourcefile != NULL) {
if(sourcefile != NULL) {
- be_emit_string(
env,
sourcefile);
- be_emit_irprintf(
env,
":%u", lineno);
+ be_emit_string(sourcefile);
+ be_emit_irprintf(":%u", lineno);
}
}
- be_emit_cstring(
env,
" */\n");
- be_emit_write_line(
env
);
+ be_emit_cstring(" */\n");
+ be_emit_write_line();
}
}