on da76712 help sign in
src/Rel8/Table/Maybe.hs+1−1
since splitsnapshots
unifiedsplit
@@ -142,7 +142,7 @@ instance (Table context a, Reifiable context, context ~ context') =>
142
142
143 toColumns MaybeTable {tag, just} = HMaybeTable
143 toColumns MaybeTable {tag, just} = HMaybeTable
144 { htag = hlabel $ HIdentity tag
144 { htag = hlabel $ HIdentity tag
145− , hjust = hlabel $ guard tag isJust isNonNull $ toColumns just
145+ , hjust = hlabel $ toColumns just
146 }
146 }
147
147
148 fromColumns HMaybeTable {htag, hjust} = MaybeTable
148 fromColumns HMaybeTable {htag, hjust} = MaybeTable