From: pito <pi...@vo...> - 2010-09-18 08:09:07
|
Michael, so I fired up ff and this is what I can see: ok<$,ram> see see 26ea eca0 f00c call ' 26ee eccf f00c call cr 26f2 df20 rcall (see) 26f4 50ed 26f6 10ee 26f8 e1fc bnz 26f2 26fa 50ed 26fc 50ed 26fe 0012 return ok<$,ram> see drop 0e4c 50ed 0e4e 50ed 0e50 0012 return ok<$,ram> see constant 0a64 ecda f00c call create 0a68 d8e2 rcall cell 0a6a da9f rcall negate 0a6c ec6c f00e call 0a70 efbd f003 goto i, ok<$,ram> There is "seen" as well, so this is with "seen": ok<$,ram> see interpret 16f4 dff3 rcall 'source 16f6 ec6d f006 call 2! 16fa daf5 rcall false 16fc dfe8 rcall >in 16fe deeb rcall ! 1700 da1e rcall bl 1702 deaf rcall word 1704 dfef rcall dup 1706 dd9b rcall c@ 1708 dd31 rcall ?0= 170a e04a bz 17a0 170c df2b rcall find 170e dd33 rcall d0= 1710 e033 bz 1778 1712 dc51 rcall 1+ 1714 da1b rcall state 1716 dc9a rcall 0= 1718 dc29 rcall or 171a dd28 rcall ?0= 171c e013 bz 1744 171e a858 1720 d009 bra 1734 1722 da14 rcall state 1724 dd23 rcall ?0= 1726 e106 bnz 1734 1728 ecf5 f006 call (s" 172c 4305 172e 4d4f 1730 3f50 1732 d0f4 bra 191c 1734 9c46 1736 ec15 f005 call execute 173a bc46 173c d7e1 bra 1700 173e 9846 1740 9a46 1742 d7de bra 1700 1744 9846 1746 dfce rcall dup 1748 d86a rcall lit 174a 104c 174c dc8f rcall = 174e dd0e rcall ?0= 1750 e002 bz 1756 1752 8846 1754 d008 bra 1766 1756 9a46 1758 dfc5 rcall dup 175a d861 rcall lit 175c 0ee8 175e dc86 rcall = 1760 dd05 rcall ?0= 1762 e006 bz 1770 1764 8a46 1766 d912 rcall cf, 1768 9055 176a b858 176c 8055 176e d7c8 bra 1700 1770 aa58 1772 d7f9 bra 1766 1774 dba6 rcall in, 1776 d7c4 bra 1700 1778 9846 177a 9a46 177c ec26 f007 call drop 1780 df51 rcall number? 1782 dcf4 rcall ?0= 1784 e006 bz 1792 1786 d9e2 rcall state 1788 dcf1 rcall ?0= 178a e0ba bz 1700 178c ec35 f002 call literal 1790 d7b7 bra 1700 1792 d851 rcall dp> 1794 de8e rcall c@+ 1796 ecea f006 call type 179a daa5 rcall false 179c d8b1 rcall ?abort? 179e d7b0 bra 1700 17a0 ef26 f007 goto drop ok<$,ram> Pito |