[BLACKBOX] More memory management problems

From: [at]} <shristov>
Date: Tue, 28 Jun 2011 15:54:12 +0200

----boundary-LibPST-iamunique-177169279_-_-
Content-type: text/plain

The first problem is that a module with large global variables

becomes impossible to run after recompiling it due to insufficient memory.



The module doesn't allocate memory dynamically, and the actual

global variable size is far less than the available computer memory.



1. Copy and paste the module PrivLarge listed below.

   Save it.



2. Exit BlackBox and restart Windows.



3. Start BlackBox, open PrivLarge.odc and compile it.



4. Run the exported procedure "Do" ten times.

   If works fine.



5. Compile it again and unload.



6. Try to run "Do" again.

   There is no enough memory.



7. Just exit BlackBox and renter it.

   Procedure will run again until recompilg.



The second problem is that the global variable size cannot be increased beyond ~250 MB.

If the constant "n" is increased to, say, 90000000 (meaning 360 MB), the procedure "Do"

cannot run at all (even before recompiling).



This is done in BlackBox 1.5 on a PC with 3 GB RAM and Windows XP SP2.

The problem may be Windows related, but I doubt it.



>From my unrelieble memory I think that early BlackBox versions

didn't suffer from this problem. I'm not sure, however.





Regards,



Sinisa





--------------------------------------------------------------------





The module:





MODULE PrivLarge;



IMPORT Out;





CONST



  n = 60000000;





VAR



  a : ARRAY n OF INTEGER;





  PROCEDURE Do *;



  VAR



    i, sum : INTEGER;



  BEGIN



    FOR i:=0 TO n-1 DO

      a[i] := i

    END;



    sum := 0;

    FOR i:=0 TO n-1 DO

      sum := sum + a[i]

    END;



    Out.Ln;

    Out.String ("sum = ");

    Out.Int (sum, 12);

    Out.Ln;

    Out.Ln



  END Run;





END PrivLarge.





--------------------------------------------------------------------





The Log output:



compiling "PrivLarge" 156 240000000

PrivLarge not found



sum = 651082880





sum = 651082880





sum = 651082880





sum = 651082880





sum = 651082880





sum = 651082880





sum = 651082880





sum = 651082880





sum = 651082880





sum = 651082880



compiling "PrivLarge" 156 240000000

PrivLarge unloaded

command error: not enough memory for PrivLarge





--------------------------------------------------------------------

----
To unsubscribe, send a message with body "SIGNOFF BLACKBOX" to LISTSERV{([at]})nowhere.xy----boundary-LibPST-iamunique-177169279_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"
e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwIFRoZSBmaXJzdCBwcm9ibGVtIGlzIHRoYXQgYSBt
b2R1bGUgd2l0aCBsYXJnZSBnbG9iYWwgdmFyaWFibGVzXHBhcg0KXHBhcg0KYmVjb21lcyBpbXBv
c3NpYmxlIHRvIHJ1biBhZnRlciByZWNvbXBpbGluZyBpdCBkdWUgdG8gaW5zdWZmaWNpZW50IG1l
bW9yeS5ccGFyDQpccGFyDQpccGFyDQpccGFyDQpUaGUgbW9kdWxlIGRvZXNuJ3QgYWxsb2NhdGUg
bWVtb3J5IGR5bmFtaWNhbGx5LCBhbmQgdGhlIGFjdHVhbFxwYXINClxwYXINCmdsb2JhbCB2YXJp
YWJsZSBzaXplIGlzIGZhciBsZXNzIHRoYW4gdGhlIGF2YWlsYWJsZSBjb21wdXRlciBtZW1vcnku
XHBhcg0KXHBhcg0KXHBhcg0KXHBhcg0KMS4gQ29weSBhbmQgcGFzdGUgdGhlIG1vZHVsZSBQcml2
TGFyZ2UgbGlzdGVkIGJlbG93LlxwYXINClxwYXINCiAgIFNhdmUgaXQuXHBhcg0KXHBhcg0KXHBh
cg0KXHBhcg0KMi4gRXhpdCBCbGFja0JveCBhbmQgcmVzdGFydCBXaW5kb3dzLlxwYXINClxwYXIN
ClxwYXINClxwYXINCjMuIFN0YXJ0IEJsYWNrQm94LCBvcGVuIFByaXZMYXJnZS5vZGMgYW5kIGNv
bXBpbGUgaXQuXHBhcg0KXHBhcg0KXHBhcg0KXHBhcg0KNC4gUnVuIHRoZSBleHBvcnRlZCBwcm9j
ZWR1cmUgIkRvIiB0ZW4gdGltZXMuXHBhcg0KXHBhcg0KICAgSWYgd29ya3MgZmluZS5ccGFyDQpc
cGFyDQpccGFyDQpccGFyDQo1LiBDb21waWxlIGl0IGFnYWluIGFuZCB1bmxvYWQuXHBhcg0KXHBh
cg0KXHBhcg0KXHBhcg0KNi4gVHJ5IHRvIHJ1biAiRG8iIGFnYWluLlxwYXINClxwYXINCiAgIFRo
ZXJlIGlzIG5vIGVub3VnaCBtZW1vcnkuXHBhcg0KXHBhcg0KXHBhcg0KXHBhcg0KNy4gSnVzdCBl
eGl0IEJsYWNrQm94IGFuZCByZW50ZXIgaXQuXHBhcg0KXHBhcg0KICAgUHJvY2VkdXJlIHdpbGwg
cnVuIGFnYWluIHVudGlsIHJlY29tcGlsZy5ccGFyDQpccGFyDQpccGFyDQpccGFyDQpUaGUgc2Vj
b25kIHByb2JsZW0gaXMgdGhhdCB0aGUgZ2xvYmFsIHZhcmlhYmxlIHNpemUgY2Fubm90IGJlIGlu
Y3JlYXNlZCBiZXlvbmQgfjI1MCBNQi5ccGFyDQpccGFyDQpJZiB0aGUgY29uc3RhbnQgIm4iIGlz
IGluY3JlYXNlZCB0bywgc2F5LCA5MDAwMDAwMCAobWVhbmluZyAzNjAgTUIpLCB0aGUgcHJvY2Vk
dXJlICJEbyJccGFyDQpccGFyDQpjYW5ub3QgcnVuIGF0IGFsbCAoZXZlbiBiZWZvcmUgcmVjb21w
aWxpbmcpLlxwYXINClxwYXINClxwYXINClxwYXINClRoaXMgaXMgZG9uZSBpbiBCbGFja0JveCAx
LjUgb24gYSBQQyB3aXRoIDMgR0IgUkFNIGFuZCBXaW5kb3dzIFhQIFNQMi5ccGFyDQpccGFyDQpU
aGUgcHJvYmxlbSBtYXkgYmUgV2luZG93cyByZWxhdGVkLCBidXQgSSBkb3VidCBpdC5ccGFyDQpc
cGFyDQpccGFyDQpccGFyDQpGcm9tIG15IHVucmVsaWVibGUgbWVtb3J5IEkgdGhpbmsgdGhhdCBl
YXJseSBCbGFja0JveCB2ZXJzaW9uc1xwYXINClxwYXINCmRpZG4ndCBzdWZmZXIgZnJvbSB0aGlz
IHByb2JsZW0uIEknbSBub3Qgc3VyZSwgaG93ZXZlci5ccGFyDQpccGFyDQpccGFyDQpccGFyDQpc
cGFyDQpccGFyDQpSZWdhcmRzLFxwYXINClxwYXINClxwYXINClxwYXINClNpbmlzYVxwYXINClxw
YXINClxwYXINClxwYXINClxwYXINClxwYXINCi0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t
LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tXHBhcg0KXHBhcg0KXHBhcg0K
XHBhcg0KXHBhcg0KXHBhcg0KVGhlIG1vZHVsZTpccGFyDQpccGFyDQpccGFyDQpccGFyDQpccGFy
DQpccGFyDQpNT0RVTEUgUHJpdkxhcmdlO1xwYXINClxwYXINClxwYXINClxwYXINCklNUE9SVCBP
dXQ7XHBhcg0KXHBhcg0KXHBhcg0KXHBhcg0KXHBhcg0KXHBhcg0KQ09OU1RccGFyDQpccGFyDQpc
cGFyDQpccGFyDQogIG4gPSA2MDAwMDAwMDtccGFyDQpccGFyDQpccGFyDQpccGFyDQpccGFyDQpc
cGFyDQpWQVJccGFyDQpccGFyDQpccGFyDQpccGFyDQogIGEgOiBBUlJBWSBuIE9GIElOVEVHRVI7
XHBhcg0KXHBhcg0KXHBhcg0KXHBhcg0KXHBhcg0KXHBhcg0KICBQUk9DRURVUkUgRG8gKjtccGFy
DQpccGFyDQpccGFyDQpccGFyDQogIFZBUlxwYXINClxwYXINClxwYXINClxwYXINCiAgICBpLCBz
dW0gOiBJTlRFR0VSO1xwYXINClxwYXINClxwYXINClxwYXINCiAgQkVHSU5ccGFyDQpccGFyDQpc
cGFyDQpccGFyDQogICAgRk9SIGk6PTAgVE8gbi0xIERPXHBhcg0KXHBhcg0KICAgICAgYVtpXSA6
PSBpXHBhcg0KXHBhcg0KICAgIEVORDtccGFyDQpccGFyDQpccGFyDQpccGFyDQogICAgc3VtIDo9
IDA7XHBhcg0KXHBhcg0KICAgIEZPUiBpOj0wIFRPIG4tMSBET1xwYXINClxwYXINCiAgICAgIHN1
bSA6PSBzdW0gKyBhW2ldXHBhcg0KXHBhcg0KICAgIEVORDtccGFyDQpccGFyDQpccGFyDQpccGFy
DQogICAgT3V0LkxuO1xwYXINClxwYXINCiAgICBPdXQuU3RyaW5nICgic3VtID0gIik7XHBhcg0K
XHBhcg0KICAgIE91dC5JbnQgKHN1bSwgMTIpO1xwYXINClxwYXINCiAgICBPdXQuTG47XHBhcg0K
XHBhcg0KICAgIE91dC5MbiAgICBccGFyDQpccGFyDQpccGFyDQpccGFyDQogIEVORCBSdW47XHBh
cg0KXHBhcg0KXHBhcg0KXHBhcg0KXHBhcg0KXHBhcg0KRU5EIFByaXZMYXJnZS5ccGFyDQpccGFy
DQpccGFyDQpccGFyDQpccGFyDQpccGFyDQotLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t
LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLVxwYXINClxwYXINClxwYXINClxw
YXINClxwYXINClxwYXINClRoZSBMb2cgb3V0cHV0OlxwYXINClxwYXINClxwYXINClxwYXINCmNv
bXBpbGluZyAiUHJpdkxhcmdlIiAgIDE1NiAgIDI0MDAwMDAwMFxwYXINClxwYXINClByaXZMYXJn
ZSBub3QgZm91bmRccGFyDQpccGFyDQpccGFyDQpccGFyDQpzdW0gPSAgICA2NTEwODI4ODBccGFy
DQpccGFyDQpccGFyDQpccGFyDQpccGFyDQpccGFyDQpzdW0gPSAgICA2NTEwODI4ODBccGFyDQpc
cGFyDQpccGFyDQpccGFyDQpccGFyDQpccGFyDQpzdW0gPSAgICA2NTEwODI4ODBccGFyDQpccGFy
DQpccGFyDQpccGFyDQpccGFyDQpccGFyDQpzdW0gPSAgICA2NTEwODI4ODBccGFyDQpccGFyDQpc
cGFyDQpccGFyDQpccGFyDQpccGFyDQpzdW0gPSAgICA2NTEwODI4ODBccGFyDQpccGFyDQpccGFy
DQpccGFyDQpccGFyDQpccGFyDQpzdW0gPSAgICA2NTEwODI4ODBccGFyDQpccGFyDQpccGFyDQpc
cGFyDQpccGFyDQpccGFyDQpzdW0gPSAgICA2NTEwODI4ODBccGFyDQpccGFyDQpccGFyDQpccGFy
DQpccGFyDQpccGFyDQpzdW0gPSAgICA2NTEwODI4ODBccGFyDQpccGFyDQpccGFyDQpccGFyDQpc
cGFyDQpccGFyDQpzdW0gPSAgICA2NTEwODI4ODBccGFyDQpccGFyDQpccGFyDQpccGFyDQpccGFy
DQpccGFyDQpzdW0gPSAgICA2NTEwODI4ODBccGFyDQpccGFyDQpccGFyDQpccGFyDQpjb21waWxp
bmcgIlByaXZMYXJnZSIgICAxNTYgICAyNDAwMDAwMDBccGFyDQpccGFyDQpQcml2TGFyZ2UgdW5s
b2FkZWRccGFyDQpccGFyDQpjb21tYW5kIGVycm9yOiBub3QgZW5vdWdoIG1lbW9yeSBmb3IgUHJp
dkxhcmdlXHBhcg0KXHBhcg0KXHBhcg0KXHBhcg0KXHBhcg0KXHBhcg0KLS0tLS0tLS0tLS0tLS0t
LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS1ccGFy
DQpccGFyDQpccGFyDQotLS0tXHBhcg0KVG8gdW5zdWJzY3JpYmUsIHNlbmQgYSBtZXNzYWdlIHdp
dGggYm9keSAiU0lHTk9GRiBCTEFDS0JPWCIgdG8gTElTVFNFUlZATElTVFMuT0JFUk9OLkNIfX0A
NyPHIg==
----boundary-LibPST-iamunique-177169279_-_---

Received on Tue Jun 28 2011 - 15:54:12 UTC