Newsgroups: comp.sys.transputer
From: obeloeer@uni-paderborn.de (Wolfgang Obeloeer)
Subject: Re: PEEK/POKE in OCCAM
Organization: Uni-GH Paderborn, Germany
Date: 24 Mar 1994 09:35:51 GMT
Message-ID: <1994Mar24.102407@uni-paderborn.de>

Wy don't you use assembler.
I think the following PROC's are possible solutions.

PROC peek (INT ad, INT val)
  SEQ
    GUY
      LDL ad
      LDNL 0
      STL val
:

PROC poke (int ad, int val)
  SEQ
    GUY
      LDL val
      LDL ad
      STNL 0
:

W. Obeloeer

