From 84b7a6a2f5b92c0dca9d6012f9f14cf07877ab64 Mon Sep 17 00:00:00 2001 From: Humza Shahid Date: Thu, 29 Aug 2024 03:59:47 +0100 Subject: [PATCH] minor changes to saved format --- imperative-shell/file-thread.sml | 18 ++++++------------ 1 file changed, 6 insertions(+), 12 deletions(-) diff --git a/imperative-shell/file-thread.sml b/imperative-shell/file-thread.sml index 0d3367b..0c6c5c8 100644 --- a/imperative-shell/file-thread.sml +++ b/imperative-shell/file-thread.sml @@ -15,20 +15,14 @@ struct {x1, y1, x2, y2, x3, y3} :: tl => let val triString = String.concat - [ "x1:" - , Real32.toString x1 - , " y1:" - , Real32.toString y1 + [ "x " , Real32.toString x1 + , " y " , Real32.toString y1 - , " x2:" - , Real32.toString x2 - , " y2:" - , Real32.toString y2 + , " x " , Real32.toString x2 + , " y " , Real32.toString y2 - , " x3:" - , Real32.toString x3 - , " y3:" - , Real32.toString y3 + , " x " , Real32.toString x3 + , " y " , Real32.toString y3 , "\n" ]