--- a/ConfigurableFeatures.st Sun Apr 15 18:58:21 2012 +0200
+++ b/ConfigurableFeatures.st Mon Apr 16 20:03:49 2012 +0200
@@ -109,6 +109,23 @@
"Created: / 03-01-2012 / 15:36:12 / cg"
!
+hasExternalLookupSupport
+ "Return true, if the VM is compiled with external lookup MOP"
+%{
+#ifdef SUPPORT_EXTERNAL_LOOKUP
+ RETURN ( true );
+#endif
+%}.
+ ^false
+
+ "
+ ConfigurableFeatures hasExternalLookupSupport
+ ConfigurableFeatures includesFeature:#ExternalLookupSupport
+ "
+
+ "Created: / 16-04-2012 / 20:00:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
hasFileBasedSourceCodeManagerSupport
"/ use Smalltalk-at to trick the dependency/prerequisite generator
^ (Smalltalk at: #'FileBasedSourceCodeManager' ifAbsent:nil) notNil
@@ -215,9 +232,9 @@
!ConfigurableFeatures class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ConfigurableFeatures.st,v 1.7 2012-03-13 17:24:12 vrany Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ConfigurableFeatures.st,v 1.8 2012-04-16 18:03:49 vrany Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/ConfigurableFeatures.st,v 1.7 2012-03-13 17:24:12 vrany Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ConfigurableFeatures.st,v 1.8 2012-04-16 18:03:49 vrany Exp $'
! !