( stack operations )
@{ val number_of_dups }dupx
   @DUPX_LOOP
       OVR SWP --
   0 #DUPX_LOOP JNE
JCC