steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix stack effects

db4
Slava Pestov 2008-05-07 05:14:25 -05:00
parent 7fb8b3c406
commit 995f1b8076
2 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/benchmark/sockets/sockets.factor
View File

@ -10,7 +10,7 @@ SYMBOL: counter
: server-addr "127.0.0.1" 7777 <inet4> ; : server-addr "127.0.0.1" 7777 <inet4> ;
: server-loop ( server -- ) : server-loop ( server -- )
dup accept [ dup accept drop [
[ [
read1 CHAR: x = [ read1 CHAR: x = [
"server" get dispose "server" get dispose

8
extra/contributors/contributors.factor
View File

@ -1,13 +1,13 @@
! Copyright (C) 2007 Slava Pestov. ! Copyright (C) 2007 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: io.files io.launcher io.styles io hashtables kernel USING: io.files io.launcher io.styles io.encodings.ascii io
sequences sequences.lib assocs system sorting math.parser hashtables kernel sequences sequences.lib assocs system sorting
sets ; math.parser sets ;
IN: contributors IN: contributors
: changelog ( -- authors ) : changelog ( -- authors )
image parent-directory [ image parent-directory [
"git-log --pretty=format:%an" <process-reader> lines "git-log --pretty=format:%an" ascii <process-reader> lines
] with-directory ; ] with-directory ;
: patch-counts ( authors -- assoc ) : patch-counts ( authors -- assoc )