view interps/cfunge/cfunge-src/tests/concurrent-issues.b98 @ 11321:14314c55571e

<FireFly> ` echo "$(cat wisdom/fonts) , FireFly\'s fonts http://xen.firefly.nu/up/fonts/ & https://twitter.com/FireyFly/status/899965577481129984" >/tmp/a && cp /tmp/a wisdom/fonts && cat wisdom/fonts
author HackBot
date Mon, 15 Jan 2018 22:31:52 +0000
parents 859f9b4339e6
children
line wrap: on
line source

v   ; This file tests concurrency, in places where there has been previous ;
    ; problems in cfunge.                                                  ;

>  #vta"DOOG :1" >:#,_ v
    > zzz@
v                      <

>  #vtzza"DOOG :2" >:#,_ v
    >#vtzz@
      >@
v                        <

>  #vt  ><                       v
    >#vta"DOOG :3">:#,_ a '>9cp@
      > zzz@
v                                <
z
>zz#vt zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzv
    >#vtzzz@                                                                z
      >a"DOOG :4">:#,_@                                                     z
vzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz<

  ; Just testing threading, in certain versions this cause an assertion ;
   >zzzzzzzz@
> #^tz#vt    v
       >zzzz@
v            <




@