* slight change to the OpenBSD startup code, to allow Low(__progname_storage)<>0

  (not that it's going to be changed that way, but it doesn't hurt for the code
  to be more robust; and it doesn't affect performance, since the compiler
  optimizes x-0 to x)

git-svn-id: trunk@41737 -

rtl/openbsd/x86_64/si_prc.inc

@@ -53,7 +53,7 @@ procedure _FPC_proc___start(argc: LongInt; argv: PPChar; envp: Pointer; para1, p
         I:=Low(__progname_storage);
         while (I<High(__progname_storage)) and (__progname[I]<>#0) do
           begin
-            __progname_storage[I]:=__progname[I];
+            __progname_storage[I]:=__progname[I-Low(__progname_storage)];
             Inc(I);
           end;
         __progname_storage[I]:=#0;