Permalink
Browse files

UITAG, UOTAG: protect complex args.

  • Loading branch information...
samrushing committed Mar 16, 2017
1 parent 88f81ea commit 991b9a11a0bf717ef8c90ff63ef11361c59f5fc5
Showing with 2 additions and 2 deletions.
  1. +2 −2 include/pxll.h
@@ -98,8 +98,8 @@ object * heap1 = NULL;
#define UOBJ_SET(o,i,v) (((pxll_vector*)(o))->val[i] = v)
// code output for literals
#define UOTAG(n) (TC_USEROBJ+(n<<2))
#define UITAG(n) (TC_USERIMM+(n<<8))
#define UOTAG(n) (TC_USEROBJ+((n)<<2))
#define UITAG(n) (TC_USERIMM+((n)<<8))
#define UPTR(n,o) ((pxll_int)(constructed_##n+o))
#define UPTR0(n) ((pxll_int)(&constructed_##n))
#define UOHEAD(l,n) ((l<<8)|UOTAG(n))

0 comments on commit 991b9a1

Please sign in to comment.