From 5520028df5219db532cd32b56620b99a3ce84532 Mon Sep 17 00:00:00 2001
From: Adam Shamblin <adam@vexingworkshop.com>
Date: Tue, 24 May 2022 22:32:33 -0600
Subject: [PATCH] Correct naming of funcsel words

---
 gpio.fs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/gpio.fs b/gpio.fs
index d365640..9101e23 100644
--- a/gpio.fs
+++ b/gpio.fs
@@ -25,11 +25,11 @@ SIO_BASE $02c + constant GPIO_OE_XOR
 
 \ Given a pin address, leave its selected function value on the stack
 \ example: 13 pin funcsel
-: funcsel ( addr -- n ) GPIO_CTRL + @ ;
+: funcsel@ ( addr -- n ) GPIO_CTRL + @ ;
 
 \ Given a pin address, set its function
 \ example: 13 pin SIO funcset
-: funcset ( addr n -- ) swap GPIO_CTRL + ! ;
+: funcsel! ( addr n -- ) swap GPIO_CTRL + ! ;
 
 \ Display a list of all gpio pins and their current function
 : pins ( -- ) cr 30 0 DO I dup u. pin funcsel u. cr LOOP ;
-- 
2.39.5