Subject: Re: definition in test90 discover+.f90

From: Zheng Gengbing <[email-masked]>
Date: Fri, 10 May 1996 14:32:54 +0800 (EAT)

On Thu, 9 May 1996, Guansong Zhang wrote:

> unparse need to know the following difinition in test90
> 
> 1. look at the following example:
> 
> 
>       program discover
>       interface assignment ( = )
>       end interface
>       end
> 
> And its dumpdep results:
> 
> 
> ***SYMBOL NODES***
> 
>    id   var   type  attr  next   scope  variable-name
>    1-S  550   ----    0    2-S    1-B              *
>                                               DEFAULT
>    2-S  505   ----    0    3-S    1-B      PROG_NAME symb_lst=         ----
> prog_hedr=    2-B      PROGRAM_NAME
>    3-S  505   ----    0   ----    1-B       discover symb_lst=         ----
> prog_hedr=    2-B      PROGRAM_NAME
>    4-S  518   ---- 268435456   ----    2-B              =
>                                          INTERFACE_NA
> 
> Are we going to use "=" stand for "assignment ( = )" ?
>

	Yes .Also , the attr of  INTERFACE_NAME have DEFINED_ASSIGNMENT_BIT
(=) or DEFINED_OPERATOR_BIT ( other intrinsic operator)

> 2. The definition of STRUCTURE_CONSTRUCTOR
> 
>    82-E   451    18-T    13-S   342-E    75-E         STRUCTURE_CONSTRUCTOR
> 
>   342-E   479    18-T    13-S    ----    ----                       TYPE_OP
> 
> 13-S is repeated in both 82-E and 342-E, this is a bug.
> 

	Have two repeated symbols do  mattered your unparse ?
Any way , I delete the symbol of 82-E .

***************************************************************************
*     Zheng Gengbin                 *                                     *
*                                   *                                     *
*  Dept. of Computer Science        *  Phone:  86-10-2585088              *
*         & Technology              *  Email:                             *
*                                   *      [email-masked]   *
*  Peking University P.R.China      *  Mail:                              *
*                                   *      Room 1077 ,Building 47,        *
*                                   *      Peking University, P.R.China   *
***************************************************************************