}
my $intrinsic = "NoIntrinsic";
- $intrinsic = "CharCodeAtIntrinsic" if ($key eq "charCodeAt");
- $intrinsic = "CharAtIntrinsic" if ($key eq "charAt");
$intrinsic = "FromCharCodeIntrinsic" if ($key eq "fromCharCode");
if ($name eq "mathTable") {
$intrinsic = "MinIntrinsic" if ($key eq "min");
$intrinsic = "RoundIntrinsic" if ($key eq "round");
$intrinsic = "ExpIntrinsic" if ($key eq "exp");
$intrinsic = "LogIntrinsic" if ($key eq "log");
+ $intrinsic = "IMulIntrinsic" if ($key eq "imul");
}
if ($name eq "arrayPrototypeTable") {
$intrinsic = "ArrayPushIntrinsic" if ($key eq "push");