Commit dcdecac9b72773510e35bce2b04d6154a008f7a2

Authored by Alain Prouté
1 parent 868d4a39

fixed a bug in syscall.cpp toLF and toCRLF (for Strings and ByteArrays) had an e…

…xtra 'FreeDataSegment'.
anubis_dev/include/minver.h
1 1 #define maj_version (1)
2 2 #define min_version (13)
3   -#define rel_version (1)
  3 +#define rel_version (2)
4 4 #define build_version (0)
5 5  
6 6  
... ...
anubis_dev/library/examples/network/sokoban.anubis
... ... @@ -1420,7 +1420,7 @@ global define Web_Site_Maker
1420 1420 =
1421 1421 web_site_maker((One _) |-> ok(description(make_web_site_description
1422 1422 (
1423   - ["www.sokoban.ici"],
  1423 + ["www.sokoban.ici","127.0.0.1"],
1424 1424 "/home/alp/anubis.1.13/anubis_dev/library/examples/network",
1425 1425 (One t) |-> print("Web site 'www.sokoban.ici' loaded.\n"),
1426 1426 (HTTP_Info h) |-> [],
... ...
anubis_dev/vm/src/syscall.cpp
... ... @@ -509,7 +509,7 @@ ci_decl(syscall)
509 509 if ((result = (char *)
510 510 MAM(m_allocator)->AllocateDataSegment(byte_size_to_word_size(n+5))) == 0)
511 511 {
512   - MAM(m_allocator)->FreeDataSegment((U32 *)result);
  512 + //MAM(m_allocator)->FreeDataSegment((U32 *)result);
513 513 MAM(m_status) = need_more_memory;
514 514 { MAM(m_steps) = 0; return; }
515 515 }
... ... @@ -549,7 +549,7 @@ ci_decl(syscall)
549 549 if ((result = (char *)
550 550 MAM(m_allocator)->AllocateDataSegment(byte_size_to_word_size(strlen(orig)+5))) == 0)
551 551 {
552   - MAM(m_allocator)->FreeDataSegment((U32 *)result);
  552 + //MAM(m_allocator)->FreeDataSegment((U32 *)result);
553 553 MAM(m_status) = need_more_memory;
554 554 { MAM(m_steps) = 0; return; }
555 555 }
... ... @@ -600,7 +600,7 @@ ci_decl(syscall)
600 600 if ((result = (U8 *)
601 601 MAM(m_allocator)->AllocateDataSegment(byte_size_to_word_size(n+8))) == 0)
602 602 {
603   - MAM(m_allocator)->FreeDataSegment((U32 *)result);
  603 + //MAM(m_allocator)->FreeDataSegment((U32 *)result);
604 604 MAM(m_status) = need_more_memory;
605 605 { MAM(m_steps) = 0; return; }
606 606 }
... ... @@ -642,7 +642,7 @@ ci_decl(syscall)
642 642 if ((result = (U8 *)
643 643 MAM(m_allocator)->AllocateDataSegment(byte_size_to_word_size(origlen+8))) == 0)
644 644 {
645   - MAM(m_allocator)->FreeDataSegment((U32 *)result);
  645 + //MAM(m_allocator)->FreeDataSegment((U32 *)result);
646 646 MAM(m_status) = need_more_memory;
647 647 { MAM(m_steps) = 0; return; }
648 648 }
... ...
anubis_distrib/linux_install/prepare_package/Makefile
1 1  
2 2 minnum = 13
3   -relnum = 1
  3 +relnum = 2
4 4 bldnum = 0
5 5  
6 6 package:
... ...