Changeset 11080 in project


Ignore:
Timestamp:
06/24/08 12:55:26 (11 years ago)
Author:
felix winkelmann
Message:

simplification of match pattern

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/4/easyffi/easyffi-base.scm

    r11055 r11080  
    11761176                [((or 'instance 'nonnull-instance) cname sname) (string-append (->string cname) "*" target)]
    11771177                [('instance-ref cname sname) (string-append (->string cname) "&" target)]
    1178                 [`(function ,rtype ,argtypes . ,callconv)
     1178                [('function rtype argtypes . callconv)
    11791179                 (string-append
    11801180                  (foreign-type-declaration rtype "")
Note: See TracChangeset for help on using the changeset viewer.