2002-12-02 15:42:15 +00:00
|
|
|
/* macro.h - header file for macro support for gas
|
2005-03-03 01:29:54 +00:00
|
|
|
Copyright 1994, 1995, 1996, 1997, 1998, 2000, 2002, 2003, 2004
|
2001-03-08 23:24:26 +00:00
|
|
|
Free Software Foundation, Inc.
|
1999-05-03 07:29:11 +00:00
|
|
|
|
|
|
|
Written by Steve and Judy Chamberlain of Cygnus Support,
|
|
|
|
sac@cygnus.com
|
|
|
|
|
|
|
|
This file is part of GAS, the GNU Assembler.
|
|
|
|
|
|
|
|
GAS is free software; you can redistribute it and/or modify
|
|
|
|
it under the terms of the GNU General Public License as published by
|
|
|
|
the Free Software Foundation; either version 2, or (at your option)
|
|
|
|
any later version.
|
|
|
|
|
|
|
|
GAS is distributed in the hope that it will be useful,
|
|
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
GNU General Public License for more details.
|
|
|
|
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
|
|
along with GAS; see the file COPYING. If not, write to the Free
|
|
|
|
Software Foundation, 59 Temple Place - Suite 330, Boston, MA
|
2000-09-12 20:57:14 +00:00
|
|
|
02111-1307, USA. */
|
1999-05-03 07:29:11 +00:00
|
|
|
|
|
|
|
#ifndef MACRO_H
|
|
|
|
|
|
|
|
#define MACRO_H
|
|
|
|
|
|
|
|
#include "ansidecl.h"
|
|
|
|
#include "sb.h"
|
|
|
|
|
2000-09-12 20:57:14 +00:00
|
|
|
/* Structures used to store macros.
|
2000-03-26 14:47:33 +00:00
|
|
|
|
|
|
|
Each macro knows its name and included text. It gets built with a
|
|
|
|
list of formal arguments, and also keeps a hash table which points
|
|
|
|
into the list to speed up formal search. Each formal knows its
|
|
|
|
name and its default value. Each time the macro is expanded, the
|
2003-10-27 12:45:17 +00:00
|
|
|
formals get the actual values attached to them. */
|
2000-03-26 14:47:33 +00:00
|
|
|
|
2002-12-02 15:42:15 +00:00
|
|
|
/* Describe the formal arguments to a macro. */
|
2000-03-26 14:47:33 +00:00
|
|
|
|
2000-11-07 01:18:45 +00:00
|
|
|
typedef struct formal_struct {
|
2002-12-02 15:42:15 +00:00
|
|
|
struct formal_struct *next; /* Next formal in list. */
|
|
|
|
sb name; /* Name of the formal. */
|
|
|
|
sb def; /* The default value. */
|
|
|
|
sb actual; /* The actual argument (changed on each expansion). */
|
|
|
|
int index; /* The index of the formal 0..formal_count - 1. */
|
2000-11-07 01:18:45 +00:00
|
|
|
} formal_entry;
|
2000-03-26 14:47:33 +00:00
|
|
|
|
|
|
|
/* Other values found in the index field of a formal_entry. */
|
|
|
|
#define QUAL_INDEX (-1)
|
|
|
|
#define NARG_INDEX (-2)
|
|
|
|
#define LOCAL_INDEX (-3)
|
|
|
|
|
2002-12-02 15:42:15 +00:00
|
|
|
/* Describe the macro. */
|
2000-03-26 14:47:33 +00:00
|
|
|
|
2002-12-02 15:42:15 +00:00
|
|
|
typedef struct macro_struct
|
|
|
|
{
|
|
|
|
sb sub; /* Substitution text. */
|
|
|
|
int formal_count; /* Number of formal args. */
|
|
|
|
formal_entry *formals; /* Pointer to list of formal_structs. */
|
|
|
|
struct hash_control *formal_hash; /* Hash table of formals. */
|
2000-11-07 01:18:45 +00:00
|
|
|
} macro_entry;
|
2000-03-26 14:47:33 +00:00
|
|
|
|
1999-05-03 07:29:11 +00:00
|
|
|
/* Whether any macros have been defined. */
|
|
|
|
|
|
|
|
extern int macro_defined;
|
|
|
|
|
|
|
|
/* The macro nesting level. */
|
|
|
|
|
|
|
|
extern int macro_nest;
|
|
|
|
|
2003-11-24 17:52:33 +00:00
|
|
|
extern int buffer_and_nest (const char *, const char *, sb *, int (*) (sb *));
|
1999-05-03 07:29:11 +00:00
|
|
|
extern void macro_init
|
2003-11-24 17:52:33 +00:00
|
|
|
(int, int, int, int (*) (const char *, int, sb *, int *));
|
2004-08-13 19:53:52 +00:00
|
|
|
extern void macro_set_alternate (int);
|
2003-11-24 17:52:33 +00:00
|
|
|
extern void macro_mri_mode (int);
|
1999-05-03 07:29:11 +00:00
|
|
|
extern const char *define_macro
|
2003-11-24 17:52:33 +00:00
|
|
|
(int, sb *, sb *, int (*) (sb *), const char **);
|
|
|
|
extern int check_macro (const char *, sb *, const char **, macro_entry **);
|
|
|
|
extern void delete_macro (const char *);
|
|
|
|
extern const char *expand_irp (int, int, sb *, sb *, int (*) (sb *));
|
1999-05-03 07:29:11 +00:00
|
|
|
|
|
|
|
#endif
|