Still do not have enviroment but this patch speeds things 6 fold.

--- oorexx-haiku-5.0.0/common/platform/unix/SysSemaphore.cpp 2019-02-20
07:09:11.132382720 +0000
+++ oorexx-haiku-5.0.0/common/platform/unix/SysSemaphore.cpp 2019-02-20
07:57:36.212074496 +0000
@@ -56,7 +56,7 @@
     #include <time.h>
 #endif

-#if defined(OPSYS_SUN)
+#if defined(OPSYS_SUN) || defined(__HAIKU__)
     #include <sched.h>
 #endif


~> rexx -v
Open Object Rexx Version 5.0.0 r11789
Build date: Feb 20 2019
Addressing mode: 64
Copyright (c) 1995, 2004 IBM Corporation. All rights reserved.
Copyright (c) 2005-2019 Rexx Language Association. All rights reserved.
This program and the accompanying materials are made available under the
terms
of the Common Public License v1.0 which accompanies this distribution or at
http://www.oorexx.org/license.html
~> rexx rexxcps.rex
----- REXXCPS 2.1 -- Measuring REXX clauses/second -----
 REXX version is: REXX-ooRexx_5.0.0(MT)_64-bit 6.05 20 Feb 2019
       System is: HAIKU
       Averaging: 100 measures of 100 iterations

Total (full DO): 0.02474159 secs (average of 100 measures of 100 iterations)
Time for one iteration (1000 clauses) was: 0.0002474159 seconds

     Performance: 4041777 REXX clauses per second

~> cat cmd.rex
'ls'~>
~> rexx cmd.rex
     1 *-* 'ls'
       >>>   "ls"
       +++   "RC(127)"
_______________________________________________
Oorexx-devel mailing list
Oorexx-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/oorexx-devel

Reply via email to