The Unix Heritage Society mailing list
 help / color / mirror / Atom feed
From: paul@mcjones.org (Paul McJones)
Subject: [TUHS] origin of string.h and ctype.h
Date: Mon, 14 Aug 2017 21:13:41 -0700	[thread overview]
Message-ID: <669C160E-DB0A-4968-94F0-9D02DB8EFC95@mcjones.org> (raw)
In-Reply-To: <20170815035751.GC20775@eureka.lemis.com>

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain, Size: 1078 bytes --]

On Aug 14, 2017, at 8:57 PM, Greg 'groggy' Lehey <grog at lemis.com> wrote:

> It was my understanding that the 704 had this instruction [CAS] too, and
> that it was almost certainly the background for arithmetic IF.
> Unfortunately, no reference I can find can confirm or deny this
> supposition.  Another one is http://www.quadibloc.com/comp/cp0309.htm,
> which compares the instruction sets, but it's not categorical enough
> for my liking.  But if I interpret it correctly, CAS was implemented
> on the 704.
> 
> Do you see a proof of the contrary?

It turns out CAS is used in many places in the source code of the 4K and 8K drum versions of the final IBM 704 FORTRAN II compiler. See http://www.softwarepreservation.org/projects/FORTRAN/index.html#Source_code; in particular:

Transcribed source: http://www.softwarepreservation.org/projects/FORTRAN/source/fortran-ii/fort1.asm.html
Assembly listing: http://www.softwarepreservation.org/projects/FORTRAN/source/fortran-ii/fort1.lst.html

I didn’t try to figure out if this code generates CAS, but it certainly uses it.


  reply	other threads:[~2017-08-15  4:13 UTC|newest]

Thread overview: 18+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
     [not found] <mailman.919.1502645045.3779.tuhs@minnie.tuhs.org>
2017-08-13 21:55 ` Johnny Billquist
2017-08-13 22:26   ` Charles Anthony
2017-08-14  0:02 ` Paul McJones
2017-08-14 16:09   ` Paul Winalski
2017-08-14 17:16     ` Paul McJones
2017-08-15  3:57       ` Greg 'groggy' Lehey
2017-08-15  4:13         ` Paul McJones [this message]
2017-08-15  0:37     ` Dave Horsfall
     [not found] <mailman.1.1502762401.21962.tuhs@minnie.tuhs.org>
2017-08-15  3:06 ` Paul McJones
2017-08-13  1:58 Doug McIlroy
2017-08-13  3:39 ` Steve Johnson
2017-08-13  4:26   ` Dave Horsfall
2017-08-13  5:27     ` Steve Johnson
2017-08-13  5:43       ` Dave Horsfall
2017-08-13 17:24         ` Warner Losh
2017-08-13 18:23           ` Steve Nickolas
2017-08-13  8:42       ` arnold
2017-08-14 11:08     ` Mutiny 

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=669C160E-DB0A-4968-94F0-9D02DB8EFC95@mcjones.org \
    --to=paul@mcjones.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).