Mercurial > repo
view interps/cfunge/cfunge-src/tests/refc-invalid-deref.b98 @ 9071:581584df6d82
<fizzie> revert 942e964c81c1
author | HackBot |
---|---|
date | Sun, 25 Sep 2016 20:17:31 +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 ; , @