- removed unused OnlyAsm procedure

git-svn-id: trunk@31627 -

compiler/assemble.pas

@@ -226,7 +226,6 @@ interface
     TAssemblerClass = class of TAssembler;
 
     Procedure GenerateAsm(smart:boolean);
-    Procedure OnlyAsm;
 
     procedure RegisterAssembler(const r:tasminfo;c:TAssemblerClass);
 
@@ -2158,16 +2157,6 @@ Implementation
       end;
 
 
-    Procedure OnlyAsm;
-      var
-        a : TExternalAssembler;
-      begin
-        a:=TExternalAssembler.Create(false);
-        a.DoAssemble;
-        a.Free;
-      end;
-
-
 {*****************************************************************************
                                  Init/Done
 *****************************************************************************}