diff options
Diffstat (limited to 'stdlib/source/library/lux/ffi.scm.lux')
-rw-r--r-- | stdlib/source/library/lux/ffi.scm.lux | 42 |
1 files changed, 21 insertions, 21 deletions
diff --git a/stdlib/source/library/lux/ffi.scm.lux b/stdlib/source/library/lux/ffi.scm.lux index 7b338dfd4..79b042679 100644 --- a/stdlib/source/library/lux/ffi.scm.lux +++ b/stdlib/source/library/lux/ffi.scm.lux @@ -71,19 +71,19 @@ (def: field (Parser Field) - (<code>.form ($_ <>.and - (<>.parses? ..static!) - <code>.local - (<>.maybe ..alias) - ..nilable))) + (<code>.form (all <>.and + (<>.parses? ..static!) + <code>.local + (<>.maybe ..alias) + ..nilable))) (def: constant (Parser Field) - (<code>.form ($_ <>.and - (<>#in true) - <code>.local - (<>.maybe ..alias) - ..nilable))) + (<code>.form (all <>.and + (<>#in true) + <code>.local + (<>.maybe ..alias) + ..nilable))) (type: Common_Method (Record @@ -96,13 +96,13 @@ (def: common_method (Parser Common_Method) - ($_ <>.and - <code>.local - (<>.maybe ..alias) - (<code>.tuple (<>.some ..nilable)) - (<>.parses? (<code>.this (' "io"))) - (<>.parses? (<code>.this (' "try"))) - ..nilable)) + (all <>.and + <code>.local + (<>.maybe ..alias) + (<code>.tuple (<>.some ..nilable)) + (<>.parses? (<code>.this (' "io"))) + (<>.parses? (<code>.this (' "try"))) + ..nilable)) (def: input_variables (-> (List Nilable) (List [Bit Code])) @@ -146,10 +146,10 @@ (def: import (Parser Import) - ($_ <>.or - (<code>.form ..common_method) - ..constant - )) + (all <>.or + (<code>.form ..common_method) + ..constant + )) (syntax: .public (try [expression <code>.any]) ... {.#doc (example (case (try (risky_computation input)) |