/* sub.cmd */

parse arg prog
'@echo off'
call sub1 'emx'
call sub1 'btree'
call sub1 'db'
call sub1 'hash'
call sub1 'mpool'
call sub1 'recno'
exit

sub1:
  parse arg dir
  'cd '||dir
  say dir
  prog
  'cd ..'
  return