fix expression_desc for tagged templates

Author: tsnobip

jscomp/core/js_record_fold.ml

@@ -130,8 +130,10 @@ let expression_desc : 'a. ('a, expression_desc) fn =
       let st = _self.expression _self st _x0 in
       let st = list _self.expression _self st _x1 in
       st
-  | Tagged_template (_, _, _) -> 
-    (* TODO: implement this *)
+  | Tagged_template (_xo, _x1, _x2) -> 
+    let st = _self.expression _self st _xo in 
+    let st = list _self.expression _self st _x1 in 
+    let st = list _self.expression _self st _x2 in
     st
   | String_index (_x0, _x1) ->
       let st = _self.expression _self st _x0 in

jscomp/core/js_record_iter.ml

@@ -107,9 +107,10 @@ let expression_desc : expression_desc fn =
   | Call (_x0, _x1, _x2) ->
       _self.expression _self _x0;
       list _self.expression _self _x1
-  | Tagged_template (exprCall, _, _) ->
-    (* TODO: implement this *)
-    _self.expression _self exprCall;
+  | Tagged_template (_x0, _x1, _x2) ->
+    _self.expression _self _x0;
+    list _self.expression _self _x1;
+    list _self.expression _self _x2
   | String_index (_x0, _x1) ->
       _self.expression _self _x0;
       _self.expression _self _x1