代码搜索：L

找到约 10,000 项符合「L」的源代码

代码结果 10,000
热门代码： main.c GPIO I2C SPI UART timer interrupt ADC PWM LED
www.eeworm.com/read/428887/8830933

l form.l

# 30dec07abu # (c) Software Lab. Alexander Burger # *Top *Gui *Get *Form *Event *Lock # "*Cnt" "*Lst" "*App" "*Err" "*Post2" "*Stat" "*Ix" "*Chart" "*Cho" (allow (path "@img/") T) (push1 '*JS (allow
·
www.eeworm.com/read/428887/8830937

l test.l

# 29oct07abu # (c) Software Lab. Alexander Burger ### Unit Tests ### # /path/to/p dbg.l lib/test.l (test T (pool (tmp "db"))) (load "test/src/main.l" "test/src/apply.l" "test/src/flow.l"
·
www.eeworm.com/read/428887/8830941

l http.l

# 27nov07abu # (c) Software Lab. Alexander Burger # *Home *Gate *Host *Port *Port1 *Http1 *Chunked # *Sock *Agent *MPartLim *MPartEnd # *Post *Url *Timeout *SesId *ConId # *Cookies "*Cookies" (defau
·
www.eeworm.com/read/428887/8830944

l app.l

# 26jul07abu # (c) Software Lab. Alexander Burger # Exit on error (de *Err (prinl *Pid " ! " (stamp) " [" *Adr " " (host *Adr) "] " *Agent) (show This) (for "X" '(*Gate *Agent *Host *Port *U
·
www.eeworm.com/read/428887/8830947

l lint.l

# 10dec07abu # (c) Software Lab. Alexander Burger # *NoLint (de noLint (X V) (if V (push1 '*NoLint (cons X V)) (or (memq X *NoLint) (push '*NoLint X)) ) ) (de global? (S) (or
·
www.eeworm.com/read/428887/8830950

l edit.l

# 21jan07abu # (c) Software Lab. Alexander Burger # "*F" "*Lst" "*X" "*K" (de edit @ (let *Dbg NIL (setq "*F" (tmp '"edit")) (catch NIL ("edit" (rest)) ) ) ) (de "edit" ("Ls
·
www.eeworm.com/read/428887/8830952

l adm.l

# 27nov07abu # (c) Software Lab. Alexander Burger # *Login *Users *Perms ### Login ### (de login (Nm Pw) (ifn (setq *Login (db 'nm '+User Nm 'pw Pw)) (msg *Pid " ? " Nm) (msg *Pid " *
·
www.eeworm.com/read/428887/8830956

l gcc.l

# 16nov07abu # (c) Software Lab. Alexander Burger (de gcc (S L . @) (out (tmp S ".c") (chdir '@ (prinl "#include \"" (pwd) "/src/pico.h\"")) (here "/**/") ) ~(case *OS (("Linu
·
www.eeworm.com/read/428887/8830957

l xmlrpc.l

# 11may07abu # (c) Software Lab. Alexander Burger # (xmlrpc "localhost" 8080 "foo.bar" 'int 41 'string "abc" ..) (de xmlrpc (Host Port Meth . @) (let? Sock (connect Host Port) (let Xml (tmp
·
www.eeworm.com/read/428887/8830960

l rsa.l

# 10nov04abu # (c) Software Lab. Alexander Burger # *InND # Generate long random number (de longRand (N) (use (R D) (while (=0 (setq R (abs (rand))))) (until (> R N) (unless
·