PIPS
|
#include <stdio.h>
#include <string.h>
#include "linear.h"
#include "genC.h"
#include "text-util.h"
#include "ri-util.h"
#include "prettyprint.h"
Go to the source code of this file.
Functions | |
cons * | words_cmf_loop_range (range obj) |
Prettyprinter for CM FORTRAN loops. More... | |
text | text_loop_cmf (entity module, const char *label, int margin, loop obj, int n, list lr, list lidx) |
===================================================================== More... | |
text text_loop_cmf | ( | entity | module, |
const char* | label, | ||
int | margin, | ||
loop | obj, | ||
int | n, | ||
list | lr, | ||
list | lidx | ||
) |
=====================================================================
module | odule |
label | abel |
margin | argin |
obj | bj |
lr | r |
lidx | idx |
Definition at line 66 of file cmfortran.c.
References CAR, CDR, CHAIN_SWORD, CONS, ENDP, ENTITY, entity_local_name(), gen_nconc(), instruction_assign_p(), instruction_call, instruction_loop, instruction_loop_p, is_sentence_unformatted, loop_body, loop_index, loop_range, make_sentence(), make_text(), make_unformatted(), module, NIL, POP, RANGE, SENTENCE, statement_instruction, strdup(), text_undefined, Words_Call(), and words_cmf_loop_range().
Referenced by text_loop().
Prettyprinter for CM FORTRAN loops.
There are memory leaks here since a new expression is constructed. =====================================================================
expression_constant_p(range_increment(obj)) &&
obj | bj |
Definition at line 46 of file cmfortran.c.
References call_function, CHAIN_SWORD, entity_local_name(), expression_syntax, gen_nconc(), range_increment, range_lower, range_upper, syntax_call, Words_Expression(), and Words_Subexpression().
Referenced by text_loop_cmf().