14 lines
299 B
Standard ML
14 lines
299 B
Standard ML
structure CommonUpdate =
|
|
struct
|
|
(* unimplemented *)
|
|
fun getSaveSquaresMsg model = (model, [])
|
|
|
|
fun getLoadSquaresMsg model = (model, [])
|
|
|
|
fun getExportSquaresMsg model = (model, [])
|
|
|
|
fun useSquaresInNormalMode (model, squares) = (model, [])
|
|
|
|
fun squaresLoadError model = (model, [])
|
|
end
|