<div dir="ltr">After a decade of coding in AOS, I still miss NO.</div><div class="gmail_extra"><br><br><div class="gmail_quote">On Sat, Nov 30, 2013 at 5:00 AM,  <span dir="ltr">&lt;<a href="mailto:oberon-request@lists.inf.ethz.ch" target="_blank">oberon-request@lists.inf.ethz.ch</a>&gt;</span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Send Oberon mailing list submissions to<br>
        <a href="mailto:oberon@lists.inf.ethz.ch">oberon@lists.inf.ethz.ch</a><br>
<br>
To subscribe or unsubscribe via the World Wide Web, visit<br>
        <a href="https://lists.inf.ethz.ch/mailman/listinfo/oberon" target="_blank">https://lists.inf.ethz.ch/mailman/listinfo/oberon</a><br>
or, via email, send a message with subject or body &#39;help&#39; to<br>
        <a href="mailto:oberon-request@lists.inf.ethz.ch">oberon-request@lists.inf.ethz.ch</a><br>
<br>
You can reach the person managing the list at<br>
        <a href="mailto:oberon-owner@lists.inf.ethz.ch">oberon-owner@lists.inf.ethz.ch</a><br>
<br>
When replying, please edit your Subject line so it is more specific<br>
than &quot;Re: Contents of Oberon digest...&quot;<br>
<br>
<br>
Today&#39;s Topics:<br>
<br>
   1. Re: Oberon-2 cross compiler source for INMOS T800 Transputer<br>
      available now (OP2/V4) (eas lab)<br>
<br>
<br>
----------------------------------------------------------------------<br>
<br>
Message: 1<br>
Date: Fri, 29 Nov 2013 20:04:50 +0200<br>
From: eas lab &lt;<a href="mailto:lab.eas@gmail.com">lab.eas@gmail.com</a>&gt;<br>
Subject: Re: [Oberon] Oberon-2 cross compiler source for INMOS T800<br>
        Transputer available now (OP2/V4)<br>
To: ETH Oberon and related systems &lt;<a href="mailto:oberon@lists.inf.ethz.ch">oberon@lists.inf.ethz.ch</a>&gt;<br>
Message-ID:<br>
        &lt;<a href="mailto:CAN3-DLGb9LyufHqMSRnkGqvXEA-4TEyTeFD4jQfm6s6T%2B1fDzg@mail.gmail.com">CAN3-DLGb9LyufHqMSRnkGqvXEA-4TEyTeFD4jQfm6s6T+1fDzg@mail.gmail.com</a>&gt;<br>
Content-Type: text/plain; charset=UTF-8<br>
<br>
I don&#39;t appreciate &#39;these-days-twitter-style&#39; minimal content burps.<br>
So here is some contents:-<br>
ETHO is much less about the language, than the unsurpassed total OS, where you<br>
see everytihing on the single screen, without the need to bob-yo-head upNdown<br>
between keybrd &amp; screen.<br>
<br>
LinuxEthOberon builds on this to newly discovered extremes.<br>
My original 40GB IDE for ETHO from the 90s started failing; and I have some<br>
valuable legal files on some of the 48 partitions.<br>
<br>
LNO can read these, on the same PC that&#39;s running Linux for other tasks.<br>
LEO is more convenient/versatile than LNO, but I was astounded that LEO<br>
can ALSO read the AosFS partitions of old:nativeOberon.<br>
<br>
It doesn&#39;t directly fetch and display file contents.<br>
But you can: from linux -&gt; running LEO -&gt; run any *nix command.<br>
And of course the *nix command repetoire is massive.<br>
<br>
This is linux leveraging LEO leveraging Linux!<br>
<br>
So with &#39;try&#39; being a symbolic-link to an AosFS partition on the<br>
old NativeOberon disk something like:<br>
 read the whole NO partition &amp;<br>
 delete all non-ascii-chars &amp;<br>
 fold the lines &lt; 80-char-len &amp;<br>
 print all lines to a file, which contain the critical name that we&#39;re<br>
searching;<br>
allows you to search the whole partition, and extract the critical text.<br>
<br>
Previously I remember examining the AosFS structure.<br>
IIRC Partitions.Mod has got nice clear code, and it&#39;s not difficult to extract<br>
the dir &amp; file structure. So the actual files could perhaps be accessed.<br>
I wonder what would happen by &#39;porting&#39; Partitions.Mode to LEO?<br>
--- Here&#39;s actual logged code and results including my errors:--<br>
&gt;&gt; -&gt; System.Execute cat try | tr -d \\200-\\377 | hexdump -C | head<br>
&gt;&gt; == looks OK. So count lines containing &quot;Heus&quot;. Let&#39;s see line-count ?<br>
&gt;&gt;<br>
&gt;&gt; -&gt; System.Execute cat try | tr -d \\200-\\377 | fmt | grep Heus | wc -l<br>
&gt;&gt; ==1 &lt;- ! I can see *MANY* &quot;Heus&quot; in many of the different &#39;folded&#39; lines!<br>
&gt;&gt;<br>
&gt;&gt; -&gt; System.Execute cat try | tr -d \\200-\\377 | fmt | wc<br>
&gt;&gt; == 1000653 9864738 72189840 &lt;- 100Klines for 72MB<br>
&gt;&gt;<br>
&gt;&gt; What am I doing wrong, to fail to `grep &lt;all lines containing &quot;Heus&quot;&gt;?<br>
&gt;<br>
&gt; Your &#39;tr&#39; command is leaving behind a lot of non-printing characters in<br>
&gt; the \000 to \037 range, which is going to cause &#39;grep&#39; to report<br>
&gt; &quot;non-ASCII&quot; and may be seriously confusing the &#39;fmt&#39; command.  You do<br>
&gt; need to preserve formatting characters such as \n, \t, \r, but you should<br>
&gt; delete the others.  Try this:<br>
&gt;<br>
&gt;      tr -d \\000-\\007\\016-\\037\\177-\\377<br>
&gt;<br>
&gt; That leaves the just the range \010 (BS) through \015 (CR) and the<br>
&gt; ASCII characters \040 (SPACE) through \176 (~).<br>
<br>
OK, afterwards I thought of the (chars &lt; Octal_37), like &lt;bell&gt;.<br>
I&#39;ll test and file-away your tr-version.<br>
Perhaps `strings` is appropriate.<br>
---- end of USEnet query:-------------<br>
<br>
For non*nix users:<br>
   cat try | tr -d \\200-\\377 | fmt | grep Heus | wc -l<br>
means: output file:try [the whole partition] &amp;<br>
    delete all chars between Octal(200...377) &amp;<br>
    use the `format` filter to &lt;clean up&gt; the lines of text &amp;<br>
    output only lines containing &quot;Heus&quot; &amp;<br>
    count and list newline, word, and byte of previous stage.<br>
<br>
So with LEO, you get the superb HCI of ETHO, PLUS the massive facilities of<br>
the *nix industry.<br>
<br>
== Chris Glur.<br>
<br>
Did I mention that it&#39;s free?<br>
Provided you can detach yourself from the herd....<br>
<br>
<br>
<br>
On 11/27/13, &quot;??z?u??n??s ?o?&quot; &lt;<a href="mailto:scruty@users.sourceforge.net">scruty@users.sourceforge.net</a>&gt; wrote:<br>
&gt; <a href="http://modulaware.com/mdlt/?n=89#t800-op2" target="_blank">http://modulaware.com/mdlt/?n=89#t800-op2</a><br>
&gt;<br>
&gt; written in 1990 by Stephane Micheloud.<br>
&gt;<br>
&gt; since 2013 there&#39;s a free open-source Transputer emulator; follow link.<br>
&gt;<br>
&gt; --<br>
&gt; <a href="mailto:Oberon@lists.inf.ethz.ch">Oberon@lists.inf.ethz.ch</a> mailing list for ETH Oberon and related systems<br>
&gt; <a href="https://lists.inf.ethz.ch/mailman/listinfo/oberon" target="_blank">https://lists.inf.ethz.ch/mailman/listinfo/oberon</a><br>
&gt;<br>
<br>
<br>
<br>
------------------------------<br>
<br>
--<br>
<a href="mailto:Oberon@lists.inf.ethz.ch">Oberon@lists.inf.ethz.ch</a> mailing list for ETH Oberon and related systems<br>
<a href="https://lists.inf.ethz.ch/mailman/listinfo/oberon" target="_blank">https://lists.inf.ethz.ch/mailman/listinfo/oberon</a><br>
<br>
<br>
End of Oberon Digest, Vol 114, Issue 7<br>
**************************************<br>
</blockquote></div><br></div>