home *** CD-ROM | disk | FTP | other *** search
- 7-Apr-87 06:15:13-MDT,2598;000000000001
- Return-Path: <ADA-SW-REQUEST@SIMTEL20.ARPA>
- Return-Path: <rutgers!petsd!joe@beaver.cs.washington.edu>
- Received: from beaver.cs.washington.edu by SIMTEL20.ARPA with TCP; Mon, 6 Apr 87 19:36:01 MDT
- Received: by beaver.cs.washington.edu (5.52.1/6.3)
- id AA17687; Mon, 6 Apr 87 16:59:16 PST
- Return-Path: <rutgers!petsd!joe>
- Received: by rutgers.edu; Mon, 6 Apr 87 20:46:25 EDT
- Date: 6 Apr 1987 2034-EST (Monday)
- From: rutgers!petsd!joe@beaver.cs.washington.edu (Joe Orost)
- Message-Id: <26979.85.544757678@petsd.UUCP>
- To: rutgers!uw-beaver!simtel20.arpa!ada-sw-request@beaver.cs.washington.edu
- Cc: joe@beaver.cs.washington.edu, BING!bob@beaver.cs.washington.edu
- Subject: Limitation/Bug in tools that Parse Ada code (like COMPORD)
- ReSent-Date: Tue, 7 Apr 87 05:28:48 MDT
- ReSent-From: Rick Conn <RCONN@SIMTEL20.ARPA>
- ReSent-To: ada-sw@SIMTEL20.ARPA
- ReSent-Message-ID: <12292581839.20.RCONN@SIMTEL20.ARPA>
-
- I found/fixed a problem I had with COMPORD. The problem is that a message:
- Compile_Order internal error
- is generated when I try to run compord on its own source (including the
- abstractions). The bug is with STATESTK.BDY, in procedure InitCopy there is
- no check for stack overflow, and if so, a CONSTRAINT_ERROR is raised. So,
- insert the following code as the first lines of procedure InitCopy:
-
- if Index = StateParseStacksIndex'last then
- raise OverFlow;
- end if;
-
- Now for the real bug. The parse stack is too small! In file PDECLS.SPC,
- change:
-
- subtype StateParseStacksIndex is
- GC.ParserInteger range 0..200;
-
- to
- subtype StateParseStacksIndex is
- GC.ParserInteger range 0..2_000;
-
- With this fix, COMPORD will now properly process its own source!
- (BTW, PTBLS.BDY is the parser-killer.)
-
- STATESTK.BDY and PDECLS.SPC can both be found in ABSTRACT.SRC.
- Remember, this bug affects all repository software that uses the parser
- included in ABSTRACT.SRC.
-
-
- --
-
- Full-Name: Joseph M. Orost
- UUCP: ihnp4!vax135!petsd!joe
- ARPA: vax135!petsd!joe@BERKELEY
- Phone: (201) 758-7284
- US Mail: MS 313; Concurrent Computer Corporation; 106 Apple St
- Tinton Falls, NJ 07724
-
-