From f621a133e6e0a516c0586270fea8eaffb4829d82 Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Sun, 8 Aug 2021 17:56:15 -0400 Subject: No more #export magic syntax. --- stdlib/source/program/aedifex/repository.lux | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'stdlib/source/program/aedifex/repository.lux') diff --git a/stdlib/source/program/aedifex/repository.lux b/stdlib/source/program/aedifex/repository.lux index 1ab1e0602..8d6d63b3a 100644 --- a/stdlib/source/program/aedifex/repository.lux +++ b/stdlib/source/program/aedifex/repository.lux @@ -15,7 +15,7 @@ [net [uri (#+ URI)]]]]]) -(interface: #export (Repository !) +(interface: .public (Repository !) (: Text description) (: (-> URI (! (Try Binary))) @@ -23,7 +23,7 @@ (: (-> URI Binary (! (Try Any))) upload)) -(def: #export (async repository) +(def: .public (async repository) (-> (Repository IO) (Repository Async)) (implementation (def: description @@ -35,7 +35,7 @@ (async.future (\ repository upload uri content))) )) -(interface: #export (Mock s) +(interface: .public (Mock s) (: Text the_description) (: (-> URI s (Try [s Binary])) @@ -43,7 +43,7 @@ (: (-> URI Binary s (Try s)) on_upload)) -(def: #export (mock mock init) +(def: .public (mock mock init) (All [s] (-> (Mock s) s (Repository Async))) (let [state (stm.var init)] (implementation -- cgit v1.2.3