@@ -28,7 +28,7 @@ schemaExprP = addSubschemaP <|>
29addSubschemaP :: Parser SchemaExpr
29addSubschemaP :: Parser SchemaExpr
30addSubschemaP = do
30addSubschemaP = do
31− reserved ":addsubschema"
31+ reserved ":addschema"
32 AddSubschema <$> identifier <*> parens (sepBy schemaIsomorphP comma)
32 AddSubschema <$> identifier <*> parens (sepBy schemaIsomorphP comma)
34schemaIsomorphP :: Parser SchemaIsomorph
34schemaIsomorphP :: Parser SchemaIsomorph
@@ -36,7 +36,7 @@ schemaIsomorphP = isoRestrictP <|> isoUnionP <|> isoRenameP <|> isoPassthrough
37removeSubschemaP :: Parser SchemaExpr
37removeSubschemaP :: Parser SchemaExpr
38removeSubschemaP = do
38removeSubschemaP = do
39− reserved ":removesubschema"
39+ reserved ":removeschema"
40 RemoveSubschema <$> identifier
40 RemoveSubschema <$> identifier
42isoRestrictP :: Parser SchemaIsomorph
42isoRestrictP :: Parser SchemaIsomorph