From 115f95904dddebec3b2442ddaf2fde466748d59e Mon Sep 17 00:00:00 2001
From: Tom Ryder <tom@sanctum.geek.nz>
Date: Sun, 14 May 2017 21:49:38 +1200
Subject: Avoid re-calcing length each loop in drakon(6df)

---
 games/drakon.awk | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'games')

diff --git a/games/drakon.awk b/games/drakon.awk
index 4b8c35c5..1eddb4f2 100644
--- a/games/drakon.awk
+++ b/games/drakon.awk
@@ -1,9 +1,10 @@
 # TyPe lIkE AnDoR DrAkOn fRoM AnCiEnT DoMaInS Of mYsTeRy
 # <http://www.adomgb.info/adomgb-4.html>
 {
+    len = length
     line = ""
     toggle = 0
-    for (i = 1; i <= length; i++) {
+    for (i = 1; i <= len; i++) {
         char = substr($0, i, 1)
         if (char ~ /[a-zA-Z]/)
             char = (toggle = !toggle) ? tolower(char) : toupper(char)
-- 
cgit v1.2.3