diff options
author | Adam Sandberg Ericsson <adam@sandbergericsson.se> | 2022-05-04 20:45:50 +0100 |
---|---|---|
committer | Adam Sandberg Ericsson <adam@sandbergericsson.se> | 2022-05-04 20:45:50 +0100 |
commit | b71b2f955f52d9cdb32e8aa3bdd899c62056929b (patch) | |
tree | 51c9151d3012c9198837e31f8b2a1d2008cfc166 | |
parent | d61f742876bdf2cd32e76f7bca389106ad99a316 (diff) | |
download | haskell-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.c | 6 |
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; |