--- a/Float.st Mon May 27 08:49:19 2019 +0200
+++ b/Float.st Mon May 27 08:59:14 2019 +0200
@@ -854,7 +854,7 @@
!Float class methodsFor:'misc'!
getFPUControl
- "get the fpu control word."
+ "BORLAND only: get the fpu control word."
%{
#ifdef __BORLANDC__
@@ -863,13 +863,15 @@
int result = _control87(0, 0);
RETURN(__MKSMALLINT(result));
#endif
-%}
+%}.
+ ^ 0 "/ otherwise an arbitrary value
"
self getFPUControl
"
"Modified (comment): / 20-06-2017 / 11:51:58 / cg"
+ "Modified (comment): / 27-05-2019 / 08:58:54 / Claus Gittinger"
!
setFPUControl
@@ -883,13 +885,15 @@
int result = _control87(PC_64, MCW_PC);
RETURN(__MKSMALLINT(result));
#endif
-%}
+%}.
+ "/ otherwise ignored
"
self setFPUControl
"
"Modified (comment): / 20-06-2017 / 11:51:54 / cg"
+ "Modified (comment): / 27-05-2019 / 08:58:35 / Claus Gittinger"
! !