summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAdam Sandberg Ericsson <adam@sandbergericsson.se>2022-05-04 20:45:50 +0100
committerMarge Bot <ben+marge-bot@smart-cactus.org>2022-05-05 09:06:19 -0400
commit691aacf688c3c8b83fb79256cffb5d9ce40fd359 (patch)
treecc5614d0333a7d9b40a36ccccb38acbd5ad9ea13
parentb528f0f6803054aaa272f5f289c533d4a0593854 (diff)
downloadhaskell-691aacf688c3c8b83fb79256cffb5d9ce40fd359.tar.gz
adjustors: align comment about number of integer like arguments with implementation for Amd4+MinGW implementation
-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;