Change all license headers, except guix/build/* and ld-wrapper.scm, with
this code:
  (use-modules (guix build utils)
	       (srfi srfi-1))
  (fluid-set! %default-port-encoding "UTF-8")
  (substitute* (remove (lambda (f)
			 (or (string-contains f ".tar.")
			     (string-contains f ".git/")
			     (string-contains f ".so")
			     (string-suffix? ".o" f)
			     (string-suffix? ".a" f)
			     (string-suffix? ".go" f)
			     (string-suffix? ".pdf" f)
			     (string-suffix? ".png" f)
			     (string-suffix? ".info" f)
			     (equal? (basename f) "guix-daemon")
			     (equal? (basename f) "nix-setuid-helper")
			     (string-contains f "nix-upstream/")
			     (string-contains f "distro/packages/bootstrap/")))
		       (find-files "." "\\.[a-z]+$"))
    (("^([[:graph:]]+) This file is part of Guix." _ comment-start)
     (string-append comment-start " This file is part of GNU Guix."))
    (("^([[:graph:]]+) Guix --- Nix package management.*" _ comment-start)
     (string-append comment-start
		    " GNU Guix --- Functional package management for GNU\n"))
    (("^([[:graph:]]+) Guix is " _ comment-start)
     (string-append comment-start " GNU Guix is "))
    (("^([[:graph:]]+) along with Guix." _ comment-start)
     (string-append comment-start " along with GNU Guix."))
    (("^([[:graph:]]+) Copyright \\(C\\)" _ comment-start)
     (string-append comment-start " Copyright ©")))
Change headers using C-style comments manually.
		
	
			
		
			
				
	
	
		
			37 lines
		
	
	
	
		
			1 KiB
		
	
	
	
		
			C++
		
	
	
	
	
	
			
		
		
	
	
			37 lines
		
	
	
	
		
			1 KiB
		
	
	
	
		
			C++
		
	
	
	
	
	
| /* GNU Guix --- Functional package management for GNU
 | |
|    Copyright (C) 2012  Ludovic Courtès <ludo@gnu.org>
 | |
| 
 | |
|    This file is part of GNU Guix.
 | |
| 
 | |
|    GNU Guix is free software; you can redistribute it and/or modify it
 | |
|    under the terms of the GNU General Public License as published by
 | |
|    the Free Software Foundation; either version 3 of the License, or (at
 | |
|    your option) any later version.
 | |
| 
 | |
|    GNU Guix is distributed in the hope that it will be useful, but
 | |
|    WITHOUT ANY WARRANTY; without even the implied warranty of
 | |
|    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 | |
|    GNU General Public License for more details.
 | |
| 
 | |
|    You should have received a copy of the GNU General Public License
 | |
|    along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.  */
 | |
| 
 | |
| /* Replacement for Nix's libmain/shared.hh.  */
 | |
| 
 | |
| #pragma once
 | |
| 
 | |
| #include <string>
 | |
| 
 | |
| #include <stdlib.h>
 | |
| #include <signal.h>
 | |
| 
 | |
| static inline void
 | |
| showManPage (const char *name)
 | |
| {
 | |
|   /* This idea is evil.  Abort.  */
 | |
|   abort ();
 | |
| }
 | |
| 
 | |
| extern volatile ::sig_atomic_t blockInt;
 | |
| 
 | |
| extern char **argvSaved;
 |