Questions Columns Rows
GitHub icon

BCPL

BCPL - Programming language

< >

BCPL, aka Basic Combined Programming Language, is a programming language created in 1966 by Martin Richards.

#150on PLDB 57Years Old

BCPL ("Basic Combined Programming Language"; or 'Before C Programming Language' (a common humorous backronym) ) is a procedural, imperative, and structured computer programming language. Originally intended for writing compilers for other languages, BCPL is no longer in common use. However, its influence is still felt because a stripped down and syntactically changed version of BCPL, called B, was the language on which the C programming language was based. Read more on Wikipedia...


Example from the web:
GET "LIBHDR" LET START() = VALOF $( FOR I = 1 TO 5 DO WRITEF("%N! = %I4*N", I, FACT(I)) RESULTIS 0 $) AND FACT(N) = N = 0 -> 1, N * FACT(N - 1)
Example from hello-world:
GET "LIBHDR" LET START() BE $( WRITES("Hello World*N") $)
// Hello world in BCLP GET "libhdr" LET start() = VALOF $( writes("Hello world*N") RESULTIS 0 $)
Example from Wikipedia:
GET "LIBHDR" GLOBAL $( COUNT: 200 ALL: 201 $) LET TRY(LD, ROW, RD) BE TEST ROW = ALL THEN COUNT聽:= COUNT + 1 ELSE $( LET POSS = ALL & ~(LD | ROW | RD) UNTIL POSS = 0 DO $( LET P = POSS & -POSS POSS聽:= POSS - P TRY(LD + P << 1, ROW + P, RD + P >> 1) $) $) LET START() = VALOF $( ALL聽:= 1 FOR I = 1 TO 12 DO $( COUNT聽:= 0 TRY(0, 0, 0) WRITEF("%I2-QUEENS PROBLEM HAS聽%I5 SOLUTIONS*N", I, COUNT) ALL聽:= 2 * ALL + 1 $) RESULTIS 0 $)

View source

- Build the next great programming language Search Add Language Features Creators Resources About Blog Acknowledgements Stats Sponsor Traffic Traffic Today Day 267 feedback@pldb.com Logout