From 4aa19494f5346a79d4c940903ad93f06be79915e Mon Sep 17 00:00:00 2001
From: Oliver Schmidt <ol.sc@web.de>
Date: Wed, 30 Aug 2017 16:37:31 +0200
Subject: [PATCH] Removed dysfunctional kbrepeatdelay() and kbrepeatrate().

As discussed in https://github.com/cc65/cc65/pull/452 after my premature merge the two functions in question don't work as expected.

Additionally I adjusted several style deviations in the pull request in question.
---
 doc/funcref.sgml        | 61 ++++-------------------------------------
 include/cbm.h           | 13 ++++-----
 libsrc/c128/kbrepeat.s  | 18 ++++--------
 libsrc/c64/kbrepeat.s   | 18 ++++--------
 libsrc/pet/kbrepeat.s   | 18 ++++--------
 libsrc/plus4/kbrepeat.s | 18 ++++--------
 libsrc/vic20/kbrepeat.s | 18 ++++--------
 7 files changed, 37 insertions(+), 127 deletions(-)

diff --git a/doc/funcref.sgml b/doc/funcref.sgml
index f866dea5f..5ef773b95 100644
--- a/doc/funcref.sgml
+++ b/doc/funcref.sgml
@@ -184,8 +184,6 @@ function.
 <!-- <item><ref id="cbm_write" name="cbm_write"> -->
 <!-- <item><ref id="get_tv" name="get_tv"> -->
 <item><ref id="kbrepeat" name="kbrepeat">
-<item><ref id="kbrepeatdelay" name="kbrepeatdelay">
-<item><ref id="kbrepeatrate" name="kbrepeatrate">
 </itemize>
 
 (incomplete)
@@ -2174,64 +2172,17 @@ to get off the serial bus so it can be used for other purposes.
 <descrip>
 <tag/Function/Set keyboard repeat mode
 <tag/Header/<tt/<ref id="cbm.h" name="cbm.h">/
-<tag/Declaration/<tt/unsigned char kbrepeat (unsigned char);/
-<tag/Description/This function changes what keys will have automatic repeat when
-being hold down for a certain time. Possible values are KBDREPEAT_CURSOR (repeat
-only cursor-related keys), KBDREPEAT_NONE (no repeat for any keys) and 
-KBDREPEAT_ALL (repeat all keys).
-The old mode is returned so it can be restored later.
+<tag/Declaration/<tt/unsigned char __fastcall__ kbrepeat (unsigned char mode);/
+<tag/Description/This function changes which keys have automatic repeat when
+being hold down for a certain time. Possible values are KBREPEAT_CURSOR (repeat
+only cursor-related keys), KBREPEAT_NONE (no repeat for any keys) and 
+KBREPEAT_ALL (repeat all keys). The old mode is returned so it can be restored
+later.
 <tag/Notes/<itemize>
 <item>The function is available only as a fastcall function; so, it may be used
 only in the presence of a prototype.
 </itemize>
 <tag/Availability/cc65
-<tag/See also/
-<ref id="kbrepeatdelay" name="kbrepeatdelay">
-<ref id="kbrepeatrate" name="kbrepeatrate">
-<tag/Example/None.
-</descrip>
-</quote>
-
-<sect1>kbrepeatdelay<label id="kbrepeatdelay"><p>
-
-<quote>
-<descrip>
-<tag/Function/Set keyboard repeat delay
-<tag/Header/<tt/<ref id="cbm.h" name="cbm.h">/
-<tag/Declaration/<tt/unsigned char kbrepeatdelay (unsigned char);/
-<tag/Description/This function changes the delay until a keypress is being
-repeated automatically.
-The old value is returned so it can be restored later.
-<tag/Notes/<itemize>
-<item>The function is available only as a fastcall function; so, it may be used
-only in the presence of a prototype.
-</itemize>
-<tag/Availability/cc65
-<tag/See also/
-<ref id="kbrepeat" name="kbrepeat">
-<ref id="kbrepeatrate" name="kbrepeatrate">
-<tag/Example/None.
-</descrip>
-</quote>
-
-<sect1>kbrepeatrate<label id="kbrepeatrate"><p>
-
-<quote>
-<descrip>
-<tag/Function/Set keyboard repeat rate
-<tag/Header/<tt/<ref id="cbm.h" name="cbm.h">/
-<tag/Declaration/<tt/unsigned char kbrepeatrate (unsigned char);/
-<tag/Description/This function changes the keyboard repeat rate (the time between
-repeated keypresses).
-The old value is returned so it can be restored later.
-<tag/Notes/<itemize>
-<item>The function is available only as a fastcall function; so, it may be used
-only in the presence of a prototype.
-</itemize>
-<tag/Availability/cc65
-<tag/See also/
-<ref id="kbrepeat" name="kbrepeat">
-<ref id="kbrepeatdelay" name="kbrepeatdelay">
 <tag/Example/None.
 </descrip>
 </quote>
diff --git a/include/cbm.h b/include/cbm.h
index c1762b1a9..a4b232406 100644
--- a/include/cbm.h
+++ b/include/cbm.h
@@ -158,17 +158,16 @@ struct cbm_dirent {
 unsigned char get_tv (void);
 /* Return the video mode the machine is using. */
 
-#define KBDREPEAT_CURSOR 0x00
-#define KBDREPEAT_NONE   0x40
-#define KBDREPEAT_ALL    0x80
+#define KBREPEAT_CURSOR 0x00
+#define KBREPEAT_NONE   0x40
+#define KBREPEAT_ALL    0x80
 
-unsigned char __fastcall__ kbrepeat(unsigned char);
-unsigned char __fastcall__ kbrepeatdelay(unsigned char);
-unsigned char __fastcall__ kbrepeatrate(unsigned char);
+unsigned char __fastcall__ kbrepeat (unsigned char mode);
+/* Changes which keys have automatic repeat. */
 
 #if !defined(__CBM610__) && !defined(__PET__)
 void waitvsync (void);
-/* wait for the start of the next frame */
+/* Wait for the start of the next frame */
 #endif
 
 /*****************************************************************************/
diff --git a/libsrc/c128/kbrepeat.s b/libsrc/c128/kbrepeat.s
index c32e8c017..4b9bc22af 100644
--- a/libsrc/c128/kbrepeat.s
+++ b/libsrc/c128/kbrepeat.s
@@ -1,5 +1,8 @@
+;
+; unsigned char __fastcall__ kbrepeat (unsigned char mode);
+;
 
-        .export _kbrepeat, _kbrepeatdelay, _kbrepeatrate
+        .export _kbrepeat
 
         .include        "c128.inc"
 
@@ -7,16 +10,5 @@ _kbrepeat:
         ldx KBDREPEAT           ; get old value
         sta KBDREPEAT           ; store new value
         txa                     ; return old value
-        rts
-
-_kbrepeatdelay:
-        ldx KBDREPEATDELAY      ; get old value
-        sta KBDREPEATDELAY      ; store new value
-        txa                     ; return old value
-        rts
-
-_kbrepeatrate:
-        ldx KBDREPEATRATE       ; get old value
-        sta KBDREPEATRATE       ; store new value
-        txa                     ; return old value
+        ldx #0
         rts
diff --git a/libsrc/c64/kbrepeat.s b/libsrc/c64/kbrepeat.s
index f59c8a6da..0df13e58d 100644
--- a/libsrc/c64/kbrepeat.s
+++ b/libsrc/c64/kbrepeat.s
@@ -1,5 +1,8 @@
+;
+; unsigned char __fastcall__ kbrepeat (unsigned char mode);
+;
 
-        .export _kbrepeat, _kbrepeatdelay, _kbrepeatrate
+        .export _kbrepeat
 
         .include        "c64.inc"
 
@@ -7,16 +10,5 @@ _kbrepeat:
         ldx KBDREPEAT           ; get old value
         sta KBDREPEAT           ; store new value
         txa                     ; return old value
-        rts
-
-_kbrepeatdelay:
-        ldx KBDREPEATDELAY      ; get old value
-        sta KBDREPEATDELAY      ; store new value
-        txa                     ; return old value
-        rts
-
-_kbrepeatrate:
-        ldx KBDREPEATRATE       ; get old value
-        sta KBDREPEATRATE       ; store new value
-        txa                     ; return old value
+        ldx #0
         rts
diff --git a/libsrc/pet/kbrepeat.s b/libsrc/pet/kbrepeat.s
index 0a29d7420..8299f5103 100644
--- a/libsrc/pet/kbrepeat.s
+++ b/libsrc/pet/kbrepeat.s
@@ -1,5 +1,8 @@
+;
+; unsigned char __fastcall__ kbrepeat (unsigned char mode);
+;
 
-        .export _kbrepeat, _kbrepeatdelay, _kbrepeatrate
+        .export _kbrepeat
 
         .include        "pet.inc"
 
@@ -7,16 +10,5 @@ _kbrepeat:
         ldx KBDREPEAT           ; get old value
         sta KBDREPEAT           ; store new value
         txa                     ; return old value
-        rts
-
-_kbrepeatdelay:
-        ldx KBDREPEATDELAY      ; get old value
-        sta KBDREPEATDELAY      ; store new value
-        txa                     ; return old value
-        rts
-
-_kbrepeatrate:
-        ldx KBDREPEATRATE       ; get old value
-        sta KBDREPEATRATE       ; store new value
-        txa                     ; return old value
+        ldx #0
         rts
diff --git a/libsrc/plus4/kbrepeat.s b/libsrc/plus4/kbrepeat.s
index 927b99e5b..9c0dc6855 100644
--- a/libsrc/plus4/kbrepeat.s
+++ b/libsrc/plus4/kbrepeat.s
@@ -1,5 +1,8 @@
+;
+; unsigned char __fastcall__ kbrepeat (unsigned char mode);
+;
 
-        .export _kbrepeat, _kbrepeatdelay, _kbrepeatrate
+        .export _kbrepeat
 
         .include        "plus4.inc"
 
@@ -7,16 +10,5 @@ _kbrepeat:
         ldx KBDREPEAT           ; get old value
         sta KBDREPEAT           ; store new value
         txa                     ; return old value
-        rts
-
-_kbrepeatdelay:
-        ldx KBDREPEATDELAY      ; get old value
-        sta KBDREPEATDELAY      ; store new value
-        txa                     ; return old value
-        rts
-
-_kbrepeatrate:
-        ldx KBDREPEATRATE       ; get old value
-        sta KBDREPEATRATE       ; store new value
-        txa                     ; return old value
+        ldx #0
         rts
diff --git a/libsrc/vic20/kbrepeat.s b/libsrc/vic20/kbrepeat.s
index 5115c852e..dce4949fb 100644
--- a/libsrc/vic20/kbrepeat.s
+++ b/libsrc/vic20/kbrepeat.s
@@ -1,5 +1,8 @@
+;
+; unsigned char __fastcall__ kbrepeat (unsigned char mode);
+;
 
-        .export _kbrepeat, _kbrepeatdelay, _kbrepeatrate
+        .export _kbrepeat
 
         .include        "vic20.inc"
 
@@ -7,16 +10,5 @@ _kbrepeat:
         ldx KBDREPEAT           ; get old value
         sta KBDREPEAT           ; store new value
         txa                     ; return old value
-        rts
-
-_kbrepeatdelay:
-        ldx KBDREPEATDELAY      ; get old value
-        sta KBDREPEATDELAY      ; store new value
-        txa                     ; return old value
-        rts
-
-_kbrepeatrate:
-        ldx KBDREPEATRATE       ; get old value
-        sta KBDREPEATRATE       ; store new value
-        txa                     ; return old value
+        ldx #0
         rts
-- 
2.39.5