( -*- text -*-
  FORTH repeated DUP DROP * 1000 using ordinary indirect threaded code
  and the assembler primitives.
  $Id: perf_dupdrop.f,v 1.1 2007-10-10 13:01:05 rich Exp $ )