#include <stdio.h>
#include <stdlib.h>
#include <limits.h>
#include <float.h>
#include <ctype.h>
#include <string.h>
#include "linear.h"
#include "genC.h"
#include "text.h"
#include "ri.h"
#include "effects.h"
#include "database.h"
#include "hpf.h"
#include "hpf_private.h"
#include "reductions_private.h"
#include "message.h"
#include "properties.h"
#include "misc.h"
#include "text-util.h"
#include "ri-util.h"
#include "effects-util.h"
#include "hpfc.h"
#include "prettyprint.h"

Include dependency graph for defines-local.h:

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Macros
#define	PVECTOR(v) CHUNK(v)

#define	VECTOR gen_chunk*

#define	PVECTOR_NEWGEN_DOMAIN (-1)

#define	gen_PVECTOR_cons gen_cons

#define	DELTAV ((Variable) 12)
	??? very beurk! More...

#define	TEMPLATEV ((Variable) 13)

#define	TSHIFTV ((Variable) 14)

#define	function_mapping(f) (((f)+1)->h)
	Newgen short sentences. More...

#define	add_to_list_of_vars(l, fun, n) l = gen_nconc(make_list_of_dummy_variables((entity(*)())fun, n), l);
	list of variables... More...

#define	one_statement_unstructured(u)

#define	entity_functional(e) (type_functional(entity_type(e)))

#define	update_functional_as_model(e, model)

#define	min(a, b) (((a)<(b))?(a):(b))

#define	max(a, b) (((a)>(b))?(a):(b))

#define	iceil(a, b) ((((a)-1)/(b))+1)
	integer ceiling function More...

#define	bool_undefined ((bool) (-15))

#define	bool_undefined_p(b) ((b)==bool_undefined)

#define	int_undefined ((int) (-15))

#define	int_undefined_p(i) ((i)==int_undefined)

#define	GLOBAL_PARAMETERS_H "global_parameters.h"
	file names to be generated More...

#define	GLOBAL_INIT_H "global_init.h"

#define	HOST_NAME "HOST"
	Constants. More...

#define	NODE_NAME "NODE"

#define	UPPER "UP"
	Overlap. More...

#define	LOWER "LO"

#define	SEND 1

#define	RECEIVE 0

#define	GEN_DEBUG(D, W, P) ifdebug(D) { pips_debug(D, "%s:\n", W); P;}
	debug macro More...

#define	DEBUG_MTRX(D, W, M) GEN_DEBUG(D, W, matrix_fprint(stderr, M))

#define	DEBUG_STAT(D, W, S) GEN_DEBUG(D, W, print_statement(S))

#define	DEBUG_CODE(D, W, M, S) GEN_DEBUG(D, W, hpfc_print_code(stderr, M, S))

#define	DEBUG_SYST(D, W, S) GEN_DEBUG(D, W, sc_syst_debug(S))

#define	DEBUG_ELST(D, W, L) GEN_DEBUG(D, W, fprint_entity_list(stderr, L); fprintf(stderr, "\n"))

#define	DEBUG_BASE(D, W, B)

#define	what_stat_debug(level, stat)

#define	is_movement_collect 0
	Efficient I/O tags. More...

#define	is_movement_update 1

#define	movement_collect_p(t) ((t)==(is_movement_collect))

#define	movement_update_p(t) ((t)==(is_movement_update))

#define	SND_TO_C "HPFC SNDTO C"
	Run-time support functions and subroutine names. More...

#define	SND_TO_H "HPFC SNDTO H"

#define	SND_TO_A "HPFC SNDTO A"

#define	SND_TO_A_BY_H "HPFC HSNDTO A"

#define	SND_TO_O "HPFC SNDTO O"

#define	SND_TO_OS "HPFC SNDTO OS"

#define	SND_TO_OOS "HPFC SNDTO OOS"

#define	SND_TO_HA "HPFC NSNDTO HA"
	define SND_TO_HA "HPFC SNDTO HA" More...

#define	SND_TO_NO "HPFC SNDTO NO"

#define	SND_TO_HNO "HPFC SNDTO HNO"

#define	RCV_FR_S "HPFC RCVFR S"

#define	RCV_FR_H "HPFC RCVFR H"

#define	RCV_FR_C "HPFC RCVFR C"

#define	RCV_FR_mCS "HPFC RCVFR HNBCAST S"
	define RCV_FR_mCS "HPFC RCVFR mCS" More...

#define	RCV_FR_mCH "HPFC RCVFR mCH"

#define	CMP_COMPUTER "HPFC CMPCOMPUTER"

#define	CMP_OWNERS "HPFC CMPOWNERS"

#define	CMP_NEIGHBOUR "HPFC CMPNEIGHBOUR"

#define	CMP_LID "HPFC CMPLID"

#define	TWIN_P "HPFC TWIN P"

#define	CND_SENDERP "HPFC SENDERP"

#define	CND_OWNERP "HPFC OWNERP"

#define	CND_COMPUTERP "HPFC COMPUTERP"

#define	CND_COMPINOWNP "HPFC COMPUTERINOWNERSP"

#define	LOCAL_IND "HPFC LOCALIND"

#define	LOCAL_IND_GAMMA "HPFC LOCALINDGAMMA"

#define	LOCAL_IND_DELTA "HPFC LOCALINDDELTA"

#define	INIT_NODE "HPFC INIT NODE"

#define	INIT_HOST "HPFC INIT HOST"

#define	NODE_END "HPFC NODE END"

#define	HOST_END "HPFC HOST END"

#define	HPFC_STOP "HPFC STOP"

#define	LOOP_BOUNDS "HPFC LOOP BOUNDS"

#define	SYNCHRO "HPFC SYNCHRO"

#define	IDIVIDE "HPFC DIVIDE"

#define	SND_TO_N "HPFC SNDTO N"

#define	RCV_FR_N "HPFC RCVFR N"

#define	BUFPCK " BUFPCK"
	hpfc packing and unpacking More...

#define	BUFUPK " BUFUPK"

#define	BROADCAST "HPFC BROADCAST "

#define	GUARDED_BRD "HPFC REMAPBRD "

#define	HPFC_HCAST "HPFC HCAST"
	host/node communications More...

#define	HPFC_NCAST "HPFC NCAST"

#define	HPFC_sN2H "HPFC SND TO HOST"

#define	HPFC_sH2N "HPFC SND TO NODE"

#define	HPFC_rH2N "HPFC RCV FROM HOST"

#define	HPFC_rN2H "HPFC RCV FROM NODE"

#define	HOST_TIMEON "HPFC HTIMEON"
	special FCD calls. More...

#define	NODE_TIMEON "HPFC NTIMEON"

#define	HOST_TIMEOFF "HPFC HTIMEOFF"

#define	NODE_TIMEOFF "HPFC NTIMEOFF"

#define	HPFC_HTELL "HPFC HTELL"

#define	HPFC_NTELL "HPFC NTELL"

#define	RENAME_SUFFIX "_rename"

#define	PVM_INITSEND "pvmfinitsend"
	PVM functions that may be called by the generated code. More...

#define	PVM_SEND "pvmfsend"

#define	PVM_CAST "pvmfmcast"

#define	PVM_RECV "pvmfrecv"

#define	PVM_PACK "pvmfpack"

#define	PVM_UNPACK "pvmfunpack"

#define	PVM_BYTE1 "HPFC BYTE1"
	PVM types encoding for packing and unpacking. More...

#define	PVM_INTEGER2 "HPFC INTEGER2"

#define	PVM_INTEGER4 "HPFC INTEGER4"

#define	PVM_REAL4 "HPFC REAL4"

#define	PVM_REAL8 "HPFC REAL8"

#define	PVM_COMPLEX8 "HPFC COMPLEX8"

#define	PVM_COMPLEX16 "HPFC COMPLEX16"

#define	PVM_STRING "HPFC STRING"

#define	MYPOS "MY POS"

#define	MYLID "MY LID"

#define	MSTATUS "MSTATUS" /*remapping status /

#define	LIVEMAPPING "LIVE MAPPING"

#define	NODETIDS "NODE TIDS"

#define	HOST_TID "HOST TID"

#define	NBTASKS "MAX SIZE OF PROCS"

#define	MCASTHOST "MCAST HOST"

#define	SEND_CHANNELS "SEND CHANNELS"

#define	RECV_CHANNELS "RECV CHANNELS"

#define	HOST_SND_CHAN "HOST SND CHANNEL"

#define	HOST_RCV_CHAN "HOST RCV CHANNEL"

#define	BUFFER " BUFF"
	common /hpfc_buffers/ More...

#define	BUFSZ " BUFF SIZE"

#define	BUFFER_INDEX "BUF INDEX"

#define	BUFFER_SIZE "SIZE OF BUFFER"

#define	BUFFER_RCV_SIZE "SIZE OF RECEIVED BUFFER"

#define	LAZY_SEND "LAZY SEND"

#define	LAZY_RECV "LAZY RECV"

#define	SND_NOT_INIT "SEND NOT INITIALIZED"

#define	RCV_NOT_PRF "RECEIVED NOT PERFORMED"

#define	BUFFER_ENCODING "BUFFER ENCODING"

#define	T_LID "T LID"
	Variables. More...

#define	T_LIDp "T LIDp"

#define	INFO "HPFC INFO"

#define	BUFID "HPFC BUFID"

#define	LAZY_MESSAGES "HPFC_LAZY_MESSAGES"

#define	USE_BUFFERS "HPFC_USE_BUFFERS"

#define	set_integer(var, i) make_assign_statement(entity_to_expression(var), int_to_expression(i))
	Very Short and very local functions moved to macros, FC 17/05/94. More...

#define	set_logical(var, b)

#define	set_expression(var, e) make_assign_statement(entity_to_expression(var), e)

#define	local_index_is_different_p(array, dim) (new_declaration_tag(array, dim)!=is_hpf_newdecl_none)

#define	FindArrayDimAlignmentOfArray(array, dim) (FindAlignmentOfDim(align_alignment(load_hpf_alignment(array)), dim))

#define	FindTemplateDimAlignmentOfArray(array, dim) (FindAlignmentOfTemplateDim(align_alignment(load_hpf_alignment(array)), dim))

#define	array_to_template(array) (align_template(load_hpf_alignment(array)))

#define	template_to_processors(template) (distribute_processors(load_hpf_distribution(template)))

#define	array_to_processors(array) (template_to_processors(array_to_template(array)))

#define	hpfc_name_to_expression(s) (MakeNullaryCall(hpfc_name_to_entity(s)))

#define	condition_computerp() hpfc_name_to_expression(CND_COMPUTERP)

#define	condition_senderp() hpfc_name_to_expression(CND_SENDERP)

#define	condition_ownerp() hpfc_name_to_expression(CND_OWNERP)

#define	condition_computer_in_owners() hpfc_name_to_expression(CND_COMPINOWNP)

#define	condition_not_computer_in_owners()

#define	hpfc_name_to_stmt(s) (hpfc_make_call_statement(hpfc_name_to_entity(s), NIL))

#define	st_init_host() hpfc_name_to_stmt(INIT_HOST)

#define	st_init_node() hpfc_name_to_stmt(INIT_NODE)

#define	st_host_end() hpfc_name_to_stmt(HOST_END)

#define	st_node_end() hpfc_name_to_stmt(NODE_END)

#define	hpfc_name_and_ref_to_stmt(s, val) st_call_send_or_receive(hpfc_name_to_entity(s), val)

#define	st_send_to_computer(val) hpfc_name_and_ref_to_stmt(SND_TO_C, val)
	SND. More...

#define	st_send_to_host(val) hpfc_name_and_ref_to_stmt(SND_TO_H, val)

#define	st_send_to_all_nodes(val) hpfc_name_and_ref_to_stmt(SND_TO_A, val)

#define	st_host_send_to_all_nodes(val) hpfc_name_and_ref_to_stmt(SND_TO_A_BY_H, val)

#define	st_send_to_neighbour() hpfc_make_call_statement(hpfc_name_to_entity(SND_TO_N), NIL)

#define	st_send_to_owner(val) hpfc_name_and_ref_to_stmt(SND_TO_O, val)

#define	st_send_to_owners(val) hpfc_name_and_ref_to_stmt(SND_TO_OS, val)

#define	st_send_to_other_owners(val) hpfc_name_and_ref_to_stmt(SND_TO_OOS, val)

#define	st_send_to_host_and_all_nodes(val) hpfc_name_and_ref_to_stmt(SND_TO_HA, val)

#define	st_send_to_not_owners(val) hpfc_name_and_ref_to_stmt(SND_TO_NO, val)

#define	st_send_to_host_and_not_owners(val) hpfc_name_and_ref_to_stmt(SND_TO_HNO, val)

#define	st_receive_from_neighbour() hpfc_make_call_statement(hpfc_name_to_entity(RCV_FR_N), NIL)
	RCV. More...

#define	st_receive_from_sender(goal) hpfc_name_and_ref_to_stmt(RCV_FR_S, goal)

#define	st_receive_from_host(goal) hpfc_name_and_ref_to_stmt(RCV_FR_H, goal)

#define	st_receive_from_computer(goal) hpfc_name_and_ref_to_stmt(RCV_FR_C, goal)

#define	st_receive_mcast_from_sender(goal) hpfc_name_and_ref_to_stmt(RCV_FR_mCS, goal)

#define	st_receive_mcast_from_host(goal) hpfc_name_and_ref_to_stmt(RCV_FR_mCH, goal)

#define	primary_entity_p(a) (a==load_primary_entity(a))

#define	hpfc_warning if (!get_bool_property("HPFC_NO_WARNING")) pips_user_warning
	WARNING. More...

#define	NO_FILE (strdup(""))
	fake resources... More...

#define	HOST_SUFFIX "_host.f"
	File suffixes. More...

#define	NODE_SUFFIX "_node.f"

#define	HINC_SUFFIX "_host.h"

#define	NINC_SUFFIX "_node.h"

#define	BOTH_SUFFIX "_both.f"

#define	PARM_SUFFIX "_parameters.h"

#define	INIT_SUFFIX "_init.h"

Functions
list	base_to_list (Pbase base)
	Most includes are centralized here. More...

void	fprint_entity_list (FILE *fp, list l)
	void fprint_entity_list(FILE *fp,list l): prints a list of entities on file fp. More...

Macro Definition Documentation

◆ add_to_list_of_vars

#define add_to_list_of_vars	(	l,
		fun,
		n
	)	l = gen_nconc(make_list_of_dummy_variables((entity(*)())fun, n), l);

list of variables...

Definition at line 89 of file defines-local.h.

◆ array_to_processors

#define array_to_processors ( array ) (template_to_processors(array_to_template(array)))

Definition at line 336 of file defines-local.h.

◆ array_to_template

#define array_to_template ( array ) (align_template(load_hpf_alignment(array)))

Definition at line 330 of file defines-local.h.

◆ bool_undefined

#define bool_undefined ((bool) (-15))

Definition at line 109 of file defines-local.h.

◆ bool_undefined_p

#define bool_undefined_p ( b ) ((b)==bool_undefined)

Definition at line 110 of file defines-local.h.

◆ BOTH_SUFFIX

#define BOTH_SUFFIX "_both.f"

Definition at line 444 of file defines-local.h.

◆ BROADCAST

#define BROADCAST "HPFC BROADCAST "

Definition at line 220 of file defines-local.h.

◆ BUFFER

#define BUFFER " BUFF"

common /hpfc_buffers/

Definition at line 282 of file defines-local.h.

◆ BUFFER_ENCODING

#define BUFFER_ENCODING "BUFFER ENCODING"

Definition at line 291 of file defines-local.h.

◆ BUFFER_INDEX

#define BUFFER_INDEX "BUF INDEX"

Definition at line 284 of file defines-local.h.

◆ BUFFER_RCV_SIZE

#define BUFFER_RCV_SIZE "SIZE OF RECEIVED BUFFER"

Definition at line 286 of file defines-local.h.

◆ BUFFER_SIZE

#define BUFFER_SIZE "SIZE OF BUFFER"

Definition at line 285 of file defines-local.h.

◆ BUFID

#define BUFID "HPFC BUFID"

Definition at line 298 of file defines-local.h.

◆ BUFPCK

#define BUFPCK " BUFPCK"

hpfc packing and unpacking

Definition at line 217 of file defines-local.h.

◆ BUFSZ

#define BUFSZ " BUFF SIZE"

Definition at line 283 of file defines-local.h.

◆ BUFUPK

#define BUFUPK " BUFUPK"

Definition at line 218 of file defines-local.h.

◆ CMP_COMPUTER

#define CMP_COMPUTER "HPFC CMPCOMPUTER"

Definition at line 185 of file defines-local.h.

◆ CMP_LID

#define CMP_LID "HPFC CMPLID"

Definition at line 188 of file defines-local.h.

◆ CMP_NEIGHBOUR

#define CMP_NEIGHBOUR "HPFC CMPNEIGHBOUR"

Definition at line 187 of file defines-local.h.

◆ CMP_OWNERS

#define CMP_OWNERS "HPFC CMPOWNERS"

Definition at line 186 of file defines-local.h.

◆ CND_COMPINOWNP

#define CND_COMPINOWNP "HPFC COMPUTERINOWNERSP"

Definition at line 195 of file defines-local.h.

◆ CND_COMPUTERP

#define CND_COMPUTERP "HPFC COMPUTERP"

Definition at line 194 of file defines-local.h.

◆ CND_OWNERP

#define CND_OWNERP "HPFC OWNERP"

Definition at line 193 of file defines-local.h.

◆ CND_SENDERP

#define CND_SENDERP "HPFC SENDERP"

Definition at line 192 of file defines-local.h.

◆ condition_computer_in_owners

#define condition_computer_in_owners ( ) hpfc_name_to_expression(CND_COMPINOWNP)

Definition at line 351 of file defines-local.h.

◆ condition_computerp

#define condition_computerp ( ) hpfc_name_to_expression(CND_COMPUTERP)

Definition at line 342 of file defines-local.h.

◆ condition_not_computer_in_owners

#define condition_not_computer_in_owners ( )

Value:

(MakeUnaryCall(entity_intrinsic(NOT_OPERATOR_NAME), \

condition_computer_in_owners()))

condition_computer_in_owners

#define condition_computer_in_owners()

Definition: defines-local.h:351

NOT_OPERATOR_NAME

#define NOT_OPERATOR_NAME

Definition: ri-util-local.h:251

entity_intrinsic

entity entity_intrinsic(const char *name)

FI: I do not understand this function name (see next one!).

Definition: entity.c:1292

MakeUnaryCall

expression MakeUnaryCall(entity f, expression a)

Creates a call expression to a function with one argument.

Definition: expression.c:342

Definition at line 354 of file defines-local.h.

◆ condition_ownerp

#define condition_ownerp ( ) hpfc_name_to_expression(CND_OWNERP)

Definition at line 348 of file defines-local.h.

◆ condition_senderp

#define condition_senderp ( ) hpfc_name_to_expression(CND_SENDERP)

Definition at line 345 of file defines-local.h.

◆ DEBUG_BASE

#define DEBUG_BASE	(	D,
		W,
		B
	)

Value:

GEN_DEBUG(D, W, base_fprint(stderr, B, (string(*)(Variable))entity_local_name);\

fprintf(stderr, "\n"))

GEN_DEBUG

#define GEN_DEBUG(D, W, P)

debug macro

Definition: defines-local.h:138

B

#define B(A)

Definition: iabrev.h:61

D

#define D(A)

Definition: iabrev.h:56

base_fprint

void base_fprint(FILE *f, Pbase b, get_variable_name_t variable_name)

void base_fprint(FILE * f, Pbase b, char * (*variable_name)()): impression d'une base sur le fichier ...

Definition: io.c:342

entity_local_name

const char * entity_local_name(entity e)

entity_local_name modified so that it does not core when used in vect_fprint, since someone thought t...

Definition: entity.c:453

Variable

void * Variable

arithmetique is a requirement for vecteur, but I do not want to inforce it in all pips files....

Definition: vecteur-local.h:60

Definition at line 146 of file defines-local.h.

◆ DEBUG_CODE

#define DEBUG_CODE	(	D,
		W,
		M,
		S
	)	GEN_DEBUG(D, W, hpfc_print_code(stderr, M, S))

Definition at line 142 of file defines-local.h.

◆ DEBUG_ELST

#define DEBUG_ELST	(	D,
		W,
		L
	)	GEN_DEBUG(D, W, fprint_entity_list(stderr, L); fprintf(stderr, "\n"))

Definition at line 144 of file defines-local.h.

◆ DEBUG_MTRX

#define DEBUG_MTRX	(	D,
		W,
		M
	)	GEN_DEBUG(D, W, matrix_fprint(stderr, M))

Definition at line 140 of file defines-local.h.

◆ DEBUG_STAT

#define DEBUG_STAT	(	D,
		W,
		S
	)	GEN_DEBUG(D, W, print_statement(S))

Definition at line 141 of file defines-local.h.

◆ DEBUG_SYST

#define DEBUG_SYST	(	D,
		W,
		S
	)	GEN_DEBUG(D, W, sc_syst_debug(S))

Definition at line 143 of file defines-local.h.

◆ DELTAV

#define DELTAV ((Variable) 12)

??? very beurk!

Definition at line 79 of file defines-local.h.

◆ entity_functional

#define entity_functional ( e ) (type_functional(entity_type(e)))

Definition at line 96 of file defines-local.h.

◆ FindArrayDimAlignmentOfArray

#define FindArrayDimAlignmentOfArray	(	array,
		dim
	)	(FindAlignmentOfDim(align_alignment(load_hpf_alignment(array)), dim))

Definition at line 324 of file defines-local.h.

◆ FindTemplateDimAlignmentOfArray

#define FindTemplateDimAlignmentOfArray	(	array,
		dim
	)	(FindAlignmentOfTemplateDim(align_alignment(load_hpf_alignment(array)), dim))

Definition at line 327 of file defines-local.h.

◆ function_mapping

#define function_mapping ( f ) (((f)+1)->h)

Newgen short sentences.

Definition at line 85 of file defines-local.h.

◆ GEN_DEBUG

#define GEN_DEBUG	(	D,
		W,
		P
	)	ifdebug(D) { pips_debug(D, "%s:\n", W); P;}

debug macro

Definition at line 138 of file defines-local.h.

◆ gen_PVECTOR_cons

#define gen_PVECTOR_cons gen_cons

Definition at line 75 of file defines-local.h.

◆ GLOBAL_INIT_H

#define GLOBAL_INIT_H "global_init.h"

Definition at line 121 of file defines-local.h.

◆ GLOBAL_PARAMETERS_H

#define GLOBAL_PARAMETERS_H "global_parameters.h"

file names to be generated

Definition at line 120 of file defines-local.h.

◆ GUARDED_BRD

#define GUARDED_BRD "HPFC REMAPBRD "

Definition at line 221 of file defines-local.h.

◆ HINC_SUFFIX

#define HINC_SUFFIX "_host.h"

Definition at line 442 of file defines-local.h.

◆ HOST_END

#define HOST_END "HPFC HOST END"

Definition at line 204 of file defines-local.h.

◆ HOST_NAME

#define HOST_NAME "HOST"

Constants.

Definition at line 125 of file defines-local.h.

◆ HOST_RCV_CHAN

#define HOST_RCV_CHAN "HOST RCV CHANNEL"

Definition at line 278 of file defines-local.h.

◆ HOST_SND_CHAN

#define HOST_SND_CHAN "HOST SND CHANNEL"

Definition at line 277 of file defines-local.h.

◆ HOST_SUFFIX

#define HOST_SUFFIX "_host.f"

File suffixes.

Definition at line 440 of file defines-local.h.

◆ HOST_TID

#define HOST_TID "HOST TID"

Definition at line 272 of file defines-local.h.

◆ HOST_TIMEOFF

#define HOST_TIMEOFF "HPFC HTIMEOFF"

Definition at line 236 of file defines-local.h.

◆ HOST_TIMEON

#define HOST_TIMEON "HPFC HTIMEON"

special FCD calls.

Definition at line 234 of file defines-local.h.

◆ HPFC_HCAST

#define HPFC_HCAST "HPFC HCAST"

host/node communications

Definition at line 225 of file defines-local.h.

◆ HPFC_HTELL

#define HPFC_HTELL "HPFC HTELL"

Definition at line 238 of file defines-local.h.

◆ hpfc_name_and_ref_to_stmt

#define hpfc_name_and_ref_to_stmt	(	s,
		val
	)	st_call_send_or_receive(hpfc_name_to_entity(s), val)

Definition at line 366 of file defines-local.h.

◆ hpfc_name_to_expression

#define hpfc_name_to_expression ( s ) (MakeNullaryCall(hpfc_name_to_entity(s)))

Definition at line 339 of file defines-local.h.

◆ hpfc_name_to_stmt

#define hpfc_name_to_stmt ( s ) (hpfc_make_call_statement(hpfc_name_to_entity(s), NIL))

Definition at line 358 of file defines-local.h.

◆ HPFC_NCAST

#define HPFC_NCAST "HPFC NCAST"

Definition at line 226 of file defines-local.h.

◆ HPFC_NTELL

#define HPFC_NTELL "HPFC NTELL"

Definition at line 239 of file defines-local.h.

◆ HPFC_rH2N

#define HPFC_rH2N "HPFC RCV FROM HOST"

Definition at line 229 of file defines-local.h.

◆ HPFC_rN2H

#define HPFC_rN2H "HPFC RCV FROM NODE"

Definition at line 230 of file defines-local.h.

◆ HPFC_sH2N

#define HPFC_sH2N "HPFC SND TO NODE"

Definition at line 228 of file defines-local.h.

◆ HPFC_sN2H

#define HPFC_sN2H "HPFC SND TO HOST"

Definition at line 227 of file defines-local.h.

◆ HPFC_STOP

#define HPFC_STOP "HPFC STOP"

Definition at line 206 of file defines-local.h.

◆ hpfc_warning

#define hpfc_warning if (!get_bool_property("HPFC_NO_WARNING")) pips_user_warning

WARNING.

Definition at line 430 of file defines-local.h.

◆ iceil

#define iceil	(	a,
		b
	)	((((a)-1)/(b))+1)

integer ceiling function

Definition at line 106 of file defines-local.h.

◆ IDIVIDE

#define IDIVIDE "HPFC DIVIDE"

Definition at line 210 of file defines-local.h.

◆ INFO

#define INFO "HPFC INFO"

Definition at line 297 of file defines-local.h.

◆ INIT_HOST

#define INIT_HOST "HPFC INIT HOST"

Definition at line 202 of file defines-local.h.

◆ INIT_NODE

#define INIT_NODE "HPFC INIT NODE"

Definition at line 201 of file defines-local.h.

◆ INIT_SUFFIX

#define INIT_SUFFIX "_init.h"

Definition at line 446 of file defines-local.h.

◆ int_undefined

#define int_undefined ((int) (-15))

Definition at line 114 of file defines-local.h.

◆ int_undefined_p

#define int_undefined_p ( i ) ((i)==int_undefined)

Definition at line 115 of file defines-local.h.

◆ is_movement_collect

#define is_movement_collect 0

Efficient I/O tags.

Definition at line 159 of file defines-local.h.

◆ is_movement_update

#define is_movement_update 1

Definition at line 160 of file defines-local.h.

◆ LAZY_MESSAGES

#define LAZY_MESSAGES "HPFC_LAZY_MESSAGES"

Definition at line 302 of file defines-local.h.

◆ LAZY_RECV

#define LAZY_RECV "LAZY RECV"

Definition at line 288 of file defines-local.h.

◆ LAZY_SEND

#define LAZY_SEND "LAZY SEND"

Definition at line 287 of file defines-local.h.

◆ LIVEMAPPING

#define LIVEMAPPING "LIVE MAPPING"

Definition at line 270 of file defines-local.h.

◆ LOCAL_IND

#define LOCAL_IND "HPFC LOCALIND"

Definition at line 197 of file defines-local.h.

◆ LOCAL_IND_DELTA

#define LOCAL_IND_DELTA "HPFC LOCALINDDELTA"

Definition at line 199 of file defines-local.h.

◆ LOCAL_IND_GAMMA

#define LOCAL_IND_GAMMA "HPFC LOCALINDGAMMA"

Definition at line 198 of file defines-local.h.

◆ local_index_is_different_p

#define local_index_is_different_p	(	array,
		dim
	)	(new_declaration_tag(array, dim)!=is_hpf_newdecl_none)

Definition at line 321 of file defines-local.h.

◆ LOOP_BOUNDS

#define LOOP_BOUNDS "HPFC LOOP BOUNDS"

Definition at line 208 of file defines-local.h.

◆ LOWER

#define LOWER "LO"

Definition at line 131 of file defines-local.h.

◆ max

#define max	(	a,
		b
	)	(((a)>(b))?(a):(b))

Definition at line 103 of file defines-local.h.

◆ MCASTHOST

#define MCASTHOST "MCAST HOST"

Definition at line 274 of file defines-local.h.

◆ min

#define min	(	a,
		b
	)	(((a)<(b))?(a):(b))

Definition at line 102 of file defines-local.h.

◆ movement_collect_p

#define movement_collect_p ( t ) ((t)==(is_movement_collect))

Definition at line 161 of file defines-local.h.

◆ movement_update_p

#define movement_update_p ( t ) ((t)==(is_movement_update))

Definition at line 162 of file defines-local.h.

◆ MSTATUS

#define MSTATUS "MSTATUS" /**remapping status */

Definition at line 269 of file defines-local.h.

◆ MYLID

#define MYLID "MY LID"

Definition at line 268 of file defines-local.h.

◆ MYPOS

#define MYPOS "MY POS"

Definition at line 267 of file defines-local.h.

◆ NBTASKS

#define NBTASKS "MAX SIZE OF PROCS"

Definition at line 273 of file defines-local.h.

◆ NINC_SUFFIX

#define NINC_SUFFIX "_node.h"

Definition at line 443 of file defines-local.h.

◆ NO_FILE

#define NO_FILE (strdup(""))

fake resources...

Definition at line 435 of file defines-local.h.

◆ NODE_END

#define NODE_END "HPFC NODE END"

Definition at line 203 of file defines-local.h.

◆ NODE_NAME

#define NODE_NAME "NODE"

Definition at line 126 of file defines-local.h.

◆ NODE_SUFFIX

#define NODE_SUFFIX "_node.f"

Definition at line 441 of file defines-local.h.

◆ NODE_TIMEOFF

#define NODE_TIMEOFF "HPFC NTIMEOFF"

Definition at line 237 of file defines-local.h.

◆ NODE_TIMEON

#define NODE_TIMEON "HPFC NTIMEON"

Definition at line 235 of file defines-local.h.

◆ NODETIDS

#define NODETIDS "NODE TIDS"

Definition at line 271 of file defines-local.h.

◆ one_statement_unstructured

#define one_statement_unstructured ( u )

Value:

((control_predecessors(unstructured_control(u)) == NIL) && \

(control_successors(unstructured_control(u)) == NIL))

NIL

#define NIL

The empty list (nil in Lisp)

Definition: newgen_list.h:47

unstructured_control

#define unstructured_control

After the modification in Newgen: unstructured = entry:control x exit:control we have create a macro ...

Definition: ri-util-local.h:1923

control_predecessors

#define control_predecessors(x)

Definition: ri.h:943

control_successors

#define control_successors(x)

Definition: ri.h:945

Definition at line 92 of file defines-local.h.

◆ PARM_SUFFIX

#define PARM_SUFFIX "_parameters.h"

Definition at line 445 of file defines-local.h.

◆ primary_entity_p

#define primary_entity_p ( a ) (a==load_primary_entity(a))

Definition at line 426 of file defines-local.h.

◆ PVECTOR

#define PVECTOR ( v ) CHUNK(v)

Definition at line 72 of file defines-local.h.

◆ PVECTOR_NEWGEN_DOMAIN

#define PVECTOR_NEWGEN_DOMAIN (-1)

Definition at line 74 of file defines-local.h.

◆ PVM_BYTE1

#define PVM_BYTE1 "HPFC BYTE1"

PVM types encoding for packing and unpacking.

Definition at line 256 of file defines-local.h.

◆ PVM_CAST

#define PVM_CAST "pvmfmcast"

Definition at line 249 of file defines-local.h.

◆ PVM_COMPLEX16

#define PVM_COMPLEX16 "HPFC COMPLEX16"

Definition at line 262 of file defines-local.h.

◆ PVM_COMPLEX8

#define PVM_COMPLEX8 "HPFC COMPLEX8"

Definition at line 261 of file defines-local.h.

◆ PVM_INITSEND

#define PVM_INITSEND "pvmfinitsend"

PVM functions that may be called by the generated code.

Definition at line 247 of file defines-local.h.

◆ PVM_INTEGER2

#define PVM_INTEGER2 "HPFC INTEGER2"

Definition at line 257 of file defines-local.h.

◆ PVM_INTEGER4

#define PVM_INTEGER4 "HPFC INTEGER4"

Definition at line 258 of file defines-local.h.

◆ PVM_PACK

#define PVM_PACK "pvmfpack"

Definition at line 251 of file defines-local.h.

◆ PVM_REAL4

#define PVM_REAL4 "HPFC REAL4"

Definition at line 259 of file defines-local.h.

◆ PVM_REAL8

#define PVM_REAL8 "HPFC REAL8"

Definition at line 260 of file defines-local.h.

◆ PVM_RECV

#define PVM_RECV "pvmfrecv"

Definition at line 250 of file defines-local.h.

◆ PVM_SEND

#define PVM_SEND "pvmfsend"

Definition at line 248 of file defines-local.h.

◆ PVM_STRING

#define PVM_STRING "HPFC STRING"

Definition at line 263 of file defines-local.h.

◆ PVM_UNPACK

#define PVM_UNPACK "pvmfunpack"

Definition at line 252 of file defines-local.h.

◆ RCV_FR_C

#define RCV_FR_C "HPFC RCVFR C"

Definition at line 180 of file defines-local.h.

◆ RCV_FR_H

#define RCV_FR_H "HPFC RCVFR H"

Definition at line 179 of file defines-local.h.

◆ RCV_FR_mCH

#define RCV_FR_mCH "HPFC RCVFR mCH"

Definition at line 183 of file defines-local.h.

◆ RCV_FR_mCS

#define RCV_FR_mCS "HPFC RCVFR HNBCAST S"

define RCV_FR_mCS "HPFC RCVFR mCS"

Definition at line 182 of file defines-local.h.

◆ RCV_FR_N

#define RCV_FR_N "HPFC RCVFR N"

Definition at line 213 of file defines-local.h.

◆ RCV_FR_S

#define RCV_FR_S "HPFC RCVFR S"

Definition at line 178 of file defines-local.h.

◆ RCV_NOT_PRF

#define RCV_NOT_PRF "RECEIVED NOT PERFORMED"

Definition at line 290 of file defines-local.h.

◆ RECEIVE

#define RECEIVE 0

Definition at line 134 of file defines-local.h.

◆ RECV_CHANNELS

#define RECV_CHANNELS "RECV CHANNELS"

Definition at line 276 of file defines-local.h.

◆ RENAME_SUFFIX

#define RENAME_SUFFIX "_rename"

Definition at line 241 of file defines-local.h.

◆ SEND

#define SEND 1

Definition at line 133 of file defines-local.h.

◆ SEND_CHANNELS

#define SEND_CHANNELS "SEND CHANNELS"

Definition at line 275 of file defines-local.h.

◆ set_expression

#define set_expression	(	var,
		e
	)	make_assign_statement(entity_to_expression(var), e)

Definition at line 318 of file defines-local.h.

◆ set_integer

#define set_integer	(	var,
		i
	)	make_assign_statement(entity_to_expression(var), int_to_expression(i))

Very Short and very local functions moved to macros, FC 17/05/94.

Definition at line 310 of file defines-local.h.

◆ set_logical

#define set_logical	(	var,
		b
	)

Value:

    make_assign_statement(entity_to_expression(var),\
         make_call_expression(MakeConstant \
              (b ? ".TRUE." : ".FALSE.", is_basic_logical), NIL))

Definition at line 313 of file defines-local.h.

◆ SND_NOT_INIT

#define SND_NOT_INIT "SEND NOT INITIALIZED"

Definition at line 289 of file defines-local.h.

◆ SND_TO_A

#define SND_TO_A "HPFC SNDTO A"

Definition at line 168 of file defines-local.h.

◆ SND_TO_A_BY_H

#define SND_TO_A_BY_H "HPFC HSNDTO A"

Definition at line 169 of file defines-local.h.

◆ SND_TO_C

#define SND_TO_C "HPFC SNDTO C"

Run-time support functions and subroutine names.

Definition at line 166 of file defines-local.h.

◆ SND_TO_H

#define SND_TO_H "HPFC SNDTO H"

Definition at line 167 of file defines-local.h.

◆ SND_TO_HA

#define SND_TO_HA "HPFC NSNDTO HA"

define SND_TO_HA "HPFC SNDTO HA"

Definition at line 174 of file defines-local.h.

◆ SND_TO_HNO

#define SND_TO_HNO "HPFC SNDTO HNO"

Definition at line 176 of file defines-local.h.

◆ SND_TO_N

#define SND_TO_N "HPFC SNDTO N"

Definition at line 212 of file defines-local.h.

◆ SND_TO_NO

#define SND_TO_NO "HPFC SNDTO NO"

Definition at line 175 of file defines-local.h.

◆ SND_TO_O

#define SND_TO_O "HPFC SNDTO O"

Definition at line 170 of file defines-local.h.

◆ SND_TO_OOS

#define SND_TO_OOS "HPFC SNDTO OOS"

Definition at line 172 of file defines-local.h.

◆ SND_TO_OS

#define SND_TO_OS "HPFC SNDTO OS"

Definition at line 171 of file defines-local.h.

◆ st_host_end

#define st_host_end ( ) hpfc_name_to_stmt(HOST_END)

Definition at line 363 of file defines-local.h.

◆ st_host_send_to_all_nodes

#define st_host_send_to_all_nodes ( val ) hpfc_name_and_ref_to_stmt(SND_TO_A_BY_H, val)

Definition at line 380 of file defines-local.h.

◆ st_init_host

#define st_init_host ( ) hpfc_name_to_stmt(INIT_HOST)

Definition at line 361 of file defines-local.h.

◆ st_init_node

#define st_init_node ( ) hpfc_name_to_stmt(INIT_NODE)

Definition at line 362 of file defines-local.h.

◆ st_node_end

#define st_node_end ( ) hpfc_name_to_stmt(NODE_END)

Definition at line 364 of file defines-local.h.

◆ st_receive_from_computer

#define st_receive_from_computer ( goal ) hpfc_name_and_ref_to_stmt(RCV_FR_C, goal)

Definition at line 416 of file defines-local.h.

◆ st_receive_from_host

#define st_receive_from_host ( goal ) hpfc_name_and_ref_to_stmt(RCV_FR_H, goal)

Definition at line 413 of file defines-local.h.

◆ st_receive_from_neighbour

#define st_receive_from_neighbour ( ) hpfc_make_call_statement(hpfc_name_to_entity(RCV_FR_N), NIL)

RCV.

Definition at line 407 of file defines-local.h.

◆ st_receive_from_sender

#define st_receive_from_sender ( goal ) hpfc_name_and_ref_to_stmt(RCV_FR_S, goal)

Definition at line 410 of file defines-local.h.

◆ st_receive_mcast_from_host

#define st_receive_mcast_from_host ( goal ) hpfc_name_and_ref_to_stmt(RCV_FR_mCH, goal)

Definition at line 422 of file defines-local.h.

◆ st_receive_mcast_from_sender

#define st_receive_mcast_from_sender ( goal ) hpfc_name_and_ref_to_stmt(RCV_FR_mCS, goal)

Definition at line 419 of file defines-local.h.

◆ st_send_to_all_nodes

#define st_send_to_all_nodes ( val ) hpfc_name_and_ref_to_stmt(SND_TO_A, val)

Definition at line 377 of file defines-local.h.

◆ st_send_to_computer

#define st_send_to_computer ( val ) hpfc_name_and_ref_to_stmt(SND_TO_C, val)

SND.

Definition at line 371 of file defines-local.h.

◆ st_send_to_host

#define st_send_to_host ( val ) hpfc_name_and_ref_to_stmt(SND_TO_H, val)

Definition at line 374 of file defines-local.h.

◆ st_send_to_host_and_all_nodes

#define st_send_to_host_and_all_nodes ( val ) hpfc_name_and_ref_to_stmt(SND_TO_HA, val)

Definition at line 395 of file defines-local.h.

◆ st_send_to_host_and_not_owners

#define st_send_to_host_and_not_owners ( val ) hpfc_name_and_ref_to_stmt(SND_TO_HNO, val)

Definition at line 401 of file defines-local.h.

◆ st_send_to_neighbour

#define st_send_to_neighbour ( ) hpfc_make_call_statement(hpfc_name_to_entity(SND_TO_N), NIL)

Definition at line 383 of file defines-local.h.

◆ st_send_to_not_owners

#define st_send_to_not_owners ( val ) hpfc_name_and_ref_to_stmt(SND_TO_NO, val)

Definition at line 398 of file defines-local.h.

◆ st_send_to_other_owners

#define st_send_to_other_owners ( val ) hpfc_name_and_ref_to_stmt(SND_TO_OOS, val)

Definition at line 392 of file defines-local.h.

◆ st_send_to_owner

#define st_send_to_owner ( val ) hpfc_name_and_ref_to_stmt(SND_TO_O, val)

Definition at line 386 of file defines-local.h.

◆ st_send_to_owners

#define st_send_to_owners ( val ) hpfc_name_and_ref_to_stmt(SND_TO_OS, val)

Definition at line 389 of file defines-local.h.

◆ SYNCHRO

#define SYNCHRO "HPFC SYNCHRO"

Definition at line 209 of file defines-local.h.

◆ T_LID

#define T_LID "T LID"

Variables.

Definition at line 295 of file defines-local.h.

◆ T_LIDp

#define T_LIDp "T LIDp"

Definition at line 296 of file defines-local.h.

◆ template_to_processors

#define template_to_processors ( template ) (distribute_processors(load_hpf_distribution(template)))

Definition at line 333 of file defines-local.h.

◆ TEMPLATEV

#define TEMPLATEV ((Variable) 13)

Definition at line 80 of file defines-local.h.

◆ TSHIFTV

#define TSHIFTV ((Variable) 14)

Definition at line 81 of file defines-local.h.

◆ TWIN_P

#define TWIN_P "HPFC TWIN P"

Definition at line 190 of file defines-local.h.

◆ update_functional_as_model

#define update_functional_as_model	(	e,
		model
	)

Value:

free_functional(entity_functional(e)), \

entity_functional(e) = copy_functional(entity_functional(model));

free_functional

void free_functional(functional p)

Definition: ri.c:1076

copy_functional

functional copy_functional(functional p)

FUNCTIONAL.

Definition: ri.c:1073

entity_functional

#define entity_functional(e)

Definition: defines-local.h:96

Definition at line 98 of file defines-local.h.

◆ UPPER

#define UPPER "UP"

Overlap.

Definition at line 130 of file defines-local.h.

◆ USE_BUFFERS

#define USE_BUFFERS "HPFC_USE_BUFFERS"

Definition at line 303 of file defines-local.h.

◆ VECTOR

#define VECTOR gen_chunk*

Definition at line 73 of file defines-local.h.

◆ what_stat_debug

#define what_stat_debug	(	level,
		stat
	)

Value:

 ifdebug(level) \
 { intptr_t so_ = statement_ordering(stat);\
   pips_debug(level, "statement %p (%"PRIdPTR",%"PRIdPTR":%"PRIdPTR")\n",\
   stat, ORDERING_NUMBER(so_), ORDERING_STATEMENT(so_), \
   statement_number(stat));}

Definition at line 150 of file defines-local.h.

Function Documentation

◆ base_to_list()

list base_to_list ( Pbase b )

Most includes are centralized here.

standard C includes C3/LINEAR NEWGEN PIPS in paf-util.h:

Most includes are centralized here.

Definition at line 47 of file misc_paf_utils.c.

 {
  list l = NIL;
  
  for( ; b != NULL; b = b->succ)
    l = gen_nconc(l, CONS(ENTITY, (entity) b->var, NIL));
  
  return(l);
 }

References CONS, ENTITY, gen_nconc(), NIL, Svecteur::succ, and Svecteur::var.

Referenced by apply_farkas(), array_must_fully_written_by_regions_p(), build_first_comb(), build_third_comb(), clean_distributed_io_system(), clean_list_of_unk(), clean_shared_io_system(), copy_write_statement_with_cumulated_regions(), include_time_in_base(), include_trans_on_LC_in_ref(), include_trans_on_LC_in_sc(), include_trans_on_LC_in_sc2(), is_mu_stat_in_sc(), make_causal_external(), make_causal_internal(), make_dual(), make_list_of_unk(), make_primal(), matrix_to_system(), my_matrices_to_constraints_with_sym_cst(), pip_solve_min_with_big(), plc_make_distance(), put_variables_in_ordered_lists(), region_to_com_nest(), region_to_loop_nest(), remapping_variables(), replace_indices_region(), replace_indices_region_com(), valuer(), and vvs_on_polynome().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fprint_entity_list()

void fprint_entity_list	(	FILE *	fp,
		list	l
	)

void fprint_entity_list(FILE *fp,list l): prints a list of entities on file fp.

Definition at line 3188 of file entity.c.

 {
   for( ; l != NIL; l = CDR(l))
     fprintf(fp, "%s, ", entity_local_name(ENTITY(CAR(l))));
 }

References CAR, CDR, ENTITY, entity_local_name(), fprintf(), and NIL.

Referenced by analyze_quast(), better_elim_var_with_eg(), build_first_comb(), build_list_of_min(), build_third_comb(), cmf_layout_align(), craft_layout_align(), fprint_loop(), include_trans_on_LC_in_ref(), make_bounds(), mapping_on_broadcast(), new_elim_var_with_eg(), partial_broadcast_coefficients(), partition_unknowns(), plc_elim_var_with_eg(), prepare_reindexing(), prgm_mapping(), printf_loop(), prototype_dimension(), rm_non_x_var(), simplify_bdt(), simplify_dimension(), and valuer().

Here is the call graph for this function:

Here is the caller graph for this function:

Macros

Functions

Macro Definition Documentation

◆ add_to_list_of_vars

◆ array_to_processors

◆ array_to_template

◆ bool_undefined

◆ bool_undefined_p

◆ BOTH_SUFFIX

◆ BROADCAST

◆ BUFFER

◆ BUFFER_ENCODING

◆ BUFFER_INDEX

◆ BUFFER_RCV_SIZE

◆ BUFFER_SIZE

◆ BUFID

◆ BUFPCK

◆ BUFSZ

◆ BUFUPK

◆ CMP_COMPUTER

◆ CMP_LID

◆ CMP_NEIGHBOUR

◆ CMP_OWNERS

◆ CND_COMPINOWNP

◆ CND_COMPUTERP

◆ CND_OWNERP

◆ CND_SENDERP

◆ condition_computer_in_owners

◆ condition_computerp

◆ condition_not_computer_in_owners

◆ condition_ownerp

◆ condition_senderp

◆ DEBUG_BASE

◆ DEBUG_CODE

◆ DEBUG_ELST

◆ DEBUG_MTRX

◆ DEBUG_STAT

◆ DEBUG_SYST

◆ DELTAV

◆ entity_functional

◆ FindArrayDimAlignmentOfArray

◆ FindTemplateDimAlignmentOfArray

◆ function_mapping

◆ GEN_DEBUG

◆ gen_PVECTOR_cons

◆ GLOBAL_INIT_H

◆ GLOBAL_PARAMETERS_H

◆ GUARDED_BRD

◆ HINC_SUFFIX

◆ HOST_END

◆ HOST_NAME

◆ HOST_RCV_CHAN

◆ HOST_SND_CHAN

◆ HOST_SUFFIX

◆ HOST_TID

◆ HOST_TIMEOFF

◆ HOST_TIMEON

◆ HPFC_HCAST

◆ HPFC_HTELL

◆ hpfc_name_and_ref_to_stmt

◆ hpfc_name_to_expression

◆ hpfc_name_to_stmt

◆ HPFC_NCAST

◆ HPFC_NTELL

◆ HPFC_rH2N

◆ HPFC_rN2H

◆ HPFC_sH2N

◆ HPFC_sN2H

◆ HPFC_STOP

◆ hpfc_warning

◆ iceil

◆ IDIVIDE

◆ INFO

◆ INIT_HOST

◆ INIT_NODE

◆ INIT_SUFFIX

◆ int_undefined

◆ int_undefined_p

◆ is_movement_collect

◆ is_movement_update