Gentoo Websites Logo
Go to: Gentoo Home Documentation Forums Lists Bugs Planet Store Wiki Get Gentoo!
View | Details | Raw Unified | Return to bug 91970 | Differences between
and this patch

Collapse All | Expand All

(-)plt.old/src/mzscheme/src/schminc.h (-1 / +1 lines)
Lines 10-18 Link Here
10 
   `make startup' to recreate the cstartup.inc file, set
 10 
   `make startup' to recreate the cstartup.inc file, set
11 
   EXPECTED_PRIM_COUNT to the new value, and then USE_COMPILED_STARTUP
 11 
   EXPECTED_PRIM_COUNT to the new value, and then USE_COMPILED_STARTUP
12 
   can be set to 1 again.  */
 12 
   can be set to 1 again.  */
13 

          13
          

        

          
            

              14
              
#define USE_COMPILED_STARTUP 1


              14
              
#define USE_COMPILED_STARTUP 0

            

        

          15
          

          15
          

        

        

          16
          
#define EXPECTED_PRIM_COUNT 816

          16
          
#define EXPECTED_PRIM_COUNT 816

        

        

          17
          

          17
          

        

        

          18
          
#ifdef MZSCHEME_SOMETHING_OMITTED

          18
          
#ifdef MZSCHEME_SOMETHING_OMITTED

        



(-)plt.old/src/mzscheme/src/startup.ss
      (+2 lines)




  

    
      
            Lines 3517-3524
          
      
      
        Link Here
      
    
  

        

          3517
          
			 (and v (build-path v "collects"))))

          3517
          
			 (and v (build-path v "collects"))))

        

        

          3518
          
	    (lambda () (find-executable-path (find-system-path 'exec-file) "collects"))

          3518
          
	    (lambda () (find-executable-path (find-system-path 'exec-file) "collects"))

        

        

          3519
          
	    ;; When binary is in bin/ subdir:

          3519
          
	    ;; When binary is in bin/ subdir:

        

        

          3520
          
	    (lambda () (find-executable-path (find-system-path 'exec-file) (build-path 'up "collects")))

          3520
          
	    (lambda () (find-executable-path (find-system-path 'exec-file) (build-path 'up "collects")))

        

            

              
              
              3521
              
	    ;; When binary is in bin/ subdir AND collects is in ../share/mzscheme

            

            

              3522
              
            (lambda () (find-executable-path (find-system-path 'exec-file) (build-path 'up "share" "mzscheme" "collects")))

            

        

          3521
          
	    ;; When binary is in .bin/<platform> subdir:

          3523
          
	    ;; When binary is in .bin/<platform> subdir:

        

        

          3522
          
	    (lambda () (find-executable-path (find-system-path 'exec-file) (build-path 'up 'up "collects")))

          3524
          
	    (lambda () (find-executable-path (find-system-path 'exec-file) (build-path 'up 'up "collects")))

        

        

          3523
          
	    ;; When binary is in bin/<appname>.app/Contents/Macos subdir:

          3525
          
	    ;; When binary is in bin/<appname>.app/Contents/Macos subdir:

        

        

          3524
          
	    (lambda () (find-executable-path (find-system-path 'exec-file) (build-path 'up 'up 'up "collects")))))

          3526
          
	    (lambda () (find-executable-path (find-system-path 'exec-file) (build-path 'up 'up 'up "collects")))))

        






  

  Return to bug 91970