aboutsummaryrefslogtreecommitdiffstats
path: root/erts/emulator/utils/make_tables
diff options
context:
space:
mode:
authorSverker Eriksson <[email protected]>2016-07-01 15:54:11 +0200
committerSverker Eriksson <[email protected]>2016-07-01 15:54:11 +0200
commitcdc483461c1c82cbefd333d65fd86ac0d78058c8 (patch)
tree4f02d9d98b54c47339c3e0bcc94ae8434a5fe625 /erts/emulator/utils/make_tables
parentf1691991f0617f7bc0d2b58a4f0ad9410c2e8442 (diff)
downloadotp-cdc483461c1c82cbefd333d65fd86ac0d78058c8.tar.gz
otp-cdc483461c1c82cbefd333d65fd86ac0d78058c8.tar.bz2
otp-cdc483461c1c82cbefd333d65fd86ac0d78058c8.zip
erts: Fix gcbif trace wrappers
Broken on master by f0f4e72c8ec5c08993ff.
Diffstat (limited to 'erts/emulator/utils/make_tables')
-rwxr-xr-xerts/emulator/utils/make_tables7
1 files changed, 5 insertions, 2 deletions
diff --git a/erts/emulator/utils/make_tables b/erts/emulator/utils/make_tables
index fc0500d77f..27f9dcc878 100755
--- a/erts/emulator/utils/make_tables
+++ b/erts/emulator/utils/make_tables
@@ -91,8 +91,11 @@ while (<>) {
$alias .= "${name}_$arity";
}
my $wrapper;
- $wrapper = "wrap_$alias" if $type eq 'bif';
- $wrapper = $alias if $type eq 'ubif';
+ if ($type eq 'bif') {
+ $wrapper = "wrap_$alias";
+ } else {
+ $wrapper = $alias;
+ }
push(@bif, ["am_$atom_alias{$mod}","am_$atom_alias{$name}",$arity,
$alias,$wrapper]);
push(@bif_type, $type);