scaffolding in preparation for adding simple load/export/save functionality
This commit is contained in:
15
message-types/io-msg.sml
Normal file
15
message-types/io-msg.sml
Normal file
@@ -0,0 +1,15 @@
|
||||
signature IO_MESSAGE =
|
||||
sig
|
||||
datatype t =
|
||||
SAVE_TRIANGLES of AppType.triangle list
|
||||
| EXPORT_FILE of AppType.triangle list
|
||||
| IMPORT_FILE
|
||||
end
|
||||
|
||||
structure IoMessage :> IO_MESSAGE =
|
||||
struct
|
||||
datatype t =
|
||||
SAVE_TRIANGLES of AppType.triangle list
|
||||
| EXPORT_FILE of AppType.triangle list
|
||||
| IMPORT_FILE
|
||||
end
|
||||
Reference in New Issue
Block a user