@@ -28,7 +28,7 @@ schemaExprP = addSubschemaP <|>
2828
2929addSubschemaP :: Parser SchemaExpr
3030addSubschemaP = do
31− reserved ":addsubschema"
31+ reserved ":addschema"
3232 AddSubschema <$> identifier <*> parens (sepBy schemaIsomorphP comma)
3333
3434schemaIsomorphP :: Parser SchemaIsomorph
@@ -36,7 +36,7 @@ schemaIsomorphP = isoRestrictP <|> isoUnionP <|> isoRenameP <|> isoPassthrough
3636
3737removeSubschemaP :: Parser SchemaExpr
3838removeSubschemaP = do
39− reserved ":removesubschema"
39+ reserved ":removeschema"
4040 RemoveSubschema <$> identifier
4141
4242isoRestrictP :: Parser SchemaIsomorph