Console log attached.

fireCrash.txt (154.9 KB)

I think I may have found an issue, or at least an ambiguity, with `Continue` inside `Do … Loop` in Mercury.

I tested this minimal example:

Module Program

  Sub Main(args As String())
    Do
      writeLn("test")
      Continue Do
    Loop
  End Sub

End Module

This produces errors like:

- Wrong Continue modifier: can not find Do in the current context

• One of do, For, While expected, got End

If I change Continue Do to just Continue, it compiles, but of course that creates an infinite loop in this minimal example, which is expected.

What seems more interesting is that in a larger simple example, Continue Do does not seem to bind correctly to the enclosing Do ... Loop. It appears the compiler/parser is not recognizing the immediate surrounding Do, even though the statement is clearly inside that loop and only nested within If ... End If blocks.

Module Program

  Sub Main(args As String())
    Write("What is your name? ")
    Dim name As String = readLn()

    If String.IsNullOrWhiteSpace(name) Then
      writeLn("Name cannot be empty.")
      Return
    End If

    writeLn($"It is nice to meet you, {name}!")

    Dim age As Integer
    Do
      Write("How old are you? ")
      Dim ageInput As String = readLn()

      If Not Integer.TryParse(ageInput, age) Then
        writeLn("Please enter a valid whole number for age.")
        ' Continue Do
        Continue do
      End If

      If age < 0 Then
        writeLn("Age cannot be negative.")
        ' Continue Do
        Continue
      End If

      Exit Do
    Loop

    Dim gpa As Double
    Do
      Write("What is your GPA? ")
      Dim gpaInput As String = readLn()

      If Not Double.TryParse(gpaInput, gpa) Then
        writeLn("Please enter a valid numeric value for GPA.")
        ' Continue Do
        Continue
      End If

      If gpa < 0.0 OrElse gpa > 4.0 Then
        writeLn("GPA must be between 0.0 and 4.0.")
        ' Continue Do
        Continue
      End If

      Exit Do
    Loop

    writeLn($"So, {name}, you are {age} years old and your GPA is {gpa:F2} ... stellar!")
  End Sub

End Module

- Is `Continue Do` unsupported in Mercury?

• Or is this a parser/compiler issue with loop association and/or error reporting?

Thanks,
Gary

I just wanted to play with Island/Delphi support, but I can’t get the smallest thinkable App to run. I have this (almost as in the docs).

namespace DelphiApp1;

uses Delphi.Classes, Delphi.System;

type
Program = class
  public

  class method Main();
  begin
    writeLn('The magic happens here.');
    var lList := new TStringList;
    writeLn('created');
    var s: DelphiAnsiString := 'Hello'; // why do I need an DelphiAnsiString here when compiled with Delphi 13 SDK ?
    lList.Add(s);  //  this crashes at runtime with SDK 13 and complains at compile time when s is a DelphiString !
    writeLn('added');
    writeLn(lList.Text);
    lList.Free;
    var l = new TStringList;
    writeLn('created');
    l.Add('Hello');
    l.Add('World');
    writeLn('added');
    l.Delimiter:= Delphi.System.Char('|'); // note here is a char accepted which doesn't match to DelphiAnsiString with SDK 13
    writeLn(l.DelimitedText);
    l.Free;
    writeLn('done');
    l:= nil;
    lList:= nil;
  end;
end;
end.

I tried this with the Delphi 13 runtime, where String is a UnicodeString in Delphi, not an AnsiString. I guess this causes the crash. IMO this shouldn’t compile when I use the Delphi 13 SDK.

When I try it with the an older Delphi 2007 SDK it compiles as well (this time this is ok, because String is AnsiString), but crashes after the program has finished.

An exception occurred in DelphiApp1, thread 0C74

Type: AccessViolationException

Message:

Code c0000005

Call Stack:

0000000536880687 @System@SysFreeMem$qqrpv rtl100.bpl
0000000000456641 DelphiObjectToString DelphiApp1.exe
0000000000262013 DelphiApp1.Program.Main DelphiApp1.exe (program.pas, line 10)
0000000000200712 __island_force_release DelphiApp1.exe
0000000000249484 RemObjects.Elements.System..main DelphiApp1.exe (windowshelpers.pas, line 1707)
0000000000250072 RemObjects.Elements.System..mainCRTStartup DelphiApp1.exe (windowshelpers.pas, line 1728)
0000001968504009 BaseThreadInitThunk KERNEL32.DLL
0000002003993262 RtlGetAppContainerNamedObjectPath
0000002003993214 RtlGetAppContainerNamedObjectPath

Is the Island/Delphi not yet usable ?

Cheers, Adrian.

The latest preview release introduced a new compiler error E376 in our .NET 4.8 project.

This may be related to this change log line:

Delphi Compatibility: deprecated directive’s message was ignored

We use the ReadOnlySpan type when working with SkiaSharp :

var span := pixmap.GetPixelSpan;

The current stable release works fine. Is there an option to control the compiler’s E376 behavior? Changing the Delphi Compatibility setting doesn’t resolve the issue.

Regards

Artur

Thanks for the report (and apologies for the slow reply - I’ve been focused on other things the past few days and the delay is entirely my fault.)

The latest version .35 fixed an issue that could cause the IDE to slow down, close to freezing, so please make sure that’s installed. (It fixed re-entrancy, where processing a long-running tool call could let other tool calls also be processed. Usually they’re queued.)

Other than that we don’t have any known issue causing a freeze. The best thing I can ask is that if this happens, would it be possible to generate some debug info for us please? Steps are:

• Delphi freezes
• Open a second instance of Delphi
• Run > Attach to Process > find bds.exe, and Attach. It won’t let you connect to itself, so you will only be able to connect to the frozen instance
• Once attached, it should pause the process and you can scroll the Threads view to find the top one, usually the main IDE thread, double-click it, and see what the call stack is.

Thankyou!

no, you can’t evaluate private properties of ThreadPool so it is impossible.

We are running a Remobjects SDK server using IpSuperHttpServerChannel with a ThreadPool configuration:

IpSuperHttpServerChannel serverChannel = new IpSuperHttpServerChannel(); serverChannel.ThreadPool = new RemObjects.SDK.ThreadPool( 256 /* Max queue length */, 128 /* Max thread count */ );

Is it possible to monitor or inspect the threads of the threadpool, such as viewing the number of active threads, queued requests and which service call a thread from the threadpool is executing.

Thanks in advance!

arturredzko:

The file inside shows strange directory names:

Hmm, it looks like java doesnt appreciate the class name mangling for file/unit-visibility, wich we based on the spec proposed by the C# version of this feature.

We’ll have a look.

I’m using the latest stable release. There is a problem referencing .jar files from the Cooper directory.

When using elements.jar, I get an error :

C:\Users\>jar -xf “C:\Program Files (x86)\RemObjects Software\Elements\References\Cooper\elements.jar”
java.io.IOException: F744A47E7__RemObjects\Elements\RTL : could not create directory
at jdk.jartool/sun.tools.jar.Main.extractFile(Main.java:1437)
at jdk.jartool/sun.tools.jar.Main.extract(Main.java:1366)
at jdk.jartool/sun.tools.jar.Main.run(Main.java:390)
at jdk.jartool/sun.tools.jar.Main.main(Main.java:1683)

The file inside shows strange directory names:

cooper.jar and the others look fine:

I tested the jar files using OpenJDK versions 8, 11, and 17.

Can you check if the jar was built correctly in the latest release? Thanks.

Artur

ronald:

I’m using Delphi 13 Enterprise for developing IOS and Linux. Would love to test CodeBot. Can I join the public beta ?

This might be just what the doctor ordered.

Invite sent, as well.

I’m using Delphi 13 Enterprise for developing IOS and Linux. Would love to test CodeBot. Can I join the public beta ?

This might be just what the doctor ordered.

Tnx,

Ronald

cbrand:

Soon (months)

Less than a month, i’d expect, for 11.x support.

I’ve sent you a beta invite now.

—marc

This issue isn’t implemented yet.

I’ll re-review this issue.

I wonder if this was ever implemented? I can’t see that option from ServiceBuilder nor rodl2code, so I guess not?

Any idea if it will ever be implemented?

Thanks!

syriku:

As what we do in C# and Oxygene?

hmm, good question…

It seems no. I’ll log an ticket…

syriku:

Moreover, Elements provides even more templates for Swift on .NET than it does for Mercury, which is truly a pleasant surprise.

that means we need to do better for Mercury ;).

You can use nil as 3rd parameter.

This parameter allows to autoset SessionManager and EventRepository for services.

I just updated to 10.0.0.1621. Remobjects SDK for Delphi.

I cannot compile my webservice

        ls := LocalServiceAccess_Acquire(clientid, 'SomeService');

It needs a third parameter.

Can you advice what that third parameter is, because I do not have a Transport in my webservice or schould I do something else?

syriku:

But how about silver extensions to make sure that silver can be used in Elements, such as use swift in .Net?

Silver continues to be supported as a language in our latest compiler, and benefits from any and all non-language-based compiler enhancements over time, including e.g. full support for the .NET platform as it evolves.

The only thing we stopped doing is keeping up with latest Swift syntax changes and language features Apple is adding, as – frankly – many of them are obnoxious, and not all of them are really compatible with how Silver works on all its supported target platforms (especially .NET and Java, which often have runtime contraints orthogonal to Swift’s… vision of things, let’s say).

You could say, the goal is more to keep a language in the spirit of Swift 1-4 as part of the Elements toolchain, rather than ro mimic the monstrosity that 5/6 has become… :).

That said, we’re happy to entertain adopting new features if feasible, as well as adding new featyres needed for platform support (i’m not currently aware of any needs, in the latter regard). Your (and anyone’s) feedbacl on what you’d like to see happen here would be greatly appreciated.

—marc

But how about silver extensions to make sure that silver can be used in Elements, such as use swift in .Net?

this logic is used in super tcp channel:

            // Borrow Client ID from the message properties
            if (this.ClientID == Guid.Empty)
            {
                this.ClientID = message.ClientID;
            }
...
            message.ClientID = this.ClientID;

You can try to use SetProcessWorkingSetSize as described at https://stackoverflow.com/questions/2031577/can-memory-be-cleaned-up . it may cleanup memory in your case.

EvgenyK:

as expected. You can change ClientID for unactive channel only.

for super channels, channel.ClientID is needed for for establishing connection, i.e. when hello package is generated.

Ok, so, as far as I can see there shouldn’t be any messages apart from the hello package with the ClientID set to Guid.Empty before the Login, as afterwards I am using the same Channel and the service instances are created afterwards (except the one that handles the Login) with both the Message.ClientID (manually) and Channel.ClientID (internally by RO-SDK) set to the session generated from the Login method.

I am not really sure how to try anything more about this. I feel the “problem” (if there is a problem at all) is on the Server Channel’s connection handling. It certainly doesn’t appear to be a memory leak, as I can run this tests consecutively without any extra memory being consumed. But it is clear that this test with it’s 100s of connections use more memory from the server that it is not released even after the session timeout window has passed… several times. And it appears like the non-Super channels, TCP is the only I tried, even use more memory.

For me it’s not a big deal, I only noticed this because one of the other tests uses a lot of memory and, being this a 32bit server, that test fails if the concurrent one was run first. In real life none of those two scenarios is likely to happen, at least for the time being.

If there is anything that we could try here please let me know, for now I am putting a pin on this.

Thanks

update uROSocket.pas as

function TROSocketOpenSSL.is_retryable(ErrorCode: Integer): Boolean;
..
      fNeedShutdown := l_errorCode = SSL_ERROR_ZERO_RETURN;
      if fNeedShutdown then fShutDown := True; // <-------- changed

it should solve issue with TROHTTPServer

alan.luck:

Hi David, I was wondering when you expect an update to the codebot plugin. We love the idea, we currently are exploring VsCode/Copilot but a native plugin would be ideal. Thank you!

We’re working on the back-port now.

I was wonder if you can make the following improvement.

After the bot is finishing to inform the user with a sound (or other) but i think sound is the easiest.

Reason.

If i give him to do something i want to put my attention elsewhere. but i need to keep a constant eye on him to see if is done.

Like this if i do something else i can here the sound and return to chek or else.

tks

I will say it depends on the size of the application, the time you have to migrate, and the enrgy you want to put in it.

Perhaps recreating the top application class and copy the source code for the other parts will work. I can’t help more without access to the source code.

But continue using Oxygene and woking on Linux, Is there a way?

Or just rewriting whole the application?

Thx

Take a look at Get started with incremental ASP.NET to ASP.NET Core migration | Microsoft Learn, this will perhaps help you.

Regards from Prague, Jiri

I don’t know all library names, but are related to JSON, XML, FTP, PDF and Cryptography in .Net Framework

Thx

I can reproduce issue with TROHTTPServer and verification of client SSL certificates.

as a temporary workaround, you can use TROIndyHTTPServer instead of TROHTTPServer.

Is it possible to create an HTTPs server in the RO/Delphi environment that will actively request and verify client SSL certificates? If so, what is the recommended way?

Thank you for your reply, regards from Prague

Jiri

Absolutely, yes. We currently build for 12 and 13, but we do plan to move it backwards a few versions, and 11 is still very recent. Bar anything completely unexpected, yes, we definitely plan to support 11.3 and likely some earlier versions before that too.

This is a good reminder to do that. We’ve been focusing in some internal fundamentals and tweaks, but expanding the versions of supported Delphi is an excellent thing we should do sooner rather than later. You’re not the only one to ask

Anderson_Gregorio:

No isn’t. It built under .Net Framework and actually run just on Windows.

My question was about third-party libraries you use.

And the first question: which kind of application?

We haven’t migrated to .Net Core yet.

That is my question reason…

Thx.

After that checked Git what is the diff. between “before” and “after”, you are right, it is something about “EmbeddedResource”