core: fixed bug with passing () expression;

9 years ago · 097b29397b
parent 23d47adaf4
commit 097b29397b
1 changed files with 1 additions and 1 deletions
--- a/lib/sxmplv2.c
+++ b/lib/sxmplv2.c
@ -513,7 +513,7 @@ static int __eval_sysrpc(sxlink_t *link, sexp_t *sx, int builtin)
  if(builtin) rpc_list = link->hub->stream_rpc;
  else rpc_list = link->hub->system_rpc;

-  if(sx->ty == SEXP_LIST)    rpcf = sx->list->val;
+  if(sx->ty == SEXP_LIST && sx->list != NULL)    rpcf = sx->list->val;
  else return SXE_BADPROTO;

  /* find an appropriate function */