From 6aacaf3982aacaca9cce63d629d51bf5ec0d423f Mon Sep 17 00:00:00 2001
From: artem3213212 <cx-1212@yandex.ru>
Date: Wed, 21 Mar 2018 13:22:47 +0300
Subject: [PATCH] =?UTF-8?q?=D0=94=D0=BE=D0=B1=D0=B0=D0=B2=D0=B8=D1=82?=
 =?UTF-8?q?=D1=8C=20'Source/RuntimeBuilder.Fasm.pas'?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Source/RuntimeBuilder.Fasm.pas | 59 ++++++++++++++++++++++++++++++++++
 1 file changed, 59 insertions(+)
 create mode 100644 Source/RuntimeBuilder.Fasm.pas

diff --git a/Source/RuntimeBuilder.Fasm.pas b/Source/RuntimeBuilder.Fasm.pas
new file mode 100644
index 0000000..a9a1499
--- /dev/null
+++ b/Source/RuntimeBuilder.Fasm.pas
@@ -0,0 +1,59 @@
+unit RuntimeBuilder.Fasm;
+
+interface
+
+uses RuntimeBuilder.Types;
+
+
+type
+  {TRTBFasmFunc=class(TRTBFunc)
+    public
+      function Call(args:array of const;CallType:TRTBCallType=CRTBCallTypeDefault):Variant;override;
+  end;}
+
+  {TRTBLib=class abstract
+    private
+      function GetFuntion(Name:string):TRTBFunc;virtual;abstract;
+    public
+      property Funtion[Name:string]:TRTBFunc read GetFuntion;
+  end;}
+
+  TRTBFasmCompliter=class(TRTBCompliter)
+    private type
+      TRTBSource=class abstract
+    	private
+          FText:string;;
+      	  function GetText:string;
+          procedure SetText(S:string);
+        public
+          constructor Create();
+          //procedure CompleteAsLib:TRTBLib;virtual;abstract;
+          //procedure CompleteAsFunc:TRTBLib;virtual;abstract;
+  		end;
+    public
+      //function LoadLib(Name:string):TRTBLib;
+      function GenNewSrc():TRTBFasmSource;override;
+      //function CompleteFunc(Source:TRTBSource;args:array of const):TRTBFunc;virtual;abstract;
+      //function CompleteLib(Source:TRTBSource;args:array of const):TRTBLib;virtual;abstract;
+  end;
+
+implementation
+
+constructor TRTBFasmCompliter.TRTBSource.Create();
+begin
+FText:='';
+end;
+
+function GTRTBFasmCompliter.TRTBSource.etText:string;
+begin
+
+end;
+
+procedure TRTBFasmCompliter.TRTBSource.SetText(S:string);
+          
+function TRTBFasmCompliter.GenNewSrc():TRTBSource;
+begin
+Result:=;
+end;
+
+end.