simple object structure case matching macro

gistfile1.js

macro _match_cond {
  case $o ($field) => {
		(typeof $o.$field !== 'undefined')
	}
	
	case $o ($field $rest ...) => {
		_match_cond $o ($field) && _match_cond $o ($rest ...)
	}
}
macro _match_var {
	case $o ($field) => {
		var $field = $o.$field;
	}
	
	case $o ($field $rest ...) => {
		_match_var $o ($field)
		_match_var $o ($rest ...)
	}
}
macro match {
	case $tomatch:expr {
			$({$field:ident (,) ...} => { $body ... }) ...
	} => {
		var obj = $tomatch;
		$(if (_match_cond obj ($field ...)) {
			_match_var obj ($field ... )
			$body ...
		}) ...
	}
}



match { id: "myid", foo: 42 } {
	{id, foo} => {
		log(id);
		log(foo + 24);
	}
	{id} => {
		log(id)
	}
}