Fix printing of @send and @inline attributes

src/res_ast_conversion.ml

@@ -341,6 +341,7 @@ let normalize =
         | "bs.module" -> "module"
         | "bs.scope" -> "scope"
         | "bs.splice" | "bs.variadic" -> "variadic"
+        | "bs.send" -> "send"
         | "bs.set" -> "set"
         | "bs.set_index" -> "set_index"
         | "bs.get" -> "get"
@@ -354,6 +355,7 @@ let normalize =
         | "bs.deriving" -> "deriving"
         | "bs.string" -> "string"
         | "bs.int" -> "int"
+        | "bs.inline" -> "inline"
         | "bs.ignore" -> "ignore"
         | "bs.unwrap" -> "unwrap"
         | "bs.as" -> "as"

src/res_printer.ml

@@ -4813,6 +4813,7 @@ and printAttribute ((id, payload) : Parsetree.attribute) cmtTbl =
   | "bs.module" -> "module"
   | "bs.scope" -> "scope"
   | "bs.splice" | "bs.variadic" -> "variadic"
+  | "bs.send" -> "send"
   | "bs.set" -> "set"
   | "bs.set_index" -> "set_index"
   | "bs.get" -> "get"
@@ -4826,6 +4827,7 @@ and printAttribute ((id, payload) : Parsetree.attribute) cmtTbl =
   | "bs.deriving" -> "deriving"
   | "bs.string" -> "string"
   | "bs.int" -> "int"
+  | "bs.inline" -> "inline"
   | "bs.ignore" -> "ignore"
   | "bs.unwrap" -> "unwrap"
   | "bs.as" -> "as"

tests/conversion/reason/__snapshots__/render.spec.js.snap

@@ -1,5 +1,24 @@
 // Jest Snapshot v1, https://goo.gl/fbAQLP
 
+exports[`attributes.re 1`] = `
+"module Color: {
+  type t = private string
+
+  @inline(\\"red\\") let red: t
+  @inline(\\"black\\") let black: t
+} = {
+  type t = string
+
+  @inline let red = \\"red\\"
+  @inline let black = \\"black\\"
+}
+
+@send external map: (array<'a>, 'a => 'b) => array<'b> = \\"map\\"
+@send external filter: (array<'a>, 'a => 'b) => array<'b> = \\"filter\\"
+list{1, 2, 3}->map(a => a + 1)->filter(a => modulo(a, 2) == 0)->Js.log
+"
+`;
+
 exports[`bracedJsx.re 1`] = `
 "open Belt
 

tests/conversion/reason/attributes.re

@@ -0,0 +1,18 @@
+module Color: {
+  type t = pri string;
+
+  [@bs.inline "red"] let red: t;
+  [@bs.inline "black"] let black: t;
+} = {
+  type t = string;
+
+  [@bs.inline] let red = "red";
+  [@bs.inline] let black = "black";
+};
+
+[@bs.send] external map: (array('a), 'a => 'b) => array('b) = "map";
+[@bs.send] external filter: (array('a), 'a => 'b) => array('b) = "filter";
+[1, 2, 3]
+  ->map(a => a + 1)
+  ->filter(a => modulo(a, 2) == 0)
+  ->Js.log;

tests/printer/structure/__snapshots__/render.spec.js.snap

@@ -117,7 +117,7 @@ include (
   {
     @val @module(\\"react\\")
     external createElementInternalHack: 'a = \\"createElement\\"
-    @bs.send
+    @send
     external apply: (
       'theFunction,
       'theContext,

tests/printer/structure/include.js

@@ -8,7 +8,7 @@ include (
   {
     @val @module("react")
     external createElementInternalHack: 'a = "createElement"
-    @bs.send
+    @send
     external apply: (
       'theFunction,
       'theContext,