From 4bb82b0a3f25c0abd0262778774e194e32319f81 Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Sat, 12 Sep 2015 23:32:09 +0000
Subject: [PATCH]   - removed unused OnlyAsm procedure

git-svn-id: trunk@31627 -
---
 compiler/assemble.pas | 11 -----------
 1 file changed, 11 deletions(-)

diff --git a/compiler/assemble.pas b/compiler/assemble.pas
index f0f4715f94..1b949b1a6f 100644
--- a/compiler/assemble.pas
+++ b/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
 *****************************************************************************}