# HG changeset patch # User sr # Date 1507639504 -7200 # Node ID d9b3eb6618eb2316f5a47ec54585902d2650d0c6 # Parent 11c81b32968aa9618c9a133aa139f1c001d17c93 initial checkin diff -r 11c81b32968a -r d9b3eb6618eb quickSelfTest/stx_goodies_builder_quickSelfTest.st --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/quickSelfTest/stx_goodies_builder_quickSelfTest.st Tue Oct 10 14:45:04 2017 +0200 @@ -0,0 +1,165 @@ +"{ Package: 'stx:goodies/builder/quickSelfTest' }" + +"{ NameSpace: Smalltalk }" + +ApplicationDefinition subclass:#stx_goodies_builder_quickSelfTest + instanceVariableNames:'' + classVariableNames:'' + poolDictionaries:'' + category:'* Projects & Packages *' +! + + +!stx_goodies_builder_quickSelfTest class methodsFor:'description'! + +applicationIconFileName + ^ nil +! + +excludedFromPreRequisites + "obsolete; temporarily, this is still called for, but will eventually vanish. + + List packages which are to be explicitely excluded from the automatic constructed + prerequisites lists (both). + If empty, everything that is found along the inheritance of any of + my classes is considered to be a prerequisite package." + + ^ #( + ) +! + +isGUIApplication + "return true, if this is a GUI application. + (these need more libraries and use a different startup procedure)" + + ^ false +! + +mandatoryPreRequisites + "list packages which are mandatory as a prerequisite. + This are packages containing superclasses of my classes and classes which + are extended by myself. + They are mandatory, because we need these packages as a prerequisite for loading and compiling. + This method is generated automatically, + by searching along the inheritance chain of all of my classes. + Please take a look at the #referencedPreRequisites method as well." + + ^ #( + #'stx:libbasic' "ApplicationDefinition - superclass of stx_goodies_builder_quickSelfTest" + ) +! + +referencedPreRequisites + "list packages which are a prerequisite, because they contain + classes which are referenced by my classes. + These packages are NOT needed as a prerequisite for compiling or loading, + however, a class from it may be referenced during execution and having it + unloaded then may lead to a runtime doesNotUnderstand error, unless the caller + includes explicit checks for the package being present. + This method is generated automatically, + by searching all classes (and their packages) which are referenced by my classes. + Please also take a look at the #mandatoryPreRequisites method" + + ^ #( + #'stx:goodies/sunit' "TestResultReporter - referenced by RunUnitTests class>>run" + #'stx:libcomp' "ParserFlags - referenced by RunUnitTests class>>run" + ) +! + +subProjects + "list packages which are known as subprojects. + This method is generated automatically; however, when generating automatically, + packages are only added - never removed, unless listed in #excludedFromSubProjects." + + ^ #( +) +! ! + +!stx_goodies_builder_quickSelfTest class methodsFor:'description - contents'! + +classNamesAndAttributes + "lists the classes which are to be included in the project. + Each entry in the list may be: a single class-name (symbol), + or an array-literal consisting of class name and attributes. + Attributes are: #autoload or # where os is one of win32, unix,..." + + ^ #( + " or ( attributes...) in load order" + RunUnitTests + RunUnitTestsStart + #'stx_goodies_builder_quickSelfTest' + ) +! + +extensionMethodNames + "lists the extension methods which are to be included in the project. + Entries are 2-element array literals, consisting of class-name and selector. + A correponding method with real names must be present in my concrete subclasses + if it has extensions." + + ^ #( + ) +! ! + +!stx_goodies_builder_quickSelfTest class methodsFor:'description - project information'! + +companyName + "Returns a company string which will appear in .rc. + Under win32, this is placed into the dll's file-info. + Other systems may put it elsewhere, or ignore it." + + ^ 'Claus Gittinger & eXept Software AG' +! + +description + "Returns a description string which will appear in nt.def / bc.def" + + ^ 'Smalltalk/X Application' +! + +legalCopyright + "Returns a copyright string which will appear in .rc. + Under win32, this is placed into the dll's file-info. + Other systems may put it elsewhere, or ignore it." + + ^ 'Copyright Claus Gittinger 2017\nCopyright eXept Software AG 2017' +! + +productInstallDirBaseName + "Returns a default installDir which will appear in .nsi. + This is usually not the one you want to keep" + + ^ (self package asCollectionOfSubstringsSeparatedByAny:':/') last +! + +productName + " we get this error, if the concrete class has not yet redefined" + + ^ 'Smalltalk/X' +! ! + +!stx_goodies_builder_quickSelfTest class methodsFor:'description - startup'! + +startupClassName + "the name of the class which starts the show in its method. + Usually, the name of a subclass of StandAloneStartup." + + ^ 'RunUnitTestsStart' +! + +startupSelector + "the message that is sent to the startupClass to start the show" + + ^ #'start' +! ! + +!stx_goodies_builder_quickSelfTest class methodsFor:'documentation'! + +version + ^ '$Header$' +! + +version_CVS + ^ '$Header$' +! ! +