tweak

Author: bobzhang

jscomp/core/lam_compile_primitive.ml

@@ -435,13 +435,6 @@ let translate  loc
     -> Ext_list.singleton_exn args     
   | Pintofbint Pint64
     -> Js_long.to_int32 args
-  (* | Pabsfloat -> 
-    begin match args with 
-      | [e] ->
-        E.math "abs" [e]
-      (* GCC treat built-ins like Math in a dirfferent way*)
-      | _ -> assert false
-    end *)
   | Pnot ->
     E.not  (Ext_list.singleton_exn args)       
   | Poffsetint n ->

lib/4.06.1/unstable/js_compiler.ml

@@ -111850,13 +111850,6 @@ let translate  loc
     -> Ext_list.singleton_exn args     
   | Pintofbint Pint64
     -> Js_long.to_int32 args
-  (* | Pabsfloat -> 
-    begin match args with 
-      | [e] ->
-        E.math "abs" [e]
-      (* GCC treat built-ins like Math in a dirfferent way*)
-      | _ -> assert false
-    end *)
   | Pnot ->
     E.not  (Ext_list.singleton_exn args)       
   | Poffsetint n ->

lib/4.06.1/unstable/js_refmt_compiler.ml

@@ -111850,13 +111850,6 @@ let translate  loc
     -> Ext_list.singleton_exn args     
   | Pintofbint Pint64
     -> Js_long.to_int32 args
-  (* | Pabsfloat -> 
-    begin match args with 
-      | [e] ->
-        E.math "abs" [e]
-      (* GCC treat built-ins like Math in a dirfferent way*)
-      | _ -> assert false
-    end *)
   | Pnot ->
     E.not  (Ext_list.singleton_exn args)       
   | Poffsetint n ->

lib/4.06.1/whole_compiler.ml

@@ -393942,13 +393942,6 @@ let translate  loc
     -> Ext_list.singleton_exn args     
   | Pintofbint Pint64
     -> Js_long.to_int32 args
-  (* | Pabsfloat -> 
-    begin match args with 
-      | [e] ->
-        E.math "abs" [e]
-      (* GCC treat built-ins like Math in a dirfferent way*)
-      | _ -> assert false
-    end *)
   | Pnot ->
     E.not  (Ext_list.singleton_exn args)       
   | Poffsetint n ->