[hercules-390] IBM System/360 emulator written in APL

[[e-mail] [hercules-390]]

I found this conversation on another forum some weeks ago...

post ---
Long ago I found an IBM 360 emulator written in 2 pages of APL and published
in some technical magazine. Anyone recall this and have a copy? (I've found
websites with copies of similar articles, but lacked the straight-up APL code.)

reply---

You're not thinking of Falkoff/Iverson/Sussenguth's A Formal Description of
SYSTEM/360, are you? http://www.cs.trinity.edu/~ jhowland/class.files.cs2321. html/. http://www.cs.trinity.edu/~jhowland/class.files.cs2321.html/..

answer ---

Close, but not quite. As I recall (some 20 years ago) it had two pages of
actual APL code (not notation, real runnable code).


--------------------------------------------------------------------------------------------------------

I ( William Gallant ) also possess and have looked at the Falkoff/Iverson
Formal Description of System/360. This definitely is not what contains
an IBM 360 emulator in "two pages" of runnable APL code.
Does anyone know anything about this technical magazine article with
an IBM 360 emulator in two pages of APL code?


-- William Gallant

[[e-mail] [hercules-390]]

APL was originally a hardware description language, not a programming language. The documentation for S/360 in the IBM Systems Journal is written in APL. I don't believe that it is intended to be runnable.

[Tony Harminc [e-mail] [hercules-390]]

Post by ***@ugcs.caltech.edu [hercules-390]
APL was originally a hardware description language, not a programming
language. The documentation for S/360 in the IBM Systems Journal is
written in APL. I don't believe that it is intended to be runnable.

All APL is "runnable". What would it mean for there to be unrunnable APL?
Of course you can have snippets, as in any programming language, that are
not complete enough to do anything useful. But APL is made up of
expressions that have a value, and if one such expression can't be
evaluated, I'd say it has a bug or a syntax error or an undefined variable
or the like.

Tony H.

[Kevin Monceaux [e-mail] [hercules-390]]

Post by Tony Harminc ***@gmail.com [hercules-390]
All APL is "runnable". What would it mean for there to be unrunnable APL?

I don't know APL, but if I were to hazard a guess I'd suspect unrunnable APL
would mean a syntax error somewhere.

[William Gallant [e-mail] [hercules-390]]

-----------------------------------------------------------------------------------------------
"Runnable" was meant as "this is a complete APL program" which could behand-typed and entered and then executed ( it was only two pages long ).The post i found on "https://news.ycombinator.com" statesthat what is being mentioned is a complete System/360 emulator written in APL.It was found in a Tech Magazine article some 20 years ago,My guess is only a small handful of people ever saw the tech magazine articleand it has since been forgotten??
--  William Gallant 

Post by Tony Harminc ***@gmail.com [hercules-390]
All APL is "runnable". What would it mean for there to be unrunnable APL?

I don't know APL, but if I were to hazard a guess I'd suspect unrunnable APL
would mean a syntax error somewhere.
--
Kevin
http://www.RawFedDogs.net
http://www.Lassie.xyz
http://www.WacoAgilityGroup.org
Bruceville, TX

What's the definition of a legacy system? One that works!
Errare humanum est, ignoscere caninum.
#yiv1967220777 #yiv1967220777 -- #yiv1967220777ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv1967220777 #yiv1967220777ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv1967220777 #yiv1967220777ygrp-mkp #yiv1967220777hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv1967220777 #yiv1967220777ygrp-mkp #yiv1967220777ads {margin-bottom:10px;}#yiv1967220777 #yiv1967220777ygrp-mkp .yiv1967220777ad {padding:0 0;}#yiv1967220777 #yiv1967220777ygrp-mkp .yiv1967220777ad p {margin:0;}#yiv1967220777 #yiv1967220777ygrp-mkp .yiv1967220777ad a {color:#0000ff;text-decoration:none;}#yiv1967220777 #yiv1967220777ygrp-sponsor #yiv1967220777ygrp-lc {font-family:Arial;}#yiv1967220777 #yiv1967220777ygrp-sponsor #yiv1967220777ygrp-lc #yiv1967220777hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv1967220777 #yiv1967220777ygrp-sponsor #yiv1967220777ygrp-lc .yiv1967220777ad {margin-bottom:10px;padding:0 0;}#yiv1967220777 #yiv1967220777actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv1967220777 #yiv1967220777activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv1967220777 #yiv1967220777activity span {font-weight:700;}#yiv1967220777 #yiv1967220777activity span:first-child {text-transform:uppercase;}#yiv1967220777 #yiv1967220777activity span a {color:#5085b6;text-decoration:none;}#yiv1967220777 #yiv1967220777activity span span {color:#ff7900;}#yiv1967220777 #yiv1967220777activity span .yiv1967220777underline {text-decoration:underline;}#yiv1967220777 .yiv1967220777attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv1967220777 .yiv1967220777attach div a {text-decoration:none;}#yiv1967220777 .yiv1967220777attach img {border:none;padding-right:5px;}#yiv1967220777 .yiv1967220777attach label {display:block;margin-bottom:5px;}#yiv1967220777 .yiv1967220777attach label a {text-decoration:none;}#yiv1967220777 blockquote {margin:0 0 0 4px;}#yiv1967220777 .yiv1967220777bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv1967220777 .yiv1967220777bold a {text-decoration:none;}#yiv1967220777 dd.yiv1967220777last p a {font-family:Verdana;font-weight:700;}#yiv1967220777 dd.yiv1967220777last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv1967220777 dd.yiv1967220777last p span.yiv1967220777yshortcuts {margin-right:0;}#yiv1967220777 div.yiv1967220777attach-table div div a {text-decoration:none;}#yiv1967220777 div.yiv1967220777attach-table {width:400px;}#yiv1967220777 div.yiv1967220777file-title a, #yiv1967220777 div.yiv1967220777file-title a:active, #yiv1967220777 div.yiv1967220777file-title a:hover, #yiv1967220777 div.yiv1967220777file-title a:visited {text-decoration:none;}#yiv1967220777 div.yiv1967220777photo-title a, #yiv1967220777 div.yiv1967220777photo-title a:active, #yiv1967220777 div.yiv1967220777photo-title a:hover, #yiv1967220777 div.yiv1967220777photo-title a:visited {text-decoration:none;}#yiv1967220777 div#yiv1967220777ygrp-mlmsg #yiv1967220777ygrp-msg p a span.yiv1967220777yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv1967220777 .yiv1967220777green {color:#628c2a;}#yiv1967220777 .yiv1967220777MsoNormal {margin:0 0 0 0;}#yiv1967220777 o {font-size:0;}#yiv1967220777 #yiv1967220777photos div {float:left;width:72px;}#yiv1967220777 #yiv1967220777photos div div {border:1px solid #666666;height:62px;overflow:hidden;width:62px;}#yiv1967220777 #yiv1967220777photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv1967220777 #yiv1967220777reco-category {font-size:77%;}#yiv1967220777 #yiv1967220777reco-desc {font-size:77%;}#yiv1967220777 .yiv1967220777replbq {margin:4px;}#yiv1967220777 #yiv1967220777ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv1967220777 #yiv1967220777ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv1967220777 #yiv1967220777ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv1967220777 #yiv1967220777ygrp-mlmsg select, #yiv1967220777 input, #yiv1967220777 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv1967220777 #yiv1967220777ygrp-mlmsg pre, #yiv1967220777 code {font:115% monospace;}#yiv1967220777 #yiv1967220777ygrp-mlmsg * {line-height:1.22em;}#yiv1967220777 #yiv1967220777ygrp-mlmsg #yiv1967220777logo {padding-bottom:10px;}#yiv1967220777 #yiv1967220777ygrp-msg p a {font-family:Verdana;}#yiv1967220777 #yiv1967220777ygrp-msg p#yiv1967220777attach-count span {color:#1E66AE;font-weight:700;}#yiv1967220777 #yiv1967220777ygrp-reco #yiv1967220777reco-head {color:#ff7900;font-weight:700;}#yiv1967220777 #yiv1967220777ygrp-reco {margin-bottom:20px;padding:0px;}#yiv1967220777 #yiv1967220777ygrp-sponsor #yiv1967220777ov li a {font-size:130%;text-decoration:none;}#yiv1967220777 #yiv1967220777ygrp-sponsor #yiv1967220777ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv1967220777 #yiv1967220777ygrp-sponsor #yiv1967220777ov ul {margin:0;padding:0 0 0 8px;}#yiv1967220777 #yiv1967220777ygrp-text {font-family:Georgia;}#yiv1967220777 #yiv1967220777ygrp-text p {margin:0 0 1em 0;}#yiv1967220777 #yiv1967220777ygrp-text tt {font-size:120%;}#yiv1967220777 #yiv1967220777ygrp-vital ul li:last-child {border-right:none !important;}#yiv1967220777

[[e-mail] [hercules-390]]

Still looking for someone who might know here i can find the 20 or so year old article containing a System/360 emulator
ritten in APL. This is NOT the Falkoff, Sussenguth, Iverson article describing the System/360 hardware from the 60's.
It is only 20 or a fe more years old.

- William Gallant

[[e-mail] [hercules-390]]

"Still looking for someone who might know here i can find the 20 or so year old article containing a System/360 emulator
ritten in APL. This is NOT the Falkoff, Sussenguth, Iverson article describing the System/360 hardware from the 60's.
It is only 20 or a fe more years old."


Hi William,

I have lost track of time these last few years. When Juergen and I were working on moving the MTS APL workspaces to MVT I ran across either a workspace routine for an emulator or a Google Book which had about 3 pages of APL code for a 360 emulator.

I no longer remember what it was I searched on or if it turned up the one you mention above.

Sorry to not be too much help but there is or was something along these lines dug up back then.

Phil