代码搜索：idel
找到约 314 项符合「idel」的源代码
代码结果 314
www.eeworm.com/read/125133/6033059
idel bmh.idel
\ Boyer-Moore-Horspool string matching
string: pattern "right"
bss-data: buffer 32768
def 0 1 main
pattern.addr pattern.size bmh-init
buffer buffer reading buffer - 500 spin u. '\n' emit
www.eeworm.com/read/125133/6033060
idel random.idel
def 0 1 main
3000000 rands
rand u. '\n' emit
0 ;
def 1 0 rands
{ n --
n if rand { _ -- } n 1 - rands then } ;
#include "../tests/random.idel"
#include "../tests/udot.idel"
www.eeworm.com/read/125133/6033062
idel rev.idel
#define vsize 10000
bss-data: v 40000
def 0 1 main
vsize iota
1000 loop
v @ u. '\n' emit
0 ;
#include "../tests/udot.idel"
#include "../tests/rev.idel"
www.eeworm.com/read/125133/6033064
idel tak.idel
def 0 1 main 27 18 9 tak u. '\n' emit 0 ;
#include "../tests/udot.idel"
#include "../tests/tak.idel"
www.eeworm.com/read/125133/6033073
idel nfib.idel
def 0 1 main 34 nfib u. '\n' emit 0 ;
#include "../tests/udot.idel"
def 1 1 nfib
{ n -- n 2 < if 1
else n 1 - nfib n 2 - nfib + 1 +
then } ;
www.eeworm.com/read/125133/6033074
idel dump.idel
def 2 0 dump-loop
{ a n -- n if a @ x. a separator emit a 4 + n 1 - dump-loop then } ;
def 1 1 separator
4 + 31 and if ' ' else '\n' then ;
def 1 0 x. 7 x.loop ;
def 2 0 x.loop
{ u n
www.eeworm.com/read/125133/6033100
h idel.h
/*
* The Idel virtual machine -- public interface.
* Copyright (C) 2001-2002 Darius Bacon
*/
#ifndef _IDEL
#define _IDEL
enum { idel_major_version = 0 };
enum { idel_minor_version = 1 };
#includ
www.eeworm.com/read/125133/6032785
idel sha1.idel
\ Mostly generated by examples/borednet/sha1.py
\ Compute the SHA-1 hash of a string of 2 million "a"s.
ints: H
0 0 0 0 0
;ints
ints: W
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
;ints
ints: hbits 0 ;ints
i
www.eeworm.com/read/125133/6032802
idel tak-test.idel
def 0 1 main 18 12 6 tak u. '\n' emit 0 ;
#include "udot.idel"
#include "tak.idel"