[nem-bug] [Nemerle 0000774]: Internal compiler error

[feedback at nemerle.org]

The following issue has been RESOLVED.
======================================================================
<http://nemerle.org/bugs/view.php?id=774> 
======================================================================
Reported By:                IT
Assigned To:                malekith
======================================================================
Project:                    Nemerle
Issue ID:                   774
Category:                   Compiler
Reproducibility:            always
Severity:                   minor
Priority:                   normal
Status:                     resolved
Resolution:                 fixed
Fixed in Version:           
======================================================================
Date Submitted:             10-02-2006 05:05 CEST
Last Modified:              11-08-2006 22:08 CET
======================================================================
Summary:                    Internal compiler error
Description: 
Command line:

ncc test.n /ref:Nemerle.Compiler.dll

Source code:

using System;

using Nemerle.Compiler;
using Nemerle.Compiler.Parsetree;

namespace Nemerle.Completion2
{
  delegate AddHiddenRegion(location : Location, isExpanded : bool) :
void;

  class Project
  {
    public Check(addHiddenRegion : AddHiddenRegion) : void
    {
      def processBuilder(builder)
      {
        foreach (member in builder.GetDirectMembers())
        {
        | method is MethodBuilder =>

          ExprWalker().Walk(null, fun(expr : PExpr)
          {
          | DefFunctions(funs) =>

            funs.Iter(fun(decl)
            {
              addHiddenRegion(decl.body.Location, true);
            });

          });
        }
      }

      def decls : list[Decl] = [];

      foreach (decl in decls)
      {
      | Decl.Type(builder) => processBuilder(builder)
      }
    }
  }
}

variant Decl
{
  | Type { Builder : TypeBuilder; }
}

delegate PExprWalkHandler(expression : PExpr) : void;

class ExprWalker
{
  public Walk(expression : PExpr, walkHandler : PExprWalkHandler) : void
  {
  }
}
======================================================================

----------------------------------------------------------------------
 malekith - 11-08-06 22:08 
----------------------------------------------------------------------
Resolved on trunk, r6854.

Issue History
Date Modified  Username       Field                    Change              
======================================================================
10-02-06 05:05 IT             New Issue                                    
11-08-06 22:08 malekith       Status                   new => resolved     
11-08-06 22:08 malekith       Resolution               open => fixed       
11-08-06 22:08 malekith       Assigned To               => malekith        
11-08-06 22:08 malekith       Note Added: 0001493                          
======================================================================