Connect to Genode hypervisor in blobset
This commit is contained in:
parent
13cb901a63
commit
ccb0e96d71
|
@ -27,7 +27,7 @@ when defined(readLine):
|
|||
|
||||
proc openStore(): BlobStore =
|
||||
#newFileStore("/tmp/blobs")
|
||||
newHttpStore("http://127.0.0.1:8080/")
|
||||
newHttpStore("http://10.0.1.63/")
|
||||
|
||||
proc serverMain() =
|
||||
let
|
||||
|
@ -414,7 +414,7 @@ proc applyFunc(env: Env; args: NodeObj): NodeRef =
|
|||
proc cborFunc(env: Env; arg: NodeObj): NodeRef =
|
||||
assertArgCount(arg, 1)
|
||||
newNode(newAtomString($toCbor(arg.atom.bs)))
|
||||
|
||||
|
||||
proc commitFunc(env: Env; arg: NodeObj): NodeRef =
|
||||
assertArgCount(arg, 1)
|
||||
let cold = commit(env.store, arg.atom.bs)
|
||||
|
|
Loading…
Reference in New Issue