@@ -7,61 +7,71 @@ let styles =
77 "listContainer" :  style([ flex(1 . 0 )] ),
88 "row" : 
99 style([ 
10-  backgroundColor("white" ), 
10+  backgroundColor(String ( "white" ) ), 
1111 justifyContent(Center ), 
1212 paddingHorizontal(Pt (15 . )), 
13-  paddingVertical(Pt (8 . ))
13+  paddingVertical(Pt (8 . )), 
1414 ] ),
1515 "rowTitleText" :  style([ fontSize(Float (17 . )),  fontWeight(`_500 )] ),
16-  "rowDetailText" :  style([ fontSize(Float (15 . )),  color("#888888" ),  lineHeight(20 . )] ),
16+  "rowDetailText" : 
17+  style([ 
18+  fontSize(Float (15 . )), 
19+  color(String ("#888888" )), 
20+  lineHeight(20 . ), 
21+  ] ),
1722 "separator" : 
1823 style([ 
1924 height(Pt (StyleSheet . hairlineWidth)), 
20-  backgroundColor("#bbbbbb" ), 
21-  marginLeft(Pt (15 . ))
25+  backgroundColor(String ( "#bbbbbb" ) ), 
26+  marginLeft(Pt (15 . )), 
2227 ] ),
2328 "separatorHighlighted" : 
24-  style([ height(Pt (StyleSheet . hairlineWidth)),  backgroundColor("rgb(217, 217, 217)" )] )
29+  style([ 
30+  height(Pt (StyleSheet . hairlineWidth)), 
31+  backgroundColor(String ("rgb(217, 217, 217)" )), 
32+  ] ),
2533 }
26-  )
34+  ), 
2735 ); 
2836
2937let  component  =  ReasonReact . statelessComponent("RNTesterExampleList" ); 
3038
31- let  renderItem  =  (onPress) => 
32-  SectionList . renderItem(
33-  ({item}) => 
34-  <TouchableHighlight  onPress= (()  =>  onPress(item))>
35-  <View  style= styles##row>
36-  <Text  style= styles##rowTitleText>
37-  (ReasonReact . stringToElement(item. ExampleList . title))
38-  </Text >
39-  <Text  style= styles##rowDetailText>
40-  (ReasonReact . stringToElement(item. description))
41-  </Text >
42-  </View >
43-  </TouchableHighlight >
39+ let  renderItem  =  onPress => 
40+  SectionList . renderItem(({item}) => 
41+  <TouchableHighlight  onPress= (()  =>  onPress(item))>
42+  <View  style= styles##row>
43+  <Text  style= styles##rowTitleText>
44+  (ReasonReact . stringToElement(item. ExampleList . title))
45+  </Text >
46+  <Text  style= styles##rowDetailText>
47+  (ReasonReact . stringToElement(item. description))
48+  </Text >
49+  </View >
50+  </TouchableHighlight >
4451 ); 
4552
4653let  itemSeparatorComponent  = 
47-  SectionList . separatorComponent(
48-  ({highlighted}) => 
49-  <View  style= (highlighted ?  styles## separatorHighlighted :  styles## separator) />
54+  SectionList . separatorComponent(({highlighted}) => 
55+  <View 
56+  style= (highlighted ?  styles## separatorHighlighted :  styles## separator)
57+  />
5058 ); 
5159
5260let  make  =  (~components,  ~onPress,  _children) =>  {
5361 let  sections  = 
54-  SectionList . sections([| SectionList . section(~data= components,  ~key= "components" ,  () )|] ); 
62+  SectionList . sections([| 
63+  SectionList . section(~data= components,  ~key= "components" ,  () ), 
64+  |] ); 
5565 {
5666 ... component, 
57-  render:  ( _self)  => 
67+  render:  _self => 
5868 <View  style= styles##listContainer>
5969 <SectionList 
6070 sections
6171 renderItem= (renderItem(onPress))
6272 keyExtractor= ((item,  _) =>  item. key)
6373 itemSeparatorComponent
6474 />
65-  </View >
66-  }
67- }; 
75+  </View >, 
76+  }; 
77+ }; 
0 commit comments