1*46439007SCharles.ForsythDialog: module 2*46439007SCharles.Forsyth{ 3*46439007SCharles.Forsyth PATH: con "/dis/lib/dialog.dis"; 4*46439007SCharles.Forsyth init: fn(): string; 5*46439007SCharles.Forsyth 6*46439007SCharles.Forsyth prompt: fn(ctxt: ref Draw->Context, parent: ref Draw->Image, ico, title, msg: string, 7*46439007SCharles.Forsyth dflt: int, labs: list of string): int; 8*46439007SCharles.Forsyth getstring: fn(ctxt: ref Draw->Context, parent: ref Draw->Image, msg: string): string; 9*46439007SCharles.Forsyth}; 10