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

db.tuples, timers: few $unchecked-examples turn into $codes

db4
Keita Haga 2011-01-08 22:31:07 +09:00
parent 1aaa0409a1
commit dbfc6ec386
2 changed files with 4 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
basis/db/tuples/tuples-docs.factor
View File

@ -70,14 +70,13 @@ HELP: define-persistent
{ "the name of a database column that maps to the slot" } { "a database type (see " { $link "db.types" } ")" }
} "Throws an error if the slot name (column one from each row) is not a slot in the tuple or its superclases." }
{ $examples
{ $unchecked-example "USING: db.tuples db.types ;"
{ $code "USING: db.tuples db.types ;"
"TUPLE: boat id year name ;"
"boat \"BOAT\" {"
" { \"id\" \"ID\" +db-assigned-id+ }"
" { \"year\" \"YEAR\" INTEGER }"
" { \"name\" \"NAME\" TEXT }"
"} define-persistent"
""
}
} ;

9
basis/timers/timers-docs.factor
View File

@ -22,10 +22,9 @@ HELP: every
{ "timer" timer } }
{ $description "Creates a timer that calls the quotation repeatedly, using " { $snippet "duration" } " as the frequency. The first call of " { $snippet "quot" } " will happen immediately. If the quotation throws an exception, the timer will stop." }
{ $examples
{ $unchecked-example
{ $code
"USING: timers io calendar ;"
"""[ "Hi Buddy." print flush ] 10 seconds every drop"""
""
}
} ;
@ -33,10 +32,9 @@ HELP: later
{ $values { "quot" quotation } { "delay-duration" duration } { "timer" timer } }
{ $description "Sleeps for " { $snippet "duration" } " and then calls a " { $snippet "quot" } ". The user may cancel the timer before " { $snippet "quot" } " runs. This timer is not repeated." }
{ $examples
{ $unchecked-example
{ $code
"USING: timers io calendar ;"
"""[ "Break's over!" print flush ] 15 minutes later drop"""
""
}
} ;
@ -46,10 +44,9 @@ HELP: delayed-every
{ "timer" timer } }
{ $description "Creates a timer that calls " { $snippet "quot" } " repeatedly, waiting " { $snippet "duration" } " before calling " { $snippet "quot" } " the first time and then waiting " { $snippet "duration" } " between further calls. If the quotation throws an exception, the timer will stop." }
{ $examples
{ $unchecked-example
{ $code
"USING: timers io calendar ;"
"""[ "Hi Buddy." print flush ] 10 seconds every drop"""
""
}
} ;