A few random comment cleanups.

Author: dmiller

Clojure/Clojure/CljCompiler/Ast/HostExpr.cs

@@ -129,8 +129,6 @@ public Expr Parse(ParserContext pcon, object form)
                     PropertyInfo pinfo;
                     FieldInfo finfo;
 
-                    // TODO: Figure out if we want to handle the -propname otherwise.
-
                     bool isPropName = false;
                     Symbol memberSym = methodSym;
 

Clojure/Clojure/CljCompiler/Ast/InstanceFieldExpr.cs

@@ -104,7 +104,7 @@ public override void Emit(RHC rhc, ObjExpr objx, CljILGen ilg)
             }
             else
             {
-                // We could convert this to a dynamic call-site
+                // TODO: We could convert this to a dynamic call-site
                 _target.Emit(RHC.Expression, objx, ilg);
                 ilg.Emit(OpCodes.Ldstr, _memberName);
                 ilg.Emit(OpCodes.Call, Compiler.Method_Reflector_GetInstanceFieldOrProperty);

Clojure/Clojure/CljCompiler/Compiler.cs

@@ -1419,7 +1419,7 @@ private static object MacroexpandSeq1(ISeq form)
                 if (sym != null)
                 {
                     string sname = sym.Name;
-                    // (.substring s 2 5) => (. x substring 2 5)
+                    // (.substring s 2 5) => (. s substring 2 5)
                     // ns == null ensures that Class/.instanceMethod isn't expanded to . form
                     if (sname[0] == '.' && sym.Namespace == null)
                     {
@@ -1432,22 +1432,23 @@ private static object MacroexpandSeq1(ISeq form)
                         // We need to make sure source information gets transferred
                         return MaybeTransferSourceInfo(PreserveTag(form, RT.listStar(DotSym, target, method, form.next().next())), form);
                     }
-                    //else if (NamesStaticMember(sym))
-                    //{
-                    //    Symbol target = Symbol.intern(sym.Namespace);
-                    //    Type t = HostExpr.MaybeType(target, false);
-                    //    if (t != null)
-                    //    {
-                    //        Symbol method = Symbol.intern(sym.Name);
-                    //        // We need to make sure source information gets transferred
-                    //        return MaybeTransferSourceInfo(PreserveTag(form, RT.listStar(Compiler.DotSym, target, method, form.next())), form);
-                    //    }
-                    //}
                     else
                     {
-                        // (x.substring 2 5) =>  (. x substring 2 5)
+                        // (s.substring 2 5) =>  (. s substring 2 5)
                         // also (package.class.name ... ) (. package.class name ... )
+
+                        // The comment above is in the JVM code.  It appears to no longer be valid.
+                        // Because the code following the next line is also commented out in the JVM code.
                         int index = sname.LastIndexOf('.');
+                        //if (idx > 0 && idx < sname.length() - 1)
+                        //{
+                        //    symbol target = symbol.intern(sname.substring(0, idx));
+                        //    symbol meth = symbol.intern(sname.substring(idx + 1));
+                        //    return rt.liststar(dot, target, meth, form.rest());
+                        //}
+                        //(stringbuilder. "foo") => (new stringbuilder "foo")	
+                        //else
+
                         if (index == sname.Length - 1)
                             // We need to make sure source information gets transferred
                             return MaybeTransferSourceInfo(RT.listStar(Compiler.NewSym, Symbol.intern(sname.Substring(0, index)), form.next()), form);

Clojure/Clojure/Runtime/Binding/MetaAFn.cs

@@ -1,11 +1,14 @@
-using System;
-using System.Linq.Expressions;
+using Microsoft.Scripting.Actions.Calls;
+using System;
 using System.Dynamic;
-using Microsoft.Scripting.Actions.Calls;
+using System.Linq.Expressions;
 using System.Reflection;
 
 namespace clojure.lang.Runtime.Binding
 {
+
+    // TODO: Is this actually being used anywhere?  (Other than the IDynamicMetaObjectProvider implementaion in AFn?
+    // If not, get rid of it and the IDynamicMetaObjectProvider implementation in AFn.
     class MetaAFn : DynamicMetaObject, IInferableInvokable
     {