Skip to content

Commit

Permalink
Fix bug (incorrect order and missing List.revs)
Browse files Browse the repository at this point in the history
  • Loading branch information
omaus committed May 23, 2024
1 parent 6d0a16b commit 9c50770
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/OBO.NET/OboOntology.fs
Original file line number Diff line number Diff line change
Expand Up @@ -178,7 +178,7 @@ type OboOntology =
| _ ->
loop en terms typedefs formatVersion dataVersion ontology date savedBy autoGeneratedBy subsetdefs imports synonymtypedefs idSpaces defaultRelationshipIdPrefix idMappings remarks treatXrefsAsEquivalents treatXrefsAsGenusDifferentias treatXrefsAsRelationships treatXrefsAsIsAs relaxUniqueIdentifierAssumptionForNamespaces relaxUniqueLabelAssumptionForNamespaces (lineNumber + 1)
| false ->
OboOntology.create (List.rev terms) (List.rev typedefs) formatVersion dataVersion ontology date savedBy autoGeneratedBy (List.rev subsetdefs) (List.rev imports) (List.rev synonymtypedefs) (List.rev idSpaces) defaultRelationshipIdPrefix idMappings remarks treatXrefsAsEquivalents treatXrefsAsIsAs treatXrefsAsRelationships treatXrefsAsGenusDifferentias relaxUniqueIdentifierAssumptionForNamespaces relaxUniqueLabelAssumptionForNamespaces
OboOntology.create (List.rev terms) (List.rev typedefs) formatVersion dataVersion ontology date savedBy autoGeneratedBy (List.rev subsetdefs) (List.rev imports) (List.rev synonymtypedefs) (List.rev idSpaces) defaultRelationshipIdPrefix (List.rev idMappings) (List.rev remarks) (List.rev treatXrefsAsEquivalents) (List.rev treatXrefsAsGenusDifferentias) (List.rev treatXrefsAsRelationships) (List.rev treatXrefsAsIsAs) (List.rev relaxUniqueIdentifierAssumptionForNamespaces) (List.rev relaxUniqueLabelAssumptionForNamespaces)

loop en [] [] String.Empty None None None None None [] [] [] [] None [] [] [] [] [] [] [] [] 0 // was 1 before

Expand Down

0 comments on commit 9c50770

Please sign in to comment.