Mercurial > repo
view interps/cfunge/cfunge-src/tests/refc-invalid-deref.b98 @ 8607:60dfd7c0ad78
<int-e> learn_append comonad They are hard to get into.
author | HackBot |
---|---|
date | Sat, 25 Jun 2016 18:05:11 +0000 |
parents | 859f9b4339e6 |
children |
line wrap: on
line source
v >0a"CFER oN" >:#,_@ ; This program tests invalid D in REFC ; >#^"CFER"4(nv v < >1. #v 0D "DAB" >:#,_ @ ; Derefence 0 ; >a"DOOG">:#,_v v < >2. #v 01-D "DAB" >:#,_ @ ; Derefence negative ; >a"DOOG">:#,_v v < >3. 45+ #v D "DAB" >:#,_ @ ; Derefence postive ; >a"DOOG">:#,_v v < >4. #v nD "DAB" >:#,_ @ ; Derefence on empty stack ; >a"DOOG">:#,_v v < a ; That's all ; , @