GIT_REPOSITORIES/LPP/Users/mperrinel/SciQLop-fork Files · formatting/vera-root/scripts/rules/IPSIS_S04_FILENAME.tcl

Handles right clicking on the tree of the data sources...

Handles right clicking on the tree of the data sources The action generates the menu associated to the selected item and shows it

perrinel - - Load All Authors

File last commit:

r2:451739a45362


                r143:7b4ea0e1482b

Download file

             IPSIS_S04_FILENAME.tcl
        
                    13 lines
            
             | 479 B
            
                | application/x-tcl
            
             |
                TclLexer
            
             / formatting / vera-root / scripts / rules / IPSIS_S04_FILENAME.tcl
          
                    History
                
                 |
                  Annotation
                 | Raw
                 |Copy content
                 |Copy permalink

      #!/usr/bin/tclsh

      # Naming conventions for file names

      set fileNameRegex [getParameter "filename-regex" {^[A-Z]\w*$}]

      foreach fileName [getSourceFileNames] {

          # Check file name

          if {[regexp {(?:\\|/)?([^\\/]+?)\.(?:h|cpp)$} $fileName matchedExpr fileNameWithoutExt]} {

              if {![regexp $fileNameRegex $fileNameWithoutExt]} {

                  report $fileName 1 "The file names should match the following regex: $fileNameRegex (found: $fileNameWithoutExt)"

              }

          }

      }

	Site-wide shortcuts
/	Use quick search box
g h	Goto home page
g g	Goto my private gists page
g G	Goto my public gists page
g 0-9	Goto bookmarked items from 0-9
n r	New repository page
n g	New gist page

	Repositories
g s	Goto summary page
g c	Goto changelog page
g f	Goto files page
g F	Goto files page with file search activated
g p	Goto pull requests page
g o	Goto repository settings
g O	Goto repository access permissions settings
t s	Toggle sidebar on some pages

				#!/usr/bin/tclsh
				# Naming conventions for file names

				set fileNameRegex [getParameter "filename-regex" {^[A-Z]\w*$}]

				foreach fileName [getSourceFileNames] {
				# Check file name
				if {[regexp {(?:\\\|/)?([^\\/]+?)\.(?:h\|cpp)$} $fileName matchedExpr fileNameWithoutExt]} {
				if {![regexp $fileNameRegex $fileNameWithoutExt]} {
				report $fileName 1 "The file names should match the following regex: $fileNameRegex (found: $fileNameWithoutExt)"
				}
				}
				}