- removed 'if assigned(code)' before calling code.free in tcgprocinfo.destroy,

  since .free already checks for <>nil

git-svn-id: trunk@39312 -

compiler/psub.pas

@@ -677,8 +677,7 @@ implementation
 
      destructor tcgprocinfo.destroy;
        begin
-         if assigned(code) then
-           code.free;
+         code.free;
          if not final_used then
            final_asmnode.free;
          inherited destroy;