; ApplyWorldDocumentEdit Example - Extended mode
document=CreateWorldDocument("edit-example","Before")
If document=0 Then RuntimeError WorldDocumentError()
q$=Chr(34)
edit=ParseJson("{"+q+"protocol"+q+":"+q+"blitz3d.world-document-edit"+q+","+q+"version"+q+":1,"+q+"expectedRevision"+q+":0,"+q+"operations"+q+":[{"+q+"op"+q+":"+q+"document.identity"+q+","+q+"name"+q+":"+q+"After"+q+"}]}")
If edit=0 Then RuntimeError JsonError()
If Not ApplyWorldDocumentEdit(document,edit) Then RuntimeError WorldDocumentError()
Print "Committed revision "+WorldDocumentRevision(document)
FreeJson edit
FreeWorldDocument document
End