From 789af98c23f416ae6c01f9e64a71691e1ba1168e Mon Sep 17 00:00:00 2001 From: jbtule Date: Wed, 7 Oct 2020 15:09:49 -0500 Subject: [PATCH] remove fotran-modern --- modern.configuration.json | 10 - snippets/fortran.json | 520 ---------------------------------- src/documentSymbolProvider.ts | 29 -- src/extension.ts | 19 -- syntaxes/modern.tmLanguage | 390 ------------------------- test/extension.test.ts | 22 -- test/index.ts | 22 -- 7 files changed, 1012 deletions(-) delete mode 100644 modern.configuration.json delete mode 100644 snippets/fortran.json delete mode 100644 src/documentSymbolProvider.ts delete mode 100644 src/extension.ts delete mode 100644 syntaxes/modern.tmLanguage delete mode 100644 test/extension.test.ts delete mode 100644 test/index.ts diff --git a/modern.configuration.json b/modern.configuration.json deleted file mode 100644 index 8e5cf09..0000000 --- a/modern.configuration.json +++ /dev/null @@ -1,10 +0,0 @@ -{ - "comments": { - // symbol used for single line comment. Remove this entry if your language does not support line comments - "lineComment": "!" - }, - // symbols used as brackets - "brackets": [ - ["(", ")"] - ] -} \ No newline at end of file diff --git a/snippets/fortran.json b/snippets/fortran.json deleted file mode 100644 index 84521b2..0000000 --- a/snippets/fortran.json +++ /dev/null @@ -1,520 +0,0 @@ -{ - "all": { - "prefix": "all", - "body": "all(${1:mask}${2:, dim=${3:1}})", - "description": "all", - "scope": "source.fortran" - }, - "alloc": { - "prefix": "alloc", - "body": [ - "allocate(${1:array}, stat=${2:err})", - "if ($2 /= 0) print *, \"$1: Allocation request denied\"", - "", - "if (allocated($1)) deallocate($1, stat=$2)", - "if ($2 /= 0) print *, \"$1: Deallocation request denied\"" - ], - "description": "Allocate and Deallocate array", - "scope": "source.fortran" - }, - "al": { - "body": [ - "allocate(${1:array}, stat=${2:err})", - "if ($2 /= 0) print *, \"$1: Allocation request denied\"" - ], - "prefix": "al", - "description": "Allocate Array" - }, - "and": { - "prefix": "and", - "body": ".and.", - "description": "And", - "scope": "source.fortran" - }, - "any": { - "prefix": "any", - "body": "any(${1:mask}${2:, dim=${3:1}})", - "description": "any", - "scope": "source.fortran" - }, - "case": { - "prefix": "case", - "body": "case ${1:default}\r\n\t$0", - "description": "case", - "scope": "source.fortran" - }, - "char": { - "prefix": "char", - "body": "character(len=$1${2:, kind=$3})${4:, ${5:attributes}} :: ${6:name}", - "description": "Character", - "scope": "source.fortran" - }, - "close": { - "prefix": "close", - "body": "close(unit=${1:iounit}, iostat=${2:ios}${3:, status=\"delete\"})\r\nif ( $2 /= 0 ) stop \"Error closing file unit $1\"\r\n", - "description": "Close File", - "scope": "source.fortran" - }, - "count": { - "prefix": "count", - "body": "count(${1:mask}${2:, dim=${3:1}})", - "description": "count", - "scope": "source.fortran" - }, - "typ": { - "prefix": "typ", - "body": "type(${1:type name})${2:, ${3:attributes}} :: ${4:name}", - "description": "Custom Type", - "scope": "source.fortran" - }, - "cy": { - "prefix": "cy", - "body": "cycle", - "description": "cycle", - "scope": "source.fortran" - }, - "data": { - "prefix": "data", - "body": "data ${1:variable} / ${2:data} /", - "description": "data", - "scope": "source.fortran" - }, - "deal": { - "prefix": "deal", - "body": "if (allocated($1)) deallocate(${1:array}, stat=${2:err})\r\nif ($2 /= 0) print *, \"$1: Deallocation request denied$0\"", - "description": "Deallocate Array", - "scope": "source.fortran" - }, - "dow": { - "prefix": "dow", - "body": "do while ( ${1:condition} )\r\n\t$0\r\nend do", - "description": "do while", - "scope": "source.fortran" - }, - "do": { - "prefix": "do", - "body": "do${1: ${2:i} = ${3:1}, ${4:100}, ${5:1}}\r\n\t$0\r\nend do", - "description": "do", - "scope": "source.fortran" - }, - "dot": { - "prefix": "dot", - "body": "dot_product($1,$2)", - "description": "Dot Product of Vectors", - "scope": "source.fortran" - }, - "elif": { - "prefix": "elif", - "body": "elseif ( ${1:condition} ) then\r\n\t", - "description": "elseif", - "scope": "source.fortran" - }, - "eq": { - "prefix": "eq", - "body": ".eq.", - "description": "Equal", - "scope": "source.fortran" - }, - "eqv": { - "prefix": "eqv", - "body": ".eqv.", - "description": "Equality", - "scope": "source.fortran" - }, - "for": { - "prefix": "for", - "body": "forall (${1:i=1:100}${2:, mask})\r\n\t$0\r\nend forall", - "description": "forall", - "scope": "source.fortran.modern" - }, - "fun": { - "prefix": "fun", - "body": [ - "function ${1:name}(${2:input}) result(${3:output})", - "\t${4:argument type}, intent(${5:inout}) :: $2", - "\t${6:function type} :: $3", - "\t$0", - "end function $1" - ], - "description": "function", - "scope": "source.fortran" - }, - "ge": { - "prefix": "ge", - "body": ".ge.", - "description": "Greater or Equal", - "scope": "source.fortran" - }, - "gt": { - "prefix": "gt", - "body": ".gt.", - "description": "Greater Than", - "scope": "source.fortran" - }, - "if": { - "prefix": "if", - "body": "if ( ${1:condition} ) ", - "description": "if (single line)", - "scope": "source.fortran" - }, - "if1": { - "prefix": "if", - "body": "if ( ${1:condition} ) then\r\n\t$0\r\nend if", - "description": "if", - "scope": "source.fortran" - }, - "imp": { - "prefix": "imp", - "body": "implicit none\r\n", - "description": "implicit none", - "scope": "source.fortran" - }, - "ido": { - "prefix": "ido", - "body": "(${1:i}, $1 = ${2:1}, ${3:100}, ${4:1})$0", - "description": "Implied do", - "scope": "source.fortran" - }, - "maxloc": { - "prefix": "maxloc", - "body": "maxloc(${1:source}${2:, mask=${3:($1>0)}})", - "description": "Index of Maximum", - "scope": "source.fortran" - }, - "minloc": { - "prefix": "minloc", - "body": "minloc(${1:source}${2:, mask=${3:$1>0}})", - "description": "Index of Minimum", - "scope": "source.fortran" - }, - "open": { - "prefix": "open", - "body": "open(unit=${1:iounit}, file=${2:name}, iostat=${3:ios}, status=\"${4:old}\", action=\"${5:read}\")\r\nif ( $3 /= 0 ) stop \"Error opening file ${2/[\\\"\\'](.*)[\\\"\\']/$1/}\"\r\n", - "description": "Input File", - "scope": "source.fortran" - }, - "inq": { - "prefix": "inq", - "body": "inquire(file=${1:filename}, opened=${2:ioopen}, exists=${3:ioexist}, number=${4:iounit})", - "description": "Inquire (by Filename)", - "scope": "source.fortran" - }, - "inq1": { - "prefix": "inq", - "body": "inquire(unit=${1:iounit}, opened=${2:ioopen}, name=${3:filename}, action=${4:ioaction})", - "description": "Inquire (by Unit)", - "scope": "source.fortran" - }, - "int": { - "prefix": "int", - "body": "integer${1:(${2:kind})}${3:, ${4:attributes}} :: ${5:name}", - "description": "Integer", - "scope": "source.fortran" - }, - "interf": { - "prefix": "interf", - "body": "interface ${1:name}\r\n\t$0\r\nend interface ! $1", - "description": "interface", - "scope": "source.fortran" - }, - "le": { - "prefix": "le", - "body": ".le.", - "description": "Less or Equal", - "scope": "source.fortran" - }, - "lt": { - "prefix": "lt", - "body": ".lt.", - "description": "Less Than", - "scope": "source.fortran" - }, - "log": { - "prefix": "log", - "body": "logical${1:(${2:kind})}${3:, ${4:attributes}} :: ${5:name}", - "description": "Logical", - "scope": "source.fortran" - }, - "lbound": { - "prefix": "lbound", - "body": "lbound(${1:source}${2:, dim=${3:1}})", - "description": "Lower Bound", - "scope": "source.fortran" - }, - "mat": { - "prefix": "mat", - "body": "matmul($1,$2)", - "description": "Matrix Multiplication", - "scope": "source.fortran" - }, - "max": { - "prefix": "max", - "body": "max($1, $2${, $3:...})$0", - "description": "max", - "scope": "source.fortran" - }, - "maxval": { - "prefix": "maxval", - "body": "maxval(${1:source}${2:, dim=${3:1}}${4:, mask=${5:($1>0)}})", - "description": "Maximum Value", - "scope": "source.fortran" - }, - "merge": { - "prefix": "merge", - "body": "merge(${1:source}, ${2:alternative}, mask=(${2:$1>0}))", - "description": "merge", - "scope": "source.fortran" - }, - "min": { - "prefix": "min", - "body": "min($1, $2${, $3:...})$0", - "description": "min", - "scope": "source.fortran" - }, - "minval": { - "prefix": "minval", - "body": "minval(${1:source}${2:, dim=${3:1}}${4:, mask=${5:($1>0)}})", - "description": "Minimum Value", - "scope": "source.fortran" - }, - "mp": { - "prefix": "mp", - "body": "module procedure ${0:name}", - "description": "module procedure", - "scope": "source.fortran" - }, - "mod": { - "prefix": "mod", - "body": "module ${1:name}\r\n\r\n\timplicit none\r\n\t$0\r\n\r\nend module $1\r\n", - "description": "module", - "scope": "source.fortran" - }, - "neqv": { - "prefix": "neqv", - "body": ".neqv.", - "description": "Non-Equality", - "scope": "source.fortran" - }, - "not": { - "prefix": "not", - "body": ".not.", - "description": "Not", - "scope": "source.fortran" - }, - "open1": { - "prefix": "open", - "body": "open(unit=${1:iounit}, file=${2:name}, iostat=${3:ios}, &\r\n status=\"${4:old/new/replace/scratch/unknown}\", action=\"${5:read/write/readwrite}\", access=\"${7:sequential/direct}\"${7/(direct)$|.*/(?1:, recl=)/}$0)\r\nif ( $3 /= 0 ) stop \"Error opening file ${2/[\\\"\\'](.*)[\\\"\\']/$1/}\"", - "description": "Open File", - "scope": "source.fortran" - }, - "or": { - "prefix": "or", - "body": ".or.", - "description": "Or", - "scope": "source.fortran" - }, - "open2": { - "prefix": "open", - "body": "open(unit=${1:iounit}, file=${2:name}, iostat=${3:ios}, status=\"${4:new}\", action=\"${5:write}\")\r\nif ( $3 /= 0 ) stop \"Error opening file ${2/[\\\"\\'](.*)[\\\"\\']/$1/}\"\r\n", - "description": "Output File", - "scope": "source.fortran" - }, - "pack": { - "prefix": "pack", - "body": "pack(${1:array}, mask=(${2:$1>0})${3:, vector=${4:destination vector}})", - "description": "pack", - "scope": "source.fortran" - }, - "pr": { - "prefix": "pr", - "body": "print*, ", - "description": "Quick Print", - "scope": "source.fortran" - }, - "prod": { - "prefix": "prod", - "body": "product(${1:source}${2:, dim=${3:1}}${4:, mask=${5:($1>0)}})", - "description": "Product of Elements", - "scope": "source.fortran" - }, - "prog": { - "prefix": "prog", - "body": "program ${1:name}\r\n\r\n\timplicit none\r\n\t$0\r\n\r\nend program $1\r\n", - "description": "program", - "scope": "source.fortran" - }, - "c": { - "prefix": "c", - "body": "character(len=*) :: ", - "description": "Quick Character", - "scope": "source.fortran" - }, - "t": { - "prefix": "t", - "body": "type(${1:type name}) :: ", - "description": "Quick Custom Type", - "scope": "source.fortran" - }, - "i": { - "prefix": "i", - "body": "integer :: ", - "description": "Quick Integer", - "scope": "source.fortran" - }, - "l": { - "prefix": "l", - "body": "logical :: ", - "description": "Quick Logical", - "scope": "source.fortran" - }, - "op": { - "prefix": "op", - "body": "open(unit=${1:iounit}, file=${2:name}, iostat=${3:ios})\r\nif ( $3 /= 0 ) stop \"Error opening file ${2/[\\\"\\'](.*)[\\\"\\']/$1/}\"", - "description": "Quick Open", - "scope": "source.fortran" - }, - "re": { - "prefix": "re", - "body": "read*, ", - "description": "Quick Read", - "scope": "source.fortran" - }, - "r": { - "prefix": "r", - "body": "real :: ", - "description": "Quick Real", - "scope": "source.fortran" - }, - "wr": { - "prefix": "wr", - "body": "write(unit=${1:iounit}, fmt=*) ${0:variables}\r\n", - "description": "Quick Write", - "scope": "source.fortran" - }, - "rn": { - "prefix": "rn", - "body": "call random_number($0)", - "description": "Random Number", - "scope": "source.fortran" - }, - "rs": { - "prefix": "rs", - "body": "call random_seed(${1:size=${2:}}${3:put=(/$4/)})", - "description": "Random Seed", - "scope": "source.fortran" - }, - "read": { - "prefix": "read", - "body": "read(unit=${1:iounit}, fmt=\"(${2:format string})\", iostat=${3:istat}, advance='NO', size=${4:number of characters}) ${5:variables}\r\nif ( $3 /= 0 ) stop \"Read error in file unit $1\"\r\n", - "description": "Read (Non Advancing Mode)", - "scope": "source.fortran" - }, - "read1": { - "prefix": "read", - "body": "read(unit=${1:iounit}, fmt=\"(${2:format string})\", iostat=${3:istat}) ${4:variables}\r\nif ( $3 /= 0 ) stop \"Read error in file unit $1\"\r\n", - "description": "Read", - "scope": "source.fortran" - }, - "rea": { - "prefix": "rea", - "body": "real${1:(${2:kind})}${3:, ${4:attributes}} :: ${5:name}", - "description": "Real", - "scope": "source.fortran" - }, - "resh": { - "prefix": "resh", - "body": "reshape(${1:source}${2:, shape=(/$3/)}${4:, pad=(/$5/)}${6:, order=(/${7:2,1}/)})", - "description": "reshape", - "scope": "source.fortran" - }, - "open3": { - "prefix": "open", - "body": "open(unit=${1:iounit}, iostat=${3:ios}, status=\"${4:scratch}\", action=\"${5:readwrite}\")\r\nif ( $3 /= 0 ) stop \"Error opening scratch file on unit $1\"\r\n", - "description": "Scratch File", - "scope": "source.fortran" - }, - "sel": { - "prefix": "sel", - "body": "select case ($1:variable)\r\n\tcase ($2:values)\r\n\t\t$0\r\nend select", - "description": "select case", - "scope": "source.fortran" - }, - "size": { - "prefix": "size", - "body": "size(${1:source}${2:, dim=${3:1}})", - "description": "Size", - "scope": "source.fortran" - }, - "spread": { - "prefix": "spread", - "body": "spread(${1:source}, dim=${2:1}, ncopies=$3)", - "description": "spread", - "scope": "source.fortran" - }, - "stop": { - "prefix": "stop", - "body": "stop \"${1:message}\"", - "description": "stop", - "scope": "source.fortran" - }, - "sub": { - "prefix": "sub", - "body": "subroutine ${1:name}\r\n\t${2:argument type}, intent(${3:inout}) :: ${1/\\w+\\((.*)\\)|.*/$1/}\r\n\t$0\r\nend subroutine ${1/(\\w+).*/$1/}", - "description": "subroutine", - "scope": "source.fortran" - }, - "sum": { - "prefix": "sum", - "body": "sum(${1:source}${2:, dim=${3:1}}${4:, mask=${5:($1>0)}})", - "description": "Sum of Elements", - "scope": "source.fortran" - }, - "type": { - "prefix": "type", - "body": "type ${1:type name}\r\n\t$0\r\nend type $1", - "description": "Type Definition", - "scope": "source.fortran" - }, - "unpack": { - "prefix": "unpack", - "body": "unpack(${1:vector}, mask=(${2:$1>0}), field=${3:destination array})", - "description": "unpack", - "scope": "source.fortran" - }, - "ubound": { - "prefix": "ubound", - "body": "ubound(${1:source}${2:, dim=${3:1}})", - "description": "Upper Bound", - "scope": "source.fortran" - }, - "wh": { - "prefix": "wh", - "body": "where ( $1 ${2:==} $3 ) ", - "description": "where (single line)", - "scope": "source.fortran" - }, - "whe": { - "prefix": "whe", - "body": "where ( $1 ${2:==} $3 )\r\n\t$0\r\nend where", - "description": "where", - "scope": "source.fortran" - }, - "write": { - "prefix": "write", - "body": "write(unit=${1:iounit}, fmt=\"(${2:format string})\", iostat=${3:ios}${4:, advance='NO'}) ${5:variables}\r\nif ( $3 /= 0 ) stop \"Write error in file unit $1\"\r\n", - "description": "Write", - "scope": "source.fortran" - }, - "F": { - "prefix": "F", - "body": ".FALSE.", - "description": ".FALSE.", - "scope": "source.fortran" - }, - "T": { - "prefix": "T", - "body": ".TRUE.", - "description": ".TRUE.", - "scope": "source.fortran" - } -} \ No newline at end of file diff --git a/src/documentSymbolProvider.ts b/src/documentSymbolProvider.ts deleted file mode 100644 index 7b42903..0000000 --- a/src/documentSymbolProvider.ts +++ /dev/null @@ -1,29 +0,0 @@ -import vscode = require('vscode'); - -export class FortranDocumentSymbolProvider implements vscode.DocumentSymbolProvider { - - public provideDocumentSymbols( - document: vscode.TextDocument, - token: vscode.CancellationToken): vscode.SymbolInformation[] { - - const functionRegex = /^(?:pure|PURE|recursive|RECURSIVE)?\s+(?:function|FUNCTION)\s+(?:\w+)\s*(?:\(\w+\s*(?:,\s*\w+\s*)*\))(?:\s+(?:result|RESULT)(?:\(\w+\s*(?:,\s*\w+\s*)*\)))?$/; - - const result: vscode.SymbolInformation[] = []; - - for (let line = 0; line < document.lineCount; line++) { - const { text } = document.lineAt(line); - - if (functionRegex.test(text)) { - result.push( - new vscode.SymbolInformation( - text, - vscode.SymbolKind.Function, - '', - new vscode.Location(document.uri, new vscode.Position(line, 0)) - )); - } - } - - return result; - } -} diff --git a/src/extension.ts b/src/extension.ts deleted file mode 100644 index 1f5b532..0000000 --- a/src/extension.ts +++ /dev/null @@ -1,19 +0,0 @@ -// The module 'vscode' contains the VS Code extensibility API -// Import the module and reference it with the alias vscode in your code below -import * as vscode from 'vscode'; -import { FortranDocumentSymbolProvider } from './documentSymbolProvider'; - -// this method is called when your extension is activated -// your extension is activated the very first time the command is executed -export function activate(context: vscode.ExtensionContext) { - - // Use the console to output diagnostic information (console.log) and errors (console.error) - // This line of code will only be executed once when your extension is activated - console.log('Congratulations, your extension "fortran" is now active!'); - - context.subscriptions.push( - vscode.languages.registerDocumentSymbolProvider( - 'fortran-modern', new FortranDocumentSymbolProvider() - ) - ); -} \ No newline at end of file diff --git a/syntaxes/modern.tmLanguage b/syntaxes/modern.tmLanguage deleted file mode 100644 index c86daa6..0000000 --- a/syntaxes/modern.tmLanguage +++ /dev/null @@ -1,390 +0,0 @@ - - - - - comment - Specificities of Fortran >= 90 - fileTypes - - f90 - F90 - f95 - F95 - f03 - F03 - f08 - F08 - - firstLineMatch - (?i)-[*]- mode: f90 -[*]- - keyEquivalent - ^~F - name - Fortran - Modern - patterns - - - include - source.fortran - - - begin - (?x: # extended mode - ^ - \s* # start of line and possibly some space - (?i:(interface)) # 1: word interface - \s+ # some space - (?i:(operator|assignment)) # 2: the words operator or assignment - \( # opening parenthesis - ((\.[a-zA-Z0-9_]+\.)|[\+\-\=\/\*]+) # 3: an operator - - \) # closing parenthesis - ) - beginCaptures - - 1 - - name - storage.type.function.fortran - - 2 - - name - storage.type.fortran - - 3 - - name - keyword.operator.fortran - - - comment - Interface declaration of operator/assignments - end - (?x: - ((?i:end)) # 1: the word end - \s* # possibly some space - ((?i:interface)?) # 2: possibly interface - ) - endCaptures - - 1 - - name - keyword.other.fortran - - 2 - - name - storage.type.function.fortran - - - name - meta.function.interface.operator.fortran.modern - patterns - - - include - $self - - - - - begin - (?x: # extended mode - ^ - \s* # start of line and possibly some space - (?i:(interface)) # 1: word interface - \s+ # some space - ([A-Za-z_][A-Za-z0-9_]*) # 1: name - ) - beginCaptures - - 1 - - name - storage.type.function.fortran - - 2 - - name - entity.name.function.fortran - - - comment - Interface declaration of function/subroutines - end - (?x: # extended mode - ((?i:end)) # 1: the word end - \s* # possibly some space - ((?i:interface)?) # 2: possibly interface - ) - endCaptures - - 1 - - name - keyword.other.fortran - - 2 - - name - storage.type.function.fortran - - - name - meta.function.interface.fortran.modern - patterns - - - include - $self - - - - - begin - (?x: # extended mode - ^\s* # begining of line and some space - (?i:(type)) # 1: word type - \s+ # some space - ([a-zA-Z_][a-zA-Z0-9_]*) # 2: type name - ) - beginCaptures - - 1 - - name - storage.type.fortran.modern - - 2 - - name - entity.name.type.fortran.modern - - - comment - Type definition - end - (?x: - ((?i:end)) # 1: the word end - \s* # possibly some space - (?i:(type))? # 2: possibly the word type - (\s+[A-Za-z_][A-Za-z0-9_]*)? # 3: possibly the name - ) - endCaptures - - 1 - - name - keyword.other.fortran - - 2 - - name - storage.type.fortran.modern - - 3 - - name - entity.name.type.end.fortran.modern - - - name - meta.type-definition.fortran.modern - patterns - - - include - $self - - - - - begin - (^[ \t]+)?(?=!-) - beginCaptures - - 1 - - name - punctuation.whitespace.comment.leading.ruby - - - end - (?!\G) - patterns - - - begin - !- - beginCaptures - - 0 - - name - punctuation.definition.comment.fortran - - - end - \n - name - comment.line.exclamation.mark.fortran.modern - patterns - - - match - \\\s*\n - - - - - - - begin - (^[ \t]+)?(?=!) - beginCaptures - - 1 - - name - punctuation.whitespace.comment.leading.ruby - - - end - (?!\G) - patterns - - - begin - ! - beginCaptures - - 0 - - name - punctuation.definition.comment.fortran - - - end - \n - name - comment.line.exclamation.fortran.modern - patterns - - - match - \\\s*\n - - - - - - - comment - statements controling the flow of the program - match - \b(?i:(select\s+case|case(\s+default)?|end\s+select|use|(end\s+)?forall))\b - name - keyword.control.fortran.modern - - - comment - input/output instrinsics - match - \b(?i:(access|action|advance|append|apostrophe|asis|blank|delete|delim|direct|end|eor|err|exist|file|fmt|form|formatted|iolength|iostat|keep|name|named|nextrec|new|nml|no|null|number|old|opened|pad|position|quote|read|readwrite|rec|recl|replace|scratch|sequential|size|status|undefined|unformatted|unit|unknown|write|yes|zero|namelist)(?=\()) - name - keyword.control.io.fortran.modern - - - comment - logical operators in symbolic format - match - \b(\=\=|\/\=|\>\=|\>|\<|\<\=)\b - name - keyword.operator.logical.fortran.modern - - - comment - operators - match - (\%|\=\>) - name - keyword.operator.fortran.modern - - - comment - numeric instrinsics - match - \b(?i:(ceiling|floor|modulo)(?=\()) - name - keyword.other.instrinsic.numeric.fortran.modern - - - comment - matrix/vector/array instrinsics - match - \b(?i:(allocate|allocated|deallocate)(?=\()) - name - keyword.other.instrinsic.array.fortran.modern - - - comment - pointer instrinsics - match - \b(?i:(associated)(?=\()) - name - keyword.other.instrinsic.pointer.fortran.modern - - - comment - programming units - match - \b(?i:((end\s*)?(interface|procedure|module)))\b - name - keyword.other.programming-units.fortran.modern - - - begin - \b(?i:(type(?=\s*\()))\b(?=.*::) - beginCaptures - - 1 - - name - storage.type.fortran.modern - - - comment - Line of type specification - end - (?=!)|$ - name - meta.specification.fortran.modern - patterns - - - include - $base - - - - - match - \b(?i:(type(?=\s*\()))\b - name - storage.type.fortran.modern - - - match - \b(?i:(optional|recursive|pointer|allocatable|target|private|public))\b - name - storage.modifier.fortran.modern - - - scopeName - source.fortran.modern - uuid - 016CA1B6-8351-4B17-9215-29C275D5D973 - - diff --git a/test/extension.test.ts b/test/extension.test.ts deleted file mode 100644 index cf47b2c..0000000 --- a/test/extension.test.ts +++ /dev/null @@ -1,22 +0,0 @@ -// -// Note: This example test is leveraging the Mocha test framework. -// Please refer to their documentation on https://mochajs.org/ for help. -// - -// The module 'assert' provides assertion methods from node -import * as assert from 'assert'; - -// You can import and use all API from the 'vscode' module -// as well as import your extension to test it -import * as vscode from 'vscode'; -import * as myExtension from '../src/extension'; - -// Defines a Mocha test suite to group tests of similar kind together -suite("Extension Tests", () => { - - // Defines a Mocha unit test - test("Something 1", () => { - assert.equal(-1, [1, 2, 3].indexOf(5)); - assert.equal(-1, [1, 2, 3].indexOf(0)); - }); -}); \ No newline at end of file diff --git a/test/index.ts b/test/index.ts deleted file mode 100644 index e3cebd0..0000000 --- a/test/index.ts +++ /dev/null @@ -1,22 +0,0 @@ -// -// PLEASE DO NOT MODIFY / DELETE UNLESS YOU KNOW WHAT YOU ARE DOING -// -// This file is providing the test runner to use when running extension tests. -// By default the test runner in use is Mocha based. -// -// You can provide your own test runner if you want to override it by exporting -// a function run(testRoot: string, clb: (error:Error) => void) that the extension -// host can call to run the tests. The test runner is expected to use console.log -// to report the results back to the caller. When the tests are finished, return -// a possible error to the callback or null if none. - -var testRunner = require('vscode/lib/testrunner'); - -// You can directly control Mocha options by uncommenting the following lines -// See https://github.com/mochajs/mocha/wiki/Using-mocha-programmatically#set-options for more info -testRunner.configure({ - ui: 'tdd', // the TDD UI is being used in extension.test.ts (suite, test, etc.) - useColors: true // colored output from test results -}); - -module.exports = testRunner; \ No newline at end of file