From 76b84decfe217cea7ea98e08f80e33920598415a Mon Sep 17 00:00:00 2001
From: Arfon Smith <arfon@github.com>
Date: Fri, 10 Apr 2015 15:09:00 -0500
Subject: [PATCH] Removing .inc from Clarion

---
 lib/linguist/languages.yml         |  3 +-
 samples/Clarion/CStringClass.inc   | 36 ----------------------
 samples/Clarion/ConsoleSupport.inc | 48 ------------------------------
 samples/Clarion/Hello.inc          |  9 ------
 4 files changed, 1 insertion(+), 95 deletions(-)
 delete mode 100644 samples/Clarion/CStringClass.inc
 delete mode 100644 samples/Clarion/ConsoleSupport.inc
 delete mode 100644 samples/Clarion/Hello.inc

diff --git a/lib/linguist/languages.yml b/lib/linguist/languages.yml
index 5b3c7dae..3aba286c 100644
--- a/lib/linguist/languages.yml
+++ b/lib/linguist/languages.yml
@@ -504,11 +504,10 @@ Cirru:
 
 Clarion:
   type: programming
-  color: #f29200
+  color: "#f29200"
   ace_mode: text
   extensions:
   - .clw
-  - .inc
   tm_scope: source.clarion
 
 Clean:
diff --git a/samples/Clarion/CStringClass.inc b/samples/Clarion/CStringClass.inc
deleted file mode 100644
index aec351f7..00000000
--- a/samples/Clarion/CStringClass.inc
+++ /dev/null
@@ -1,36 +0,0 @@
-_CStringClass_ EQUATE(1)
-
-NOT_CASE_SENSITIVE           EQUATE(FALSE)
-DEFAULT_CS_BUFFER_SIZE       EQUATE(1024)
-!--------------------------------------------------------------------------------
-!Class CStringClass
-!
-!--------------------------------------------------------------------------------
-CStringClass     Class(),Type,Module('CStringClass.Clw'),LINK('CStringClass.Clw',1)
-! Properties
-cs                           &CSTRING, PROTECTED
-bufferSize                   LONG
-newStrSize                   LONG ,PROTECTED
-strLength                    LONG ,PROTECTED
-nextPointer                  LONG
-! Methods
-Cat                    PROCEDURE (STRING pStr) ,*CSTRING,PROC ,VIRTUAL 
-Construct              PROCEDURE   
-Contains               PROCEDURE (STRING pFind, BYTE pCaseSensitive=TRUE) ,BYTE ,VIRTUAL 
-Destruct               PROCEDURE () ,VIRTUAL 
-Len                    PROCEDURE ,LONG ,VIRTUAL 
-Lower                  PROCEDURE () ,STRING ,VIRTUAL 
-Replace                PROCEDURE (STRING pFind, STRING pReplace) ,*CSTRING,PROC ,VIRTUAL 
-Str                    PROCEDURE (STRING pStr) ,*CSTRING, PROC   ,VIRTUAL 
-Str                    PROCEDURE () ,*CSTRING ,VIRTUAL 
-SubString              PROCEDURE (LONG pPosition, LONG pLength) ,STRING,PROC ,VIRTUAL 
-ToLower                PROCEDURE () ,*CSTRING,PROC ,VIRTUAL 
-ToUpper                PROCEDURE () ,*CSTRING,PROC ,VIRTUAL 
-Trim                   PROCEDURE () ,*CSTRING,PROC ,VIRTUAL 
-Upper                  PROCEDURE () ,STRING ,VIRTUAL 
-IndexOf                PROCEDURE (STRING pLookIn, BYTE pCaseSensitive=TRUE) ,LONG ,VIRTUAL 
-FoundIn                PROCEDURE (STRING pLookIn, BYTE pCaseSensitive=TRUE) ,BYTE ,VIRTUAL 
-SetBuffer              PROCEDURE (LONG pNewBuffer)  ,VIRTUAL 
-EscapeXml              PROCEDURE (<STRING pStr>) ,STRING ,VIRTUAL 
-                     END 
-!_EndOfInclude_
diff --git a/samples/Clarion/ConsoleSupport.inc b/samples/Clarion/ConsoleSupport.inc
deleted file mode 100644
index cd08c463..00000000
--- a/samples/Clarion/ConsoleSupport.inc
+++ /dev/null
@@ -1,48 +0,0 @@
-_ConsoleSupport_ EQUATE(1)
-
-HANDLE      EQUATE(UNSIGNED)
-DWORD       EQUATE(ULONG)
-INVALID_HANDLE_VALUE        EQUATE(-1)
-INVALID_OTHER        EQUATE(-2)
-NULL        EQUATE(0)
-
- 
-!************************************************************************************************************
-! Console-specific EQUATEs
-!************************************************************************************************************
-ENABLE_PROCESSED_INPUT      EQUATE(1) ! Input Mode flags
-ENABLE_LINE_INPUT   EQUATE(2)
-ENABLE_ECHO_INPUT   EQUATE(4)
-ENABLE_WINDOW_INPUT EQUATE(8)
-ENABLE_MOUSE_INPUT  EQUATE(16)
- 
-ENABLE_PROCESSED_OUTPUT     EQUATE(1) ! Output Mode flags
-ENABLE_WRAP_AT_EOL_OUTPUT   EQUATE(2)
- 
-STD_INPUT_HANDLE    EQUATE(-10) ! Standard input and output handles
-STD_OUTPUT_HANDLE   EQUATE(-11)
-STD_ERROR_HANDLE    EQUATE(-12)
- 
-CONSOLE_TEXTMODE_BUFFER     EQUATE(1) ! The type of console screen buffer to create
-ATTACH_PARENT_PROCESS       EQUATE(-1)
- 
-
-ConsoleSupport        Class(),Type,Module('ConsoleSupport.Clw'),LINK('ConsoleSupport.Clw',1)
-! Properties
-InputHandle Handle
-OutputHandle        Handle
-TextBuffer  CString(2048)
-OutBuffer   CString(2048)
-InBuffer    CString(2048)
-BytesWritten        Long
-BytesRead   Long
-Prefix 		CSTRING(21)
-! Methods
-Construct              PROCEDURE   
-Destruct               PROCEDURE () ,VIRTUAL 
-Init				   PROCEDURE () ,BYTE,PROC,VIRTUAL 
-WriteLine			   PROCEDURE (STRING pText) ,BYTE,PROC,VIRTUAL 
-ReadKey  			   PROCEDURE () ,STRING,PROC,VIRTUAL 
-
-                     END 
-!_EndOfInclude_
diff --git a/samples/Clarion/Hello.inc b/samples/Clarion/Hello.inc
deleted file mode 100644
index 1dfda5f6..00000000
--- a/samples/Clarion/Hello.inc
+++ /dev/null
@@ -1,9 +0,0 @@
-HelloClass        Class(),Type,Module('HelloClass.Clw'),LINK('HelloClass.Clw',1)
-! Properties
-
-! Methods
-Construct              PROCEDURE
-Destruct               PROCEDURE () ,VIRTUAL
-SayHello               PROCEDURE
-                     END
-!_EndOfInclude_