JOSS (linguagem de programação)

Origem: Wikipédia, a enciclopédia livre.
Ir para: navegação, pesquisa

JOSS (um acrônimo para JOHNNIAC Open Shop System) foi uma das primeiras linguagens de programação interativas de tempo compartilhado.

JOSS I, desenvolvida por J. Clifford Shaw na RAND foi implementada pela primeira vez, em versão beta, no Johnniac computador em Maio de 1963. A implementação completa foi implantada em janeiro de 1964, suportando 5 terminais e a versão final, Joss In, suportando 10 terminais, foi implantada em janeiro de 1965.[1]

JOSS foi escrita em uma linguagem assembly simbólica chamada EasyFox (E e F no alfabeto fonético, os militares E.U. de época). EasyFox também foi desenvolvida por Cliff Shaw.

A linguagem JOSS foi apelidada de "o assitente útil" e é conhecida pela sua interface de conversação. Originalmente fitas verdes/pretas foram usadas em seus terminais, com o verde sendo utilizado para a entrada do usuário e preto para a resposta do computador. Qualquer comando que não era entendido provocava a resposta "Eh?".

JOSS II, foi desenvolvida por Charles L. Baker, W. Joseph Smith, D. Irwin Greenwald, e Edward G. Bryan para o computador PDP-6, entre 1964 e fevereiro de 1966.[2]

Muitos variantes de Joss foram desenvolvidas e aplicadas em uma variedade de plataformas. Algumas dessas variantes permaneceram muito semelhantes ao Joss original: TELCOMP, FOCAL, CAL, CITRAN, ISIS, PIL/I, JEAN (ICT 1900 series); ao passo que outras, como MUMPS, desenvolveram-se em direções distintas.

Exemplo de programa simples[editar | editar código-fonte]

1.1 Demand p,q.
1.2 Stop if q<0 or r(q,2)=0.
1.3 Set a=1.
1.4 Do part 2 while q>1 and a~=0.
1.5 Type a in form 3.
1.6 Stop.

2.1  Do part 20.
2.1  Do part 11 if p<0.
2.2  Do part 12 if p>=q.
2.3  Do part 13 if p=0.
2.4  Done if a=0.
2.5  Set p=p/4 while r(p,4)=0.
2.6  Do part 14 if r(p,2)=0.
2.7  Do part 20.
2.8  Set a=-a if r(p,4)=r(q,4)=3.
2.9  Set s=p, p=q, q=s.
2.95 Do part 20.

11.1 Set a=-a if r(q,4)=3.
11.2 Set p=|p|.
11.3 Do part 20.

12.1 Set p=r(p,q).
12.2 Do part 20.

13.1 Set a=0, p=1, q=1.

14.1 Set a=-a if r(q,8)=3 or r(q,8)=5.
14.2 Set p=p/2.

20.1 Type p, q in form 1 if a=1.
20.2 Type p, q in form 2 if a=-1.

Form 1: "  L(%.0f,%.0f)  ="
Form 2: "  -L(%.0f,%.0f)  ="
Form 3: "  %.0f\n"

Note-se que esta não é uma exemplo original, mas sim um exemplo em um simulador moderno. Existem algumas diferenças sintáticas da língua JOSS original.

Referências

  1. WEXELBLAT, Richard L.(Editor). History of Programming Languages. New York: Academic Press, 1981. 758 p. ISBN 0-12-745040-8
  2. SAMMET, Jean E. Programming Languages: History and Fundamentals. Englewood Cliffs, New Jersey: Prentice Hall, 1969. 785 p. ISBN 0-13-729988-5

Ligações externas[editar | editar código-fonte]

Ícone de esboço Este artigo sobre programação de computadores é um esboço. Você pode ajudar a Wikipédia expandindo-o.