Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
define macro gen-bindings
{ gen-bindings(?:name; ?flags) }
=> { ?flags }
flags:
{ }
=> { }
{ ?flag, ... }
=> { ?flag; ... }
flag:
{ }
=> { }
{ ?identifier:name => ?dylan-identifier:name ?ignore-this }
=> { if (?dylan-identifier)
?name ## "$" ?identifier ## "-setter"(?dylan-identifier, opts);
format-out("XXX %=\n", ?dylan-identifier);
end if }
{ ?identifier:name ?ignore-this }
=> { if (?identifier)
?name ## "$" ?identifier ## "-setter"(?identifier, opts);
format-out("YYY %=\n", ?identifier);
end if }
ignore-this:
{ = ?val:* }
=> { }
{ }
=> { }
end macro;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment