Test for #235

Author: japgolly

test/src/test/scala/japgolly/scalajs/react/MonocleTest.scala

@@ -1,6 +1,7 @@
 package japgolly.scalajs.react
 
 import monocle._
+import monocle.macros.Lenses
 import utest._
 import React._
 import ScalazReact._
@@ -10,6 +11,8 @@ import CompState._
 
 object MonocleTest extends TestSuite {
 
+  @Lenses case class Poly[A](oa: Option[A])
+
   val tests = TestSuite {
 
     'inference {
@@ -32,6 +35,11 @@ object MonocleTest extends TestSuite {
         'ReactComponentM - test[ReactComponentM[P, S, U, N]](_ _setStateL lensST).expect[T => Unit]
       }
 
+      'poly {
+        'zoomL      - test[BackendScope[P, Poly[S]]](_ zoomL      Poly.oa[S]).expect[ReadCallbackWriteCallbackOps[Option[S]]]
+        '_setStateL - test[BackendScope[P, Poly[S]]](_ _setStateL Poly.oa[S]).expect[Option[S] => Callback]
+      }
+
     }
   }
 }