1987-03-10 11:49:39 +00:00
|
|
|
/* $Header$ */
|
1987-03-09 19:15:41 +00:00
|
|
|
/*
|
|
|
|
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
|
|
|
|
* See the copyright notice in the ACK home directory, in the file "Copyright".
|
|
|
|
*/
|
1984-11-26 14:14:55 +00:00
|
|
|
/* I N L I N E S U B S T I T U T I O N
|
|
|
|
*
|
|
|
|
* I L 1 _ C A L . C
|
|
|
|
*/
|
|
|
|
|
|
|
|
struct class {
|
|
|
|
byte src_class;
|
|
|
|
byte res_class;
|
|
|
|
};
|
|
|
|
|
|
|
|
typedef struct class *class_p;
|
|
|
|
|
|
|
|
extern struct class classtab[];
|
|
|
|
|
|
|
|
#define NOCLASS 0
|
|
|
|
#define CLASS1 1
|
|
|
|
#define CLASS2 2
|
|
|
|
#define CLASS3 3
|
|
|
|
#define CLASS4 4
|
|
|
|
#define CLASS5 5
|
|
|
|
#define CLASS6 6
|
|
|
|
#define CLASS7 7
|
|
|
|
#define CLASS8 8
|
|
|
|
#define CLASS9 9
|
|
|
|
|
|
|
|
|
|
|
|
extern anal_cal(); /* (line_p call, bblock_p b)
|
|
|
|
* analyze a call instruction;
|
|
|
|
* try to recognize the actual parameter
|
|
|
|
* expressions.
|
|
|
|
*/
|