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/package.lux | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) (limited to 'stdlib/source/program/aedifex/package.lux') diff --git a/stdlib/source/program/aedifex/package.lux b/stdlib/source/program/aedifex/package.lux index 1144e8f4a..ea9c2a6d8 100644 --- a/stdlib/source/program/aedifex/package.lux +++ b/stdlib/source/program/aedifex/package.lux @@ -28,13 +28,13 @@ [remote (#+ Address)] ["#." origin (#+ Origin)]]]) -(type: #export Package +(type: .public Package {#origin Origin #library [Binary Status] #pom [XML Binary Status]}) (template [ ] - [(def: #export ( package) + [(def: .public ( package) (-> Package Bit) (case (get@ #origin package) ( _) @@ -47,7 +47,7 @@ [remote? #//origin.Remote] ) -(def: #export (local pom library) +(def: .public (local pom library) (-> XML Binary Package) {#origin (#//origin.Local "") #library [library @@ -59,7 +59,7 @@ (#//status.Verified (//hash.sha-1 binary_pom) (//hash.md5 binary_pom))])}) -(def: #export dependencies +(def: .public dependencies (-> Package (Try (Set Dependency))) (|>> (get@ #pom) product.left @@ -67,7 +67,7 @@ (.run //pom.parser) (try\map (get@ #/.dependencies)))) -(def: #export repositories +(def: .public repositories (-> Package (Try (Set Address))) (|>> (get@ #pom) product.left @@ -75,7 +75,7 @@ (.run //pom.parser) (try\map (get@ #/.repositories)))) -(def: #export equivalence +(def: .public equivalence (Equivalence Package) ($_ product.equivalence //origin.equivalence -- cgit v1.2.3