Ticks and join points don't play well
Currently the presence of ticks appear to inhibit our ability to discover join points as described by this comment in `OccurAnal.occAnal`,
```hs
usage_lam = markAllNonTailCalled (markAllInsideLam usage)
-- TODO There may be ways to make ticks and join points play
-- nicer together, but right now there are problems:
-- let j x = ... in tick<t> (j 1)
-- Making j a join point may cause the simplifier to drop t
-- (if the tick is put into the continuation). So we don't
-- count j 1 as a tail call.
```
This causes spurious warnings when compiling with a `DEBUG` compiler and `-g` or profiling enabled.
<details><summary>Trac metadata</summary>
| Trac field | Value |
| ---------------------- | ------------ |
| Version | 8.2.1 |
| Type | Bug |
| TypeOfFailure | OtherFailure |
| Priority | normal |
| Resolution | Unresolved |
| Component | Compiler |
| Test case | |
| Differential revisions | |
| BlockedBy | |
| Related | |
| Blocking | |
| CC | |
| Operating system | |
| Architecture | |
</details>
<!-- {"blocked_by":[],"summary":"Ticks and join points don't play well","status":"New","operating_system":"","component":"Compiler","related":[],"milestone":"","resolution":"Unresolved","owner":{"tag":"Unowned"},"version":"8.2.1","keywords":[],"differentials":[],"test_case":"","architecture":"","cc":[""],"type":"Bug","description":"Currently the presence of ticks appear to inhibit our ability to discover join points as described by this comment in `OccurAnal.occAnal`,\r\n{{{#!hs\r\n usage_lam = markAllNonTailCalled (markAllInsideLam usage)\r\n -- TODO There may be ways to make ticks and join points play\r\n -- nicer together, but right now there are problems:\r\n -- let j x = ... in tick<t> (j 1)\r\n -- Making j a join point may cause the simplifier to drop t\r\n -- (if the tick is put into the continuation). So we don't\r\n -- count j 1 as a tail call.\r\n}}}\r\n\r\nThis causes spurious warnings when compiling with a `DEBUG` compiler and `-g` or profiling enabled.","type_of_failure":"OtherFailure","blocking":[]} -->
issue