From 002e1d76ef255274806535173e1968ac24ab325a Mon Sep 17 00:00:00 2001 From: Nathanael Sensfelder Date: Tue, 22 Oct 2019 04:51:24 +0200 Subject: Adds forgotten variable constructor. --- src/ataxic.erl | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/src/ataxic.erl b/src/ataxic.erl index 2993639..8443d28 100644 --- a/src/ataxic.erl +++ b/src/ataxic.erl @@ -71,7 +71,8 @@ neg/1, list_cons/1, ternary/3, - bind/2 + bind/2, + variable/1 ] ). @@ -221,6 +222,9 @@ ternary (Cond, Then, Else) -> -spec bind (list({variable(), basic()}), basic()) -> basic(). bind (Bindings, OP) -> #letr{ bindings = Bindings, op = OP }. +-spec variable (variable()) -> basic(). +variable (Name) -> #var{ name = Name }. + -spec sequence_meta (list(meta())) -> meta(). sequence_meta (List) -> #mseq{ ops = List }. -- cgit v1.2.3-70-g09d2