bump version number

1 files changed, 3 insertions, 3 deletions

diff --git a/src/modules/lexer/lexer.scm b/src/modules/lexer/lexer.scm
index 4078db4..eb815b9 100644
--- a/src/modules/lexer/lexer.scm
+++ b/src/modules/lexer/lexer.scm
@@ -32,12 +32,12 @@ current input port."
        'complement)
 
       ((eqv? chr #\+)
-       (if (take-two? chr)
+       (if (take-double? chr)
            'increment
            'add))
 
       ((eqv? chr #\-)
-       (if (take-two? chr)
+       (if (take-double? chr)
            'decrement
            'sub))
 
@@ -70,7 +70,7 @@ current input port."
             (#t (reverse chrs-so-far)))))
   (list->string (read-identifier-helper (list chr))))
 
-(define (take-two? chr)
+(define (take-double? chr)
   (if (eqv? chr (peek-char))
       (read-char)
       #f))