1signature assemblerLib = 2sig 3 type lines = {line: int, string: string} list 4 5 exception Assembler of lines 6 7 val dropLastChar: string -> string 8 val hex: BitsN.nbit -> string 9 val printLines: lines -> unit 10 val printn: string -> unit 11 val quote_to_strings: string quotation -> string list 12 val word: int -> string -> BitsN.nbit 13end 14