Permalink
Switch branches/tags
Nothing to show
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
62 lines (49 sloc) 2.28 KB
{***************************************************************************}
{ }
{ Delphi.Mocks }
{ }
{ Copyright (C) 2011 Vincent Parrett }
{ }
{ http://www.finalbuilder.com }
{ }
{ }
{***************************************************************************}
{ }
{ Licensed under the Apache License, Version 2.0 (the "License"); }
{ you may not use this file except in compliance with the License. }
{ You may obtain a copy of the License at }
{ }
{ http://www.apache.org/licenses/LICENSE-2.0 }
{ }
{ Unless required by applicable law or agreed to in writing, software }
{ distributed under the License is distributed on an "AS IS" BASIS, }
{ WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. }
{ See the License for the specific language governing permissions and }
{ limitations under the License. }
{ }
{***************************************************************************}
unit Delphi.Mocks.VirtualInterface;
interface
{$I 'Delphi.Mocks.inc'}
uses
TypInfo,
Rtti,
Generics.Collections;
type
{$IFDEF DELPHI_XE2_UP}
TVirtualInterface = System.Rtti.TVirtualInterface;
{$ELSE}
//Attempt to create a cleanish room implementation of this class for D2010??
{$ENDIF}
implementation
uses
RTLConsts,
SysUtils
{$IFDEF DELPHI_XE2_UP}
;
{$ELSE}
,PrivateHeap;
{$ENDIF}
{$IFNDEF DELPHI_XE2_UP}
{$ENDIF}
end.