+2004-10-10 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
+
+ * module.c: Fix formatting issues.
+
2004-10-09 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
* module.c (mio_interface_rest): Set where member of interface
#define MODULE_EXTENSION ".mod"
-/* Structure that describes a position within a module file */
+/* Structure that describes a position within a module file. */
typedef struct
{
fixup_t;
-/* Structure for holding extra info needed for pointers being read */
+/* Structure for holding extra info needed for pointers being read. */
typedef struct pointer_info
{
pointer_t type;
/* The first component of each member of the union is the pointer
- being stored */
+ being stored. */
fixup_t *fixup;
union
{
- void *pointer; /* Member for doing pointer searches */
+ void *pointer; /* Member for doing pointer searches. */
struct
{
#define gfc_get_pointer_info() gfc_getmem(sizeof(pointer_info))
-/* Lists of rename info for the USE statement */
+/* Lists of rename info for the USE statement. */
typedef struct gfc_use_rename
{
static void
free_pi_tree (pointer_info * p)
{
-
if (p == NULL)
return;