Changeset 21760 in project


Ignore:
Timestamp:
12/01/10 21:49:53 (10 years ago)
Author:
felix winkelmann
Message:

fps modularization

Location:
release/4/fps/branches/backend-test
Files:
1 edited
1 moved

Legend:

Unmodified
Added
Removed
  • release/4/fps/branches/backend-test/fps-core.scm

    r21704 r21760  
    1 ;;;; fps.scm
     1;;;; fps-core.scm
    22
    3 (module fps
     3
     4(module fps-core
    45    ( ;; constants
    56     pi 1/4pi 1/2pi 3/4pi 5/4pi 3/2pi 7/4pi 2pi
     
    103104     channel?
    104105     show
    105      show-w/ps2-text-channel
    106      ps2-text-channel
    107106     close-channel
    108107
     
    124123     deg->rad rad->deg
    125124     inch
     125
     126     ;; internals for channel-definitions
     127     ;;XXX
    126128     )
    127129
     
    155157  (include "fps.bitmap")
    156158  (include "fps.options")
    157   (include "ps.path")
    158   (include "ps.misc")
    159159
    160160  )
  • release/4/fps/branches/backend-test/fps.setup

    r21355 r21760  
    1 (compile -s -O2 -d1 fps.scm -j fps)
    2 (compile -s -O2 -d0 fps.import.scm)
    3 (compile -c -O2 -d1 fps.scm)
     1;;;; fps.setup -*- Scheme -*-
     2
     3
     4(compile -s -O3 -d1 fps-core.scm -J)
     5(compile -s -O3 -d0 fps-core.import.scm)
     6(compile -s -O3 -d1 fps-ps.scm -J)
     7(compile -s -O3 -d0 fps-ps.import.scm)
     8(compile -s -O3 -d1 fps.scm -J)
     9(compile -s -O3 -d0 fps.import.scm)
    410
    511(handle-exceptions ex #f
     
    814(install-extension
    915 'fps
    10  '("fps.so" "fps.import.so" "AFM" "fps-ref.txt" "fps-tutorial.txt"
    11    "fps.o")
    12  '((version "1.1.3")
    13    (documentation "fps.html")
    14    (static "fps.o")))
     16 '("fps.so" "fps.import.so"
     17   "fps-ps.so" "fps-ps.import.so"
     18   "fps-core.so" "fps-core.import.so"
     19   "AFM")
     20 '((version "1.1.4")))
Note: See TracChangeset for help on using the changeset viewer.