#include "inc/fbJSON.bas"

Sub printNodeChildren(Byval n As fbJSON Ptr, Byval level As Integer)
End Sub

Dim test As fbJSON Ptr = fbJSON_ImportFile("test1.json")

If test = NULL Then
	Print "Unable to load json file/string!"
	End 1
End If

Print fbJSON_ExportString(test, 1)

fbJSON_Delete(test)

Sleep