file ../../compiler/htcobol
set args -l test13.cob
#b copy_switch
b copy_do_replacements
#b copy_strip_spaces
#b      scan.l:544
#display dcs()

