summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAdam Sandberg Ericsson <adam@sandbergericsson.se>2022-05-04 20:45:50 +0100
committerAdam Sandberg Ericsson <adam@sandbergericsson.se>2022-05-04 20:45:50 +0100
commitb71b2f955f52d9cdb32e8aa3bdd899c62056929b (patch)
tree51c9151d3012c9198837e31f8b2a1d2008cfc166
parentd61f742876bdf2cd32e76f7bca389106ad99a316 (diff)
downloadhaskell-wip/adamse/adjustor.tar.gz
adjustors: align comment about number of integer like arguments with implementation for Amd4+MinGW implementationwip/adamse/adjustor
-rw-r--r--rts/adjustor/NativeAmd64Mingw.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/rts/adjustor/NativeAmd64Mingw.c b/rts/adjustor/NativeAmd64Mingw.c
index 6406935b1b..8d18d3a833 100644
--- a/rts/adjustor/NativeAmd64Mingw.c
+++ b/rts/adjustor/NativeAmd64Mingw.c
@@ -20,16 +20,16 @@
.context_ptr = (const struct AdjustorContext **) &NAME ## _adjustor_context, \
};
-/* adjustors to handle calls with less than 6 integer arguments */
+/* adjustors to handle calls with less than 4 integer arguments */
DECLARE_ADJUSTOR_TEMPLATE(simple_ccall);
static struct AdjustorPool *simple_ccall_pool;
-/* adjustors to handle calls with 6 or more integer arguments where the fourth
+/* adjustors to handle calls with 4 or more integer arguments where the fourth
* argument is a float */
DECLARE_ADJUSTOR_TEMPLATE(complex_float_ccall);
static struct AdjustorPool *complex_float_ccall_pool;
-/* adjustors to handle calls with 6 or more integer arguments where the fourth
+/* adjustors to handle calls with 4 or more integer arguments where the fourth
* argument is not a float */
DECLARE_ADJUSTOR_TEMPLATE(complex_nofloat_ccall);
static struct AdjustorPool *complex_nofloat_ccall_pool;