We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 0d484d6 commit a50bf2aCopy full SHA for a50bf2a
src/Agda2Lambox/Compile/Type.hs
@@ -143,6 +143,7 @@ compileTypeTerm = \case
143
144
-- if it's an inductive, we only apply the parameters
145
else if isDataOrRecDef def then do
146
+ lift $ requireDef q
147
ind <- liftTCM $ toInductive q
148
([],) . foldl' LBox.TApp (LBox.TInd ind)
149
<$> compileElims (take (getInductiveParams def) es)
0 commit comments