| definition: |
wInt :: WuiSpec Int
wInt =
WuiSpec (head,"Illegal integer:",const True)
(checkLegalInput intWidget)
(\wparams -> conditionOf wparams)
(\env wst ->
let input = env (state2cgiRef wst)
in maybe 0 id (readMaybeInt (stripSpaces input)))
where
intWidget render i = let ref free in
(render [textField ref (show i) `addAttr` ("size","6")], cgiRef2state ref)
|
| demand: |
no demanded arguments |
| deterministic: |
possibly non-deterministic operation |
| documentation: |
------------------------------------------------------------------------------ --- A widget for editing integer values. |
| failfree: |
<FAILING> |
| indeterministic: |
referentially transparent operation |
| infix: |
no fixity defined |
| iotype: |
{() |-> {WuiSpec}}
|
| name: |
wInt |
| precedence: |
no precedence defined |
| result-values: |
{WuiSpec}
|
| signature: |
WuiSpec Prelude.Int |
| solution-complete: |
operation might suspend on free variables |
| terminating: |
possibly non-terminating |
| totally-defined: |
possibly non-reducible on same data term |