JOSS

JOSS
വികസിപ്പിച്ചത്:Cliff Shaw, RAND
സ്വാധീനിച്ചത്:BASIC, TELCOMP, CAL, FOCAL and MUMPS
Part of a JOSS session at RAND in 1970.

JOSS (JOHNNIAC ഓപ്പൺ ഷോപ്പ് സിസ്റ്റം എന്നതിന്റെ ചുരുക്കപ്പേരാണ്) ആദ്യത്തെ സംവേദനാത്മകവും സമയവും പങ്കിടൽ പ്രോഗ്രാമിംഗ് ഭാഷകളിലൊന്നാണ്. 1963 മേയ് മാസത്തിൽ JOHNNIAC കമ്പ്യൂട്ടറിൽ ജാൻഡ് ക്ലിഫോർഡ് ഷാ റാൻഡ് (RAND) കോപറേഷനിൽ ആദ്യമായി ബീറ്റ ഫോമിൽ JANDS I, വികസിപ്പിച്ചു. 1964 ജനവരിയിൽ അഞ്ച് ടെർമിനലുകൾ സപ്പോർട്ട് ചെയ്താണ് ഈ പദ്ധതി നടപ്പിലാക്കിയത്. പത്ത് ടെർമിനലുകൾ സഹിതം, 1965 ജനുവരിയിൽ വീണ്ടും ഇത് വിന്യസിക്കപ്പെട്ടു.[1][2]

Sample program

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"

ഇത് ഒരു യഥാർത്ഥ സാമ്പിൾ അല്ല, മറിച്ച് ഒരു ആധുനിക സിമുലേറ്ററാണ്. യഥാർത്ഥ JOSS ഭാഷയിൽ നിന്ന് ചില വാക്യങ്ങളിൽ ഇതിൽ വ്യത്യാസങ്ങൾ കാണിക്കുന്നു.

അവലംബങ്ങൾ

  1. ↑ Wexelblat, Richard L, ed. (1981). History of Programming Languages. New York: Academic Press. ISBN 0-12-745040-8.
  2. ↑ Smith, JW (August 1967). "JOSS: Central Processing Routines" (reference user guide). RAND. RM 5270 PR. Retrieved 2012-04-16. {cite journal}: Cite journal requires |journal= (help)
General