diff options
| author | Ömer Sinan Ağacan <omeragacan@gmail.com> | 2018-11-16 13:52:11 +0300 |
|---|---|---|
| committer | Ömer Sinan Ağacan <omeragacan@gmail.com> | 2018-11-16 13:52:33 +0300 |
| commit | a50a59a9603425fafb1fac33addb201c19546808 (patch) | |
| tree | 228f87fd6e76edf2ec62a402324e47577ab0ed03 /includes | |
| parent | 4efd1b487e10c8cdbc1bca10c45f0887642a5c48 (diff) | |
| download | haskell-a50a59a9603425fafb1fac33addb201c19546808.tar.gz | |
More efficient, non-allocating unsafeLookupStaticPtr
We now allocate the key to spt on C stack rather than in Haskell heap,
avoiding allocating in `unsafeLookupStaticPtr`. This should be slightly
more efficient.
Test Plan: Validated locally
Reviewers: simonmar, hvr, bgamari, erikd
Reviewed By: simonmar
Subscribers: rwbarton, carter
Differential Revision: https://phabricator.haskell.org/D5333
Diffstat (limited to 'includes')
| -rw-r--r-- | includes/HsFFI.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/includes/HsFFI.h b/includes/HsFFI.h index 84976474f5..4b6278b518 100644 --- a/includes/HsFFI.h +++ b/includes/HsFFI.h @@ -126,7 +126,7 @@ extern void hs_free_stable_ptr_unsafe (HsStablePtr sp); extern void hs_free_stable_ptr (HsStablePtr sp); extern void hs_free_fun_ptr (HsFunPtr fp); -extern StgPtr hs_spt_lookup(StgWord64 key[2]); +extern StgPtr hs_spt_lookup(StgWord64 key1, StgWord64 key2); extern int hs_spt_keys(StgPtr keys[], int szKeys); extern int hs_spt_key_count (void); |