Add copyright headers and compiler output

Add BSD-3-Clause copyright header to all source files (44 .pas files).
Update compiler to output copyright line in version/usage output.
This commit is contained in:
Graeme Geldenhuys 2026-04-22 19:00:46 +01:00
parent 6ef9cd8c7e
commit b897f3e08d
44 changed files with 309 additions and 0 deletions

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
program Blaise; program Blaise;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}
@ -25,6 +32,7 @@ const
procedure PrintUsage; procedure PrintUsage;
begin begin
WriteLn('Blaise Compiler v', Version); WriteLn('Blaise Compiler v', Version);
WriteLn('Copyright (c) 2026 Graeme Geldenhuys');
WriteLn(''); WriteLn('');
WriteLn('Usage:'); WriteLn('Usage:');
WriteLn(' blaise --source <file.pas> --output <binary>'); WriteLn(' blaise --source <file.pas> --output <binary>');

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit uAST; unit uAST;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit uCodeGenQBE; unit uCodeGenQBE;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit uLexer; unit uLexer;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit uParser; unit uParser;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
{ {
Clean Pascal Compiler — General Pascal Tokeniser Clean Pascal Compiler — General Pascal Tokeniser

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit uSemantic; unit uSemantic;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit uSymbolTable; unit uSymbolTable;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
program TestRunner; program TestRunner;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.arc; unit cp.test.arc;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.classes; unit cp.test.classes;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.codegen; unit cp.test.codegen;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.control; unit cp.test.control;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.e2e; unit cp.test.e2e;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.exceptions; unit cp.test.exceptions;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.forloop; unit cp.test.forloop;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.functions; unit cp.test.functions;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.genericdefaults; unit cp.test.genericdefaults;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.genericfuncs; unit cp.test.genericfuncs;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.genericintfs; unit cp.test.genericintfs;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.genericmethodimpls; unit cp.test.genericmethodimpls;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.generics; unit cp.test.generics;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.inherit; unit cp.test.inherit;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.interfaces; unit cp.test.interfaces;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.lexer; unit cp.test.lexer;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.methods; unit cp.test.methods;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.parser; unit cp.test.parser;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.pointers; unit cp.test.pointers;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.procs; unit cp.test.procs;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.properties; unit cp.test.properties;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.records; unit cp.test.records;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.semantic; unit cp.test.semantic;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.symtable; unit cp.test.symtable;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.tdictionary; unit cp.test.tdictionary;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.tlist; unit cp.test.tlist;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.typetests; unit cp.test.typetests;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.units; unit cp.test.units;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.varparams; unit cp.test.varparams;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit cp.test.vtable; unit cp.test.vtable;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit Generics.Collections; unit Generics.Collections;
// Blaise RTL — generic collections (mirrors Delphi's System.Generics.Collections // Blaise RTL — generic collections (mirrors Delphi's System.Generics.Collections

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit Generics.Defaults; unit Generics.Defaults;
// Blaise RTL — generic comparison and equality interfaces. // Blaise RTL — generic comparison and equality interfaces.

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
unit System; unit System;
// Blaise RTL — Phase 1 system unit. // Blaise RTL — Phase 1 system unit.

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
program Phase2Milestone; program Phase2Milestone;
{ Phase 2 milestone: singly-linked list using TObject descendants. { Phase 2 milestone: singly-linked list using TObject descendants.

View file

@ -1,3 +1,10 @@
{
Blaise - An Object Pascal Compiler
Copyright (c) 2026 Graeme Geldenhuys
SPDX-License-Identifier: BSD-3-Clause
See LICENSE file in the project root for full license terms.
}
program Phase3Milestone; program Phase3Milestone;
{ Phase 3 milestone: exercises TList<Integer> and TDictionary<string,Integer>. { Phase 3 milestone: exercises TList<Integer> and TDictionary<string,Integer>.