* fixed wasm warnings, due to level 2 comments

git-svn-id: branches/wasm@46206 -

compiler/wasm/hlcgcpu.pas

@@ -2512,27 +2512,26 @@ implementation
             Internalerror(2019083004); // no support for symbol table calls
             opc:=a_call_indirect; // todo: need a reference to a (funccall) table
 
-            {case tobjectdef(pd.owner.defowner).objecttype of
-
-              odt_javaclass:
-                begin
-                  if (po_classmethod in pd.procoptions) or
-                     (pd.proctypeoption=potype_operator) then
-                    opc:=a_invokestatic
-                  else if (pd.visibility=vis_strictprivate) or
-                     (pd.proctypeoption=potype_constructor) or
-                     inheritedcall then
-                    opc:=a_invokespecial
-                  else
-                    opc:=a_invokevirtual;
-                end;
-              odt_interfacejava:
-                { static interface methods are not allowed }
-                opc:=a_invokeinterface;
-              else
-                internalerror(2010122601);
-            end;
-            }
+            //case tobjectdef(pd.owner.defowner).objecttype of
+            //
+            //  odt_javaclass:
+            //    begin
+            //      if (po_classmethod in pd.procoptions) or
+            //         (pd.proctypeoption=potype_operator) then
+            //        opc:=a_invokestatic
+            //      else if (pd.visibility=vis_strictprivate) or
+            //         (pd.proctypeoption=potype_constructor) or
+            //         inheritedcall then
+            //        opc:=a_invokespecial
+            //      else
+            //        opc:=a_invokevirtual;
+            //    end;
+            //  odt_interfacejava:
+            //    { static interface methods are not allowed }
+            //    opc:=a_invokeinterface;
+            //  else
+            //    internalerror(2010122601);
+            //end;
           end;
         recordsymtable:
           begin

compiler/wasm/nwasmcon.pas

@@ -365,19 +365,17 @@ implementation
           setconsttype:=sct_construct;
         result:=nil;
         case setconsttype of
-(*
-          sct_constsymbol:
-            begin
-              { normally a codegen pass routine, but we have to insert a typed
-                const in case the set constant does not exist yet, and that
-                should happen in pass_1 (especially since it involves creating
-                new nodes, which may even have to be tacked on to this code in
-                case it's the unit initialization code) }
-              handlevarsetconst;
-              { no smallsets }
-              expectloc:=LOC_CREFERENCE;
-            end;
-*)
+          //sct_constsymbol:
+          //  begin
+          //    { normally a codegen pass routine, but we have to insert a typed
+          //      const in case the set constant does not exist yet, and that
+          //      should happen in pass_1 (especially since it involves creating
+          //      new nodes, which may even have to be tacked on to this code in
+          //      case it's the unit initialization code) }
+          //    handlevarsetconst;
+          //    { no smallsets }
+          //    expectloc:=LOC_CREFERENCE;
+          //  end;
           sct_notransform:
             begin
               result:=inherited pass_1;