mirror of
https://github.com/dart-lang/sdk
synced 2024-09-05 00:13:50 +00:00
![Teagan Strickland](/assets/img/avatar_default.png)
* Add a new `SExpDouble` atom and change `SExpNumber` to `SExpInteger`. * Allow for negative integers in deserialization. * Add support for `LocalVariable`s and related instructions. * Function objects are now represented by actual S-expressions generated with the new `FunctionToSExp` method. Previously, they were only represented by a symbol containing their canonical name. * The top-level tag for a serialized flow graph is now `FlowGraph`, not `function`. This avoids confusion between serialized flow graphs and serialized function references. Similarly, the old `FunctionToSExp` method is now called `FlowGraphToSExp`. * Made all SExpression* returning functions that take Object (or subclass) instances return nullptr if the passed in instance is the null object, except for ObjectToSExp, which returns the symbol `null`. * Factored out creating tags for the different kind of block/function entry and also created an `Entries` section to the top-level `FlowGraph` form that contains function entry points similar to the `Constants` one instead of inlining entries as separate elements in the `FlowGraph` form. * Additional extra information in verbose mode for some elements. Bug: https://github.com/dart-lang/sdk/issues/36882 Change-Id: Iede3865ec64f81955a87fd57b10e74d49ee8414c Reviewed-on: https://dart-review.googlesource.com/c/sdk/+/110917 Commit-Queue: Teagan Strickland <sstrickl@google.com> Reviewed-by: Martin Kustermann <kustermann@google.com>
179 lines
7.2 KiB
C++
179 lines
7.2 KiB
C++
// Copyright (c) 2011, the Dart project authors. Please see the AUTHORS file
|
|
// for details. All rights reserved. Use of this source code is governed by a
|
|
// BSD-style license that can be found in the LICENSE file.
|
|
|
|
#include "vm/double_conversion.h"
|
|
|
|
#include "third_party/double-conversion/src/double-conversion.h"
|
|
|
|
#include "vm/exceptions.h"
|
|
#include "vm/globals.h"
|
|
#include "vm/object.h"
|
|
|
|
namespace dart {
|
|
|
|
char const DoubleToStringConstants::kExponentChar = 'e';
|
|
const char* const DoubleToStringConstants::kInfinitySymbol = "Infinity";
|
|
const char* const DoubleToStringConstants::kNaNSymbol = "NaN";
|
|
|
|
void DoubleToCString(double d, char* buffer, int buffer_size) {
|
|
static const int kDecimalLow = -6;
|
|
static const int kDecimalHigh = 21;
|
|
|
|
// The output contains the sign, at most kDecimalHigh - 1 digits,
|
|
// the decimal point followed by a 0 plus the \0.
|
|
ASSERT(buffer_size >= 1 + (kDecimalHigh - 1) + 1 + 1 + 1);
|
|
// Or it contains the sign, a 0, the decimal point, kDecimalLow '0's,
|
|
// 17 digits (the precision needed for doubles), plus the \0.
|
|
ASSERT(buffer_size >= 1 + 1 + 1 + kDecimalLow + 17 + 1);
|
|
// Alternatively it contains a sign, at most 17 digits (precision needed for
|
|
// any double), the decimal point, the exponent character, the exponent's
|
|
// sign, at most three exponent digits, plus the \0.
|
|
ASSERT(buffer_size >= 1 + 17 + 1 + 1 + 1 + 3 + 1);
|
|
|
|
static const int kConversionFlags =
|
|
double_conversion::DoubleToStringConverter::EMIT_POSITIVE_EXPONENT_SIGN |
|
|
double_conversion::DoubleToStringConverter::EMIT_TRAILING_DECIMAL_POINT |
|
|
double_conversion::DoubleToStringConverter::
|
|
EMIT_TRAILING_ZERO_AFTER_POINT;
|
|
|
|
const double_conversion::DoubleToStringConverter converter(
|
|
kConversionFlags, DoubleToStringConstants::kInfinitySymbol,
|
|
DoubleToStringConstants::kNaNSymbol,
|
|
DoubleToStringConstants::kExponentChar, kDecimalLow, kDecimalHigh, 0,
|
|
0); // Last two values are ignored in shortest mode.
|
|
|
|
double_conversion::StringBuilder builder(buffer, buffer_size);
|
|
bool status = converter.ToShortest(d, &builder);
|
|
ASSERT(status);
|
|
char* result = builder.Finalize();
|
|
ASSERT(result == buffer);
|
|
}
|
|
|
|
RawString* DoubleToStringAsFixed(double d, int fraction_digits) {
|
|
static const int kMinFractionDigits = 0;
|
|
static const int kMaxFractionDigits = 20;
|
|
static const int kMaxDigitsBeforePoint = 20;
|
|
// The boundaries are exclusive.
|
|
static const double kLowerBoundary = -1e21;
|
|
static const double kUpperBoundary = 1e21;
|
|
// TODO(floitsch): remove the UNIQUE_ZERO flag when the test is updated.
|
|
static const int kConversionFlags =
|
|
double_conversion::DoubleToStringConverter::NO_FLAGS;
|
|
const int kBufferSize = 128;
|
|
|
|
USE(kMaxDigitsBeforePoint);
|
|
USE(kMaxFractionDigits);
|
|
USE(kLowerBoundary);
|
|
USE(kUpperBoundary);
|
|
USE(kMinFractionDigits);
|
|
USE(kMaxFractionDigits);
|
|
// The output contains the sign, at most kMaxDigitsBeforePoint digits,
|
|
// the decimal point followed by at most fraction_digits digits plus the \0.
|
|
ASSERT(kBufferSize >= 1 + kMaxDigitsBeforePoint + 1 + kMaxFractionDigits + 1);
|
|
|
|
ASSERT(kLowerBoundary < d && d < kUpperBoundary);
|
|
|
|
ASSERT(kMinFractionDigits <= fraction_digits &&
|
|
fraction_digits <= kMaxFractionDigits);
|
|
|
|
const double_conversion::DoubleToStringConverter converter(
|
|
kConversionFlags, DoubleToStringConstants::kInfinitySymbol,
|
|
DoubleToStringConstants::kNaNSymbol,
|
|
DoubleToStringConstants::kExponentChar, 0, 0, 0,
|
|
0); // Last four values are ignored in fixed mode.
|
|
|
|
char* buffer = Thread::Current()->zone()->Alloc<char>(kBufferSize);
|
|
buffer[kBufferSize - 1] = '\0';
|
|
double_conversion::StringBuilder builder(buffer, kBufferSize);
|
|
bool status = converter.ToFixed(d, fraction_digits, &builder);
|
|
ASSERT(status);
|
|
return String::New(builder.Finalize());
|
|
}
|
|
|
|
RawString* DoubleToStringAsExponential(double d, int fraction_digits) {
|
|
static const int kMinFractionDigits = -1; // -1 represents shortest mode.
|
|
static const int kMaxFractionDigits = 20;
|
|
static const int kConversionFlags =
|
|
double_conversion::DoubleToStringConverter::EMIT_POSITIVE_EXPONENT_SIGN;
|
|
const int kBufferSize = 128;
|
|
|
|
USE(kMinFractionDigits);
|
|
USE(kMaxFractionDigits);
|
|
// The output contains the sign, at most 1 digits, the decimal point followed
|
|
// by at most kMaxFractionDigits digits, the exponent-character, the
|
|
// exponent-sign and three exponent digits plus \0.
|
|
ASSERT(kBufferSize >= 1 + 1 + kMaxFractionDigits + 1 + 1 + 3 + 1);
|
|
|
|
ASSERT(kMinFractionDigits <= fraction_digits &&
|
|
fraction_digits <= kMaxFractionDigits);
|
|
|
|
const double_conversion::DoubleToStringConverter converter(
|
|
kConversionFlags, DoubleToStringConstants::kInfinitySymbol,
|
|
DoubleToStringConstants::kNaNSymbol,
|
|
DoubleToStringConstants::kExponentChar, 0, 0, 0,
|
|
0); // Last four values are ignored in exponential mode.
|
|
|
|
char* buffer = Thread::Current()->zone()->Alloc<char>(kBufferSize);
|
|
buffer[kBufferSize - 1] = '\0';
|
|
double_conversion::StringBuilder builder(buffer, kBufferSize);
|
|
bool status = converter.ToExponential(d, fraction_digits, &builder);
|
|
ASSERT(status);
|
|
return String::New(builder.Finalize());
|
|
}
|
|
|
|
RawString* DoubleToStringAsPrecision(double d, int precision) {
|
|
static const int kMinPrecisionDigits = 1;
|
|
static const int kMaxPrecisionDigits = 21;
|
|
static const int kMaxLeadingPaddingZeroes = 6;
|
|
static const int kMaxTrailingPaddingZeroes = 0;
|
|
static const int kConversionFlags =
|
|
double_conversion::DoubleToStringConverter::EMIT_POSITIVE_EXPONENT_SIGN;
|
|
const int kBufferSize = 128;
|
|
|
|
USE(kMinPrecisionDigits);
|
|
USE(kMaxPrecisionDigits);
|
|
// The output contains the sign, a potential leading 0, the decimal point,
|
|
// at most kMax{Leading|Trailing} padding zeroes, precision digits,
|
|
// the exponent-character, the exponent-sign, three exponent digits
|
|
// plus the \0.
|
|
// Note that padding and exponent are exclusive. We still add them up.
|
|
ASSERT(kBufferSize >= 1 + 1 + 1 + kMaxLeadingPaddingZeroes +
|
|
kMaxTrailingPaddingZeroes + kMaxPrecisionDigits +
|
|
1 + 1 + 3 + 1);
|
|
|
|
ASSERT(kMinPrecisionDigits <= precision && precision <= kMaxPrecisionDigits);
|
|
|
|
const double_conversion::DoubleToStringConverter converter(
|
|
kConversionFlags, DoubleToStringConstants::kInfinitySymbol,
|
|
DoubleToStringConstants::kNaNSymbol,
|
|
DoubleToStringConstants::kExponentChar, 0,
|
|
0, // Ignored in precision mode.
|
|
kMaxLeadingPaddingZeroes, kMaxTrailingPaddingZeroes);
|
|
|
|
char* buffer = Thread::Current()->zone()->Alloc<char>(kBufferSize);
|
|
buffer[kBufferSize - 1] = '\0';
|
|
double_conversion::StringBuilder builder(buffer, kBufferSize);
|
|
bool status = converter.ToPrecision(d, precision, &builder);
|
|
ASSERT(status);
|
|
return String::New(builder.Finalize());
|
|
}
|
|
|
|
bool CStringToDouble(const char* str, intptr_t length, double* result) {
|
|
if (length == 0) {
|
|
return false;
|
|
}
|
|
|
|
double_conversion::StringToDoubleConverter converter(
|
|
double_conversion::StringToDoubleConverter::NO_FLAGS, 0.0, 0.0,
|
|
DoubleToStringConstants::kInfinitySymbol,
|
|
DoubleToStringConstants::kNaNSymbol);
|
|
|
|
int parsed_count = 0;
|
|
*result =
|
|
converter.StringToDouble(str, static_cast<int>(length), &parsed_count);
|
|
return (parsed_count == length);
|
|
}
|
|
|
|
} // namespace dart
|