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.