mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-09 15:10:29 +02:00
Code Activity

Mark call-scm<-scm-u64 as defining a result

Browse source 
* libguile/vm-engine.c (call-scm<-scm-u64): Add OP_DST.
This commit is contained in:
Andy Wingo 2018-05-13 10:22:03 +02:00
parent ed8b1adeab
commit ad96291ffe
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/vm-engine.c
View file

@ -2185,7 +2185,7 @@ VM_NAME (scm_i_thread *thread, struct scm_vm *vp,
NEXT (2);
}
VM_DEFINE_OP (91, call_scm_from_scm_u64, "call-scm<-scm-u64", OP2 (X8_S8_S8_S8, C32))
VM_DEFINE_OP (91, call_scm_from_scm_u64, "call-scm<-scm-u64", OP2 (X8_S8_S8_S8, C32) | OP_DST)
{
scm_t_uint8 dst, a, b;
SCM res;