diff options
author | Lars-Dominik Braun <lars@6xq.net> | 2015-08-09 10:36:45 +0200 |
---|---|---|
committer | Lars-Dominik Braun <lars@6xq.net> | 2015-08-09 10:36:45 +0200 |
commit | 1d63c5147500e10d386f3843ba6930fe533ab4e5 (patch) | |
tree | ccbae97e35551703e7ebf6f01bc4b53a21702371 /src/Codec/Pesto/Serialize.lhs | |
parent | 58e927dc4c213033092561dfe4f2270e96126683 (diff) | |
download | pesto-1d63c5147500e10d386f3843ba6930fe533ab4e5.tar.gz pesto-1d63c5147500e10d386f3843ba6930fe533ab4e5.tar.bz2 pesto-1d63c5147500e10d386f3843ba6930fe533ab4e5.zip |
Chane result and reference argument to quantity
Now the recipe’s yield can be extracted from the root’s quantity.
Diffstat (limited to 'src/Codec/Pesto/Serialize.lhs')
-rw-r--r-- | src/Codec/Pesto/Serialize.lhs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Codec/Pesto/Serialize.lhs b/src/Codec/Pesto/Serialize.lhs index 56babb4..f07e871 100644 --- a/src/Codec/Pesto/Serialize.lhs +++ b/src/Codec/Pesto/Serialize.lhs @@ -28,8 +28,8 @@ Finally transform linear stream of instructions into a string again: > serialize (Tool q) = '&':serialize q > serialize (Action s) = quote '[' ']' s > serialize (Reference q) = '*':serialize q -> serialize (Result s) = '>':serializeQstr s -> serialize (Alternative s) = '|':serializeQstr s +> serialize (Result q) = '>':serialize q +> serialize (Alternative q) = '|':serialize q > serialize (Directive s) = '%':serializeQstr s > serialize (Unknown s) = s |