Changeset ac3410d in tol

Timestamp:

Jul 2, 2010, 10:25:55 AM (16 years ago)

Author:

Víctor de Buen <vdebuen@…>

Branches:

1941-docker-image-to-test, devel, master

Children:

200f9d7

Parents:

88f88fc

Message:

Refs #931
BPackage::Required() returns the list BPackage::required_ of all packages loaded with macro #Required

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@2368 be4846ae-f051-483a-831f-b64e7d08527f

Location:

tol/lang

Files:

• language.cpp (modified) (2 diffs)
• tol_blanguag.h (modified) (2 diffs)

tol/lang/language.cpp

@@ -81 +81 @@
 //--------------------------------------------------------------------
 BTraceInit("language.cpp");
+
+BList* BPackage::required_;
 
 //--------------------------------------------------------------------
@@ -1383 +1385 @@
           pkg->IncNRefs();
           pkg->IncNRefs();
+          required_ = Cons(pkg, required_);
           BNameBlock::AddGlobalRequiredPackage(package);
           BText startActionsExpr = package+"::StartActions(0)";

tol/lang/tol_blanguag.h

@@ -24 +24 @@
 
 #include <tol/tol_bcommon.h>
+#include <tol/tol_blist.h>
 
 class BText;
@@ -78 +79 @@
   static BText help_;
   static BText localRoot_;
+  static BList* required_;
 public:
   static BText LocalPath(const BText& package);
   static bool Install(const BText& package);
   static BSyntaxObject* Load(const BText& package, bool retry=false);
+  static BList* Required() { return(required_); }
 };