2 // Copyright (c) 2004, Rodrigo B. de Oliveira (rbo@acm.org)
3 // All rights reserved.
5 // Redistribution and use in source and binary forms, with or without modification,
6 // are permitted provided that the following conditions are met:
8 // * Redistributions of source code must retain the above copyright notice,
9 // this list of conditions and the following disclaimer.
10 // * Redistributions in binary form must reproduce the above copyright notice,
11 // this list of conditions and the following disclaimer in the documentation
12 // and/or other materials provided with the distribution.
13 // * Neither the name of Rodrigo B. de Oliveira nor the names of its
14 // contributors may be used to endorse or promote products derived from this
15 // software without specific prior written permission.
17 // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
18 // ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
19 // WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
20 // DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE
21 // FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 // DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
23 // SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
24 // CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
25 // OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26 // THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29 namespace Boo
.Lang
.Compiler
.TypeSystem
32 using System
.Collections
;
33 using System
.Collections
.Generic
;
35 public delegate bool EntityPredicate(IEntity entity
);
37 public class Ambiguous
: IEntity
39 public static readonly IEntity
[] NoEntities
= new IEntity
[0];
41 private IEntity
[] _entities
;
43 public Ambiguous(IList entities
) : this(ToArray(entities
))
47 public Ambiguous(IEntity
[] entities
)
49 if (null == entities
) throw new ArgumentNullException("entities");
50 if (0 == entities
.Length
) throw new ArgumentException("entities");
56 get { return _entities[0].Name; }
59 public string FullName
61 get { return _entities[0].FullName; }
64 public EntityType EntityType
66 get { return EntityType.Ambiguous; }
69 public IEntity
[] Entities
71 get { return _entities; }
74 public List
<IEntity
> Select(EntityPredicate predicate
)
76 List
<IEntity
> found
= new List
<IEntity
>();
77 foreach (IEntity entity
in _entities
)
79 if (predicate(entity
)) found
.Add(entity
);
84 override public string ToString()
86 return string.Format("Ambiguous({0})", Builtins
.join(_entities
, ", "));
89 private static IEntity
[] ToArray(IList entities
)
91 if (entities
.Count
== 0) return NoEntities
;
92 IEntity
[] array
= new IEntity
[entities
.Count
];
93 entities
.CopyTo(array
, 0);
97 public bool AllEntitiesAre(EntityType entityType
)
99 foreach (IEntity entity
in _entities
)
101 if (entityType
!= entity
.EntityType
) return false;
106 public bool Any(EntityPredicate predicate
)
108 foreach (IEntity entity
in _entities
)
110 if (predicate(entity
)) return true;