Test :: Mockclass Test :: Mockclass is een Perl-module om mockklassen te bieden en voorwerpen te testen voor testen.
Download nu

Test :: Mockclass Rangschikking & Samenvatting

Test :: Mockclass Tags

Perl-module klassen bespotten Mock Objects Mock-klassen

Test :: Mockclass Beschrijving

Test: Mockclass is een Perl-module om spotklassen te bieden en voorwerpen te testen voor testen. Test: Mockclass is een Perl-module om spotklassen te bieden en voorwerpen te testen voor testen.synopsis # Pass in de klasnaam en -versie die u wilt bespotten Gebruik Test :: Mockclass QW {CLASSTOMOCK 1.1}; # Maak een MockClass-object om een specifieke klasse te behandelen Mijn $ MockClass = Test :: Mockclass-> Nieuw ('Classtomock'); # Geef aan om te beperken van een echte klasse, of een bespotte klasse: $ MockClass-> InheritFrom ('io :: socket'); # Maak een constructeur voor de klas, kan ook 'AddMethod' gebruiken voor meer controle $ mockclass-> standaardconstructeur (% classwankefaults); # Voeg een methode toe: $ MockClass-> AddMethod ('MethodName', $ CODEEREF); # Voeg een eenvoudigere methode toe en specificeer retourwaarden die het automatisch $ MOCCLASS-> SetReturnValues ('Methodname2', 'altijd', 3) retourneert; # Maak een exemplaar van de Mocked Class: My $ Mockobject = $ MockClass-> Creëer (% Instancedata); # Stel het gewenste gespreksvolgorde in voor de methoden: $ MockClass-> SetCallorder ('Methodname2', 'MethodName', 'MethodName'); # Run tests met behulp van de mockklasse elders: #: in de klasse om te testen: subobjectFactory {return classtomock-> nieuw; } #: in uw testcode: Assert ($ TREADOBJ-> ObjectFactory-> ISA ("Classtomock")); # Krijg het object-ID voor de rest van de methoden: mijn $ objectid = "$ mockobject"; #Or $ Objectid = $ MockClass-> GetNextObjectid (); # Controleer of de methoden in de juiste volgorde zijn opgeroepen: if ($ MockClass-> VerifieerCallorder ($ ObjectID)) {# Doe iets} # Krijg de bestelling die de methoden zijn genoemd: mijn @Calls = $ MockClass-> GetCallorder ($ objectid); # Verkrijg de lijst met argumenten doorgegeven per gesprek: mijn @Arglist = $ Mockclass-> GetargumentList ($ Objectid, 'MethodName', $ Callposition); # Krijg de lijst met toegangen op een bepaald kenmerk (Hashkey in $ MOCKOBJECT) My @Accesses = $ MockClass-> GetattributeAccess ($ Objectid, 'Attribuut'); Vereisten: · Perl

Test :: Mockclass Gerelateerde software