From fa05eeb66c961387208f46948d809c7b4d2c03be Mon Sep 17 00:00:00 2001
From: Andrew Rowley <Andrew.Rowley@manchester.ac.uk>
Date: Mon, 8 Jan 2018 10:40:05 +0000
Subject: [PATCH] Revert "Revert "Add rule to disallow tabs""

This reverts commit 729cfa90edd0b18e4cdbfbb46a7deb3d9e0c0523.
---
 vera++/profiles/spinnaker.tcl |  1 +
 vera++/scripts/rules/L002.tcl | 14 ++++++++++++++
 2 files changed, 15 insertions(+)
 create mode 100644 vera++/scripts/rules/L002.tcl

diff --git a/vera++/profiles/spinnaker.tcl b/vera++/profiles/spinnaker.tcl
index f8e6e58..028ca46 100644
--- a/vera++/profiles/spinnaker.tcl
+++ b/vera++/profiles/spinnaker.tcl
@@ -3,6 +3,7 @@ set rules {
     F002
 
     L001
+    L002
     L003
     L004
     L005
diff --git a/vera++/scripts/rules/L002.tcl b/vera++/scripts/rules/L002.tcl
new file mode 100644
index 0000000..a5914cd
--- /dev/null
+++ b/vera++/scripts/rules/L002.tcl
@@ -0,0 +1,14 @@
+#!/usr/bin/tclsh
+# Don't use tab characters
+
+foreach f [getSourceFileNames] {
+    set lineNumber 1
+    foreach line [getAllLines $f] {
+
+        if [regexp {\t} $line] {
+            report $f $lineNumber "horizontal tab used"
+        }
+
+        incr lineNumber
+    }
+}