mirror of
https://git.freebsd.org/ports.git
synced 2025-07-07 12:29:16 -04:00
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>
11 lines
339 B
Standard ML
11 lines
339 B
Standard ML
--- src/com_state_pipe.sml.orig Fri Mar 30 23:39:06 2001
|
|
+++ src/com_state_pipe.sml Sun Jan 13 13:40:19 2008
|
|
@@ -145,7 +143,7 @@
|
|
|
|
|
|
fun getEvent () =
|
|
- TextIO.inputLine(getWishIn())
|
|
+ valOf (TextIO.inputLine(getWishIn()))
|
|
handle Option.Option => "" (* wish has been closed in the meantime *)
|
|
|
|
fun eval ps =
|