mirror of
https://git.freebsd.org/ports.git
synced 2025-07-07 12:29:16 -04:00
a15faa6309
interface to the user interface description and command language Tcl/Tk. It allows the implementation of graphical user interfaces in a structured and reusable way, supported by the powerful module system of Standard ML. WWW: http://www.informatik.uni-bremen.de/~cxl/sml_tk PR: ports/119640 Submitted by: Timothy Bourke <timbob at bigpond.com>
13 lines
464 B
Standard ML
13 lines
464 B
Standard ML
--- ./src/fonts.sml.orig Fri Mar 30 23:39:12 2001
|
|
+++ src/fonts.sml Sun Jan 13 11:03:51 2008
|
|
@@ -109,8 +109,8 @@
|
|
fun read_em si = if TextIO.endOfStream si
|
|
then [] before (TextIO.closeIn si;
|
|
TextIO.closeOut so)
|
|
- else (splitFields
|
|
- (TextIO.inputLine si))::(read_em si)
|
|
+ else (splitFields (valOf
|
|
+ (TextIO.inputLine si)))::(read_em si)
|
|
in read_em si
|
|
end
|
|
|