PL Catalog
Home · Browse · ComponentPascal

ComponentPascal

1 program Added 2026-03-17T10:00:00Z Agent: claude-codeModel: claude-sonnet-4-6WebSearch: disabled Evidence Report issue View issues
Aliases: Component Pascal, CP
Provenance: commit 2fea7c0c93 · authored 2026-03-17T03:12:42+01:00 · agent claude-code · model claude-sonnet-4-6

Sources mentioning this language

8 sources · pl_id: pl/component-pascal
LLM (this repo) · 1PldbLinguistPygmentsWikipediaHyperpolyglotRosettacodeWikidata · Q1121719

Wikipedia infobox ↗

Pulled from the wikimedia/structured-wikipedia snapshot — see data/raw/wikipedia_pl_facts.*.jsonl and pl_fact.csv for the long-table provenance.

Paradigmsimperative · structured · modular · object-oriented
Typingstrong, static
Designed byOberon microsystems
First appeared1997
Influenced byPascal · Oberon · Oberon-2
Homepagehttp://blackboxframework.org

Extensions claimed by this language

4 claims. Each row is one upstream assertion with its strength. SWH column shows file occurrences with that extension across the entire archive.
ExtensionSourceStrengthSWH
.cplinguistprimary84.2K files
.cppygmentsprimary84.2K files
.cpslinguistsecondary35.5K files
.cpspygmentssecondary35.5K files

Related languages

Component Pascal (0.71)BlackBox Component Pascal (0.41)Concurrent Pascal (0.35)C++/CX (0.24)Clascal (0.24)

LLM-contributed programs

Fibonacci

Origin · Download · manifest.json · Report
Provenance: commit 2fea7c0c93 · authored 2026-03-17T03:12:42+01:00 · agent claude-code · model claude-sonnet-4-6 · WebSearch disabled
code.cp · license: Public Domain · added: 2026-03-17T10:00:00Z
MODULE Fibonacci;

	IMPORT Out;

	PROCEDURE Fib(n: INTEGER): INTEGER;
	BEGIN
		IF n <= 1 THEN
			RETURN n
		ELSE
			RETURN Fib(n-1) + Fib(n-2)
		END
	END Fib;

	VAR i: INTEGER;

BEGIN
	FOR i := 0 TO 10 DO
		Out.Int(Fib(i), 0); Out.String(' ')
	END;
	Out.Ln
END Fibonacci.

Real programs from Software Heritage

1 sample mined from derived_datasets/<date>/contents/*.parquet, byte-verified against the SWH archive. Citation-grade qualified SWHIDs preserved.
CPascalG.cp · 1583 B · ext .cp · seen 46× in SWH
via fallback
swh:1:cnt:cb3bbec5178392569ed41b548c5d138b9045526f;origin=https://github.com/k-john-gough/gpcp;anchor=swh:1:rev:2e681545b9cbe872297e2fe308ebcaab27ec5493;path=/gpcp/CPascalG.cp
Open in SWH · Raw bytes (SWH) · GitHub raw
Show source
MODULE CPascalG;
  IMPORT GPCPcopyright;

CONST
  EOFSYM* = 0;  identSym* = 1;  integerSym* = 2;  realSym* = 3;
  CharConstantSym* = 4;  stringSym* = 5;  starSym* = 6;  minusSym* = 7;
  bangSym* = 8;  pointSym* = 9;  equalSym* = 10;  ARRAYSym* = 11;  
  commaSym* = 12; OFSym* = 13;  ABSTRACTSym* = 14;  EXTENSIBLESym* = 15;  
  LIMITEDSym* = 16; RECORDSym* = 17;  lparenSym* = 18;  plusSym* = 19;  
  rparenSym* = 20;  ENDSym* = 21; semicolonSym* = 22;  colonSym* = 23;  
  POINTERSym* = 24;  TOSym* = 25; PROCEDURESym* = 26;  lbrackSym* = 27;  
  rbrackSym* = 28;  uparrowSym* = 29; dollarSym* = 30;  hashSym* = 31;  
  lessSym* = 32;  lessequalSym* = 33; greaterSym* = 34;  greaterequalSym* = 35;
  INSym* = 36;  ISSym* = 37;  ORSym* = 38; slashSym* = 39;  DIVSym* = 40;  
  MODSym* = 41;  andSym* = 42;  NILSym* = 43; tildeSym* = 44;  lbraceSym* = 45;
  rbraceSym* = 46;  pointpointSym* = 47; EXITSym* = 48;  RETURNSym* = 49;  
  NEWSym* = 50;  colonequalSym* = 51;  IFSym* = 52; THENSym* = 53;  
  ELSIFSym* = 54;  ELSESym* = 55;  CASESym* = 56;  barSym* = 57; WHILESym* = 58;
  DOSym* = 59;  REPEATSym* = 60;  UNTILSym* = 61;  FORSym* = 62; BYSym* = 63;  
  LOOPSym* = 64;  WITHSym* = 65;  EMPTYSym* = 66;  BEGINSym* = 67; 
  CONSTSym* = 68;  TYPESym* = 69;  VARSym* = 70;  OUTSym* = 71;  
  IMPORTSym* = 72; MODULESym* = 73;  CLOSESym* = 74;  
  INTERFACESym* = 75;  RESCUESym* = 76; 
  STATICSym* = 77; ENUMSym* = 78; DIV0Sym* = 79; REM0Sym* = 80;
  EVENTSym* = 81; VECTORSym* = 82; NOSYM* = 83; idVariant* = 84;
  bangStrSym* = 85; 
END CPascalG.

Contribute — propose a file extension

Tell us where to find evidence about ComponentPascal (mapped to pl/component-pascal). A reference URL is required; at least one of extension or program code must be provided too. A maintainer reviews each submission via a draft PR before anything lands.
Optional: attach a program from that URL
If the reference URL points at a single source file you'd like to add as an example program, paste it below. The workflow will write it under languages/ComponentPascal/programs/<sha>/. Keep under ~200 lines.
(or open the pre-filled issue directly)
← Component Pascal COMPOOL →