123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146 |
- /*
- * Copyright (C)2005-2019 Haxe Foundation
- *
- * Permission is hereby granted, free of charge, to any person obtaining a
- * copy of this software and associated documentation files (the "Software"),
- * to deal in the Software without restriction, including without limitation
- * the rights to use, copy, modify, merge, publish, distribute, sublicense,
- * and/or sell copies of the Software, and to permit persons to whom the
- * Software is furnished to do so, subject to the following conditions:
- *
- * The above copyright notice and this permission notice shall be included in
- * all copies or substantial portions of the Software.
- *
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
- * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
- * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
- * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
- * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
- * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
- * DEALINGS IN THE SOFTWARE.
- */
- import hl.Boot;
- private typedef Rand = hl.Abstract<"hl_random">;
- @:coreApi
- class Std {
- static var rnd:Rand;
- static var toStringDepth:Int = 0;
- static function __init__():Void {
- rnd = rnd_sys();
- }
- @:hlNative("std", "rnd_init_system") static function rnd_sys():Rand {
- return null;
- }
- @:hlNative("std", "rnd_int") static function rnd_int(r:Rand):Int {
- return 0;
- }
- @:hlNative("std", "rnd_float") static function rnd_float(r:Rand):Float {
- return 0.;
- }
- public static function random(x:Int):Int {
- return x <= 0 ? 0 : (rnd_int(rnd) & 0x3FFFFFFF) % x;
- }
- @:deprecated('Std.is is deprecated. Use Std.isOfType instead.')
- public static inline function is(v:Dynamic, t:Dynamic):Bool {
- return isOfType(v, t);
- }
- public static function isOfType(v:Dynamic, t:Dynamic):Bool {
- var t:hl.BaseType = t;
- if (t == null)
- return false;
- switch (t.__type__.kind) {
- case HDyn:
- return v != null;
- case HF64:
- switch (hl.Type.getDynamic(v).kind) {
- case HUI8, HUI16, HI32:
- return true;
- default:
- }
- case HI32:
- switch (hl.Type.getDynamic(v).kind) {
- case HF32, HF64:
- var v:Float = v;
- return Std.int(v) == v;
- default:
- }
- default:
- }
- return t.check(v);
- }
- extern public static function downcast<T:{}, S:T>(value:T, c:Class<S>):S;
- @:deprecated('Std.instance() is deprecated. Use Std.downcast() instead.')
- public static inline function instance<T:{}, S:T>(value:T, c:Class<S>):S {
- return downcast(value, c);
- }
- extern public static inline function int(x:Float):Int {
- return untyped $int(x);
- }
- @:keep public static function string(s:Dynamic):String {
- var len = 0;
- var bytes = hl.Bytes.fromValue(s, new hl.Ref(len));
- return @:privateAccess String.__alloc__(bytes, len);
- }
- public static function parseInt(x:String):Null<Int> {
- if (x == null)
- return null;
- return @:privateAccess x.bytes.parseInt(0, x.length << 1);
- }
- public static function parseFloat(x:String):Float {
- if (x == null)
- return Math.NaN;
- return @:privateAccess x.bytes.parseFloat(0, x.length << 1);
- }
- @:keep static function __add__(a:Dynamic, b:Dynamic):Dynamic {
- var ta = hl.Type.getDynamic(a);
- var tb = hl.Type.getDynamic(b);
- if (ta == hl.Type.get(""))
- return (a : String) + b;
- if (tb == hl.Type.get(""))
- return a + (b : String);
- switch (ta.kind) {
- case HUI8, HUI16, HI32:
- var a:Int = a;
- switch (tb.kind) {
- case HUI8, HUI16, HI32: return a + (b : Int);
- case HF32, HF64: return a + (b : Float);
- case HVoid: return a;
- default:
- }
- case HF32, HF64:
- var a:Float = a;
- switch (tb.kind) {
- case HUI8, HUI16, HI32: return a + (b : Int);
- case HF32, HF64: return a + (b : Float);
- case HVoid: return a;
- default:
- }
- case HVoid:
- switch (tb.kind) {
- case HUI8, HUI16, HI32, HF32, HF64: return b;
- case HVoid: return 0.;
- default:
- }
- default:
- }
- throw "Can't add " + a + "(" + ta + ") and " + b + "(" + tb + ")";
- return null;
- }
- }
|