diff options
author | Sverker Eriksson <[email protected]> | 2016-07-05 19:15:58 +0200 |
---|---|---|
committer | Sverker Eriksson <[email protected]> | 2016-07-05 19:15:58 +0200 |
commit | ca6be40ca7ca618b0221e5a4cca3356dcb4225ab (patch) | |
tree | 7af15820806daa64ef02880684c7b6f256b44f84 /erts | |
parent | b75f6e580c4d546b94bbeeceedaa5c97279c3762 (diff) | |
parent | cdc483461c1c82cbefd333d65fd86ac0d78058c8 (diff) | |
download | otp-ca6be40ca7ca618b0221e5a4cca3356dcb4225ab.tar.gz otp-ca6be40ca7ca618b0221e5a4cca3356dcb4225ab.tar.bz2 otp-ca6be40ca7ca618b0221e5a4cca3356dcb4225ab.zip |
Merge branch 'sverker/gcbif-trace-wrapper'
Diffstat (limited to 'erts')
-rwxr-xr-x | erts/emulator/utils/make_tables | 7 |
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); |