Changeset 37485 in project


Ignore:
Timestamp:
03/29/19 16:50:23 (12 months ago)
Author:
juergen
Message:
 
Location:
wiki/eggref/5
Files:
2 added
1 edited

Legend:

Unmodified
Added
Removed
  • wiki/eggref/5/checks

    r37474 r37485  
    128128(define x 5)
    129129
     130<enscript highlight=scheme>
     131
     132(import checks)
     133
     134(condition-case
     135  (assert* 'x (integer? x) (even? x))
     136  ((exn assert) #f)) ;-> #f
     137
    130138(<< x positive? odd?)
    131139; -> 5
     
    138146
    139147(<<< 'loc x positive? even?)
    140 ; -> error message with predicate even?, location 'loc and name 'x
     148; -> argument-exception
    141149
    142150(<<<% 'loc 'x x positive? even?)
    143 ; -> error message with predicate even?, location 'loc and name 'x
     151; -> result-exception
     152
     153(condition-case
     154  (<<% 'x x integer? even?)
     155  ((exn argument) #f)) ;-> #f
     156
     157</enscript>
    144158
    145159== Last update
    146160
    147 Mar 27, 2019
     161Mar 29, 2019
    148162
    149163== Author
     
    184198== Version History
    185199
     200; 1.3 : dependency on simple-exceptions added
    186201; 1.2 : code cleaned
    187202; 1.1.0 : documentation of named-lambda fixed
Note: See TracChangeset for help on using the changeset viewer.