diff --git a/src/CommandLine/ParserResult.cs b/src/CommandLine/ParserResult.cs
index 5ec4c073..20761ada 100644
--- a/src/CommandLine/ParserResult.cs
+++ b/src/CommandLine/ParserResult.cs
@@ -6,7 +6,7 @@
 
 namespace CommandLine
 {
-    sealed class TypeInfo
+    public sealed class TypeInfo
     {
         private readonly Type current;
         private readonly IEnumerable<Type> choices; 
@@ -27,12 +27,12 @@ public IEnumerable<Type> Choices
             get { return this.choices; }
         }
 
-        public static TypeInfo Create(Type current)
+        internal static TypeInfo Create(Type current)
         {
             return new TypeInfo(current, Enumerable.Empty<Type>());
         }
 
-        public static TypeInfo Create(Type current, IEnumerable<Type> choices)
+        internal static TypeInfo Create(Type current, IEnumerable<Type> choices)
         {
             return new TypeInfo(current, choices);
         }
@@ -78,7 +78,7 @@ public ParserResultType Tag
             get { return this.tag; }
         }
 
-        internal TypeInfo TypeInfo
+        public TypeInfo TypeInfo
         {
             get { return typeInfo; }
         }
@@ -216,4 +216,4 @@ public bool Equals(NotParsed<T> other)
                 && Errors.SequenceEqual(other.Errors);
         }
     }
-}
\ No newline at end of file
+}