Cannot use AsIs class definition in S4 method

R CMD check complains about

``
in method for ‘$<-’ with signature ‘x="fwdControl",value="AsIs"’: no definition for class “AsIs”
```

because of 

```
setMethod("$<-", signature(x="fwdControl", value="AsIs"),
```

Must review this and find another way of making `G` work