mirror of
https://github.com/github/semantic.git
synced 2024-12-01 17:59:10 +03:00
add Klass constructor to object carrier instance in concrete domain
This commit is contained in:
parent
10bab90d27
commit
1f12fff84f
@ -258,6 +258,7 @@ instance Carrier sig m => Carrier (Abstract.Object address (Value term address)
|
||||
Abstract.ScopedEnvironment (Class _ _ address) k -> runObjectC (k (Just address))
|
||||
Abstract.ScopedEnvironment (Namespace _ address) k -> runObjectC (k (Just address))
|
||||
Abstract.ScopedEnvironment _ k -> runObjectC (k Nothing)
|
||||
Abstract.Klass n frame k -> runObjectC (k (Class n mempty frame))
|
||||
)
|
||||
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user