File: scheme-define-slash-public

package info (click to toggle)
cgit 1.2.3%2Bgit20250818.80.3346409%2Bgit2.51.0-1
  • links: PTS, VCS
  • area: main
  • in suites: sid
  • size: 58,624 kB
  • sloc: ansic: 313,383; sh: 260,576; perl: 25,871; tcl: 21,754; makefile: 4,192; python: 3,787; javascript: 810; csh: 45
file content (7 lines) | stat: -rw-r--r-- 149 bytes parent folder | download | duplicates (8) 
1
2
3
4
5
6
7
 
(define bar-class%
  (class object%
    (field (info 5))
    (define/public (foo) RIGHT
      (+ info 42)
      (* info ChangeMe))
    (super-new)))