From 367aaf43ef9c52f454a721b1924808aeb2d7944f Mon Sep 17 00:00:00 2001 From: Paul Oliver Date: Thu, 23 Jan 2025 14:22:33 -0800 Subject: Replaces Int with Word type for numerical values --- hsm-command/Hsm/Command/Command.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'hsm-command') diff --git a/hsm-command/Hsm/Command/Command.hs b/hsm-command/Hsm/Command/Command.hs index 902d637..4b5ccea 100644 --- a/hsm-command/Hsm/Command/Command.hs +++ b/hsm-command/Hsm/Command/Command.hs @@ -43,8 +43,8 @@ data Speed deriving (Binary, Generic, Read, Show) data Command - = Move Direction Speed Int - | Rotate Angle Speed Int + = Move Direction Speed Word + | Rotate Angle Speed Word deriving (Binary, Generic, Read, Show) commandStream :: -- cgit v1.2.1