Quanto é ativado o "Emit Runtime Type Information" ocorre erro de "[d…

…cc32 Error] Delphi.Mocks.pas(253): E2134 Type '<void>' has no type info", com isso coloquei a diretiva "{$M-}", nas units que tem alguma declaração do tipo "out", e a váriavel não tiver tipo, para evitar esse erro.
VSoftTechnologies · Nov 13, 2015 · 44daacf · 44daacf
1 parent 4b52b69
commit 44daacf
Show file tree

Hide file tree

Showing 4 changed files with 8 additions and 0 deletions.
diff --git a/Delphi.Mocks.Proxy.TypeInfo.pas b/Delphi.Mocks.Proxy.TypeInfo.pas
@@ -39,6 +39,8 @@ interface
   Delphi.Mocks.Behavior;
 
 type
+  {$M-}
+
   TProxy = class(TWeakReferencedObject, IWeakReferenceableObject, IInterface, IProxy, IVerify)
   private
     FTypeInfo               : PTypeInfo;

diff --git a/Delphi.Mocks.Proxy.pas b/Delphi.Mocks.Proxy.pas
@@ -38,6 +38,8 @@ interface
   Delphi.Mocks.Behavior;
 
 type
+  {$M-}
+
   TProxyBaseInvokeEvent = procedure (Method: TRttiMethod; const Args: TArray<TValue>; out Result: TValue) of object;
 
   TSetupMode = (None, Behavior, Expectation);

diff --git a/Delphi.Mocks.WeakReference.pas b/Delphi.Mocks.WeakReference.pas
@@ -46,6 +46,8 @@
 interface
 
 type
+  {$M-}
+
   /// Implemented by our weak referenced object base class
   IWeakReferenceableObject = interface
     ['{3D7F9CB5-27F2-41BF-8C5F-F6195C578755}']

diff --git a/Delphi.Mocks.pas b/Delphi.Mocks.pas
@@ -39,6 +39,8 @@ interface
   Delphi.Mocks.WeakReference;
 
 type
+  {$M-}
+
   IWhen<T> = interface;
 
   //Records the expectations we have when our Mock is used. We can then verify