JavaRelease.st
branchdevelopment
changeset 3023 31dc5184bf9a
parent 3010 8b3f1f16a660
child 3027 aed7115ce6e8
equal deleted inserted replaced
3022:506844f3740e 3023:31dc5184bf9a
  1538      Java as_String:'hello world'
  1538      Java as_String:'hello world'
  1539     "
  1539     "
  1540 
  1540 
  1541     "Created: / 07-08-1997 / 21:15:49 / cg"
  1541     "Created: / 07-08-1997 / 21:15:49 / cg"
  1542     "Modified: / 13-06-2013 / 09:04:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
  1542     "Modified: / 13-06-2013 / 09:04:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
       
  1543 ! !
       
  1544 
       
  1545 !JavaRelease::OpenJDK7 methodsFor:'searching'!
       
  1546 
       
  1547 searchForSourcePath
       
  1548 
       
  1549     | jdkHome jdkHomeAlt src_zip |
       
  1550 
       
  1551     super searchForSourcePath.
       
  1552 
       
  1553     "/ Kludge for Debian packages. On Debian boxes
       
  1554     "/ package openjdk-7-source installs src.zip into
       
  1555     "/ `/usr/lib/jvm/java-7-openjdk-i386` instead of
       
  1556     "/ into
       
  1557     "/ `/usr/lib/jvm/java-7-openjdk-common`
       
  1558 
       
  1559     jdkHome := self jdkHome.
       
  1560     (jdkHome endsWith: 'amd64') ifTrue:[ 
       
  1561         jdkHomeAlt := ((jdkHome copyTo: jdkHome size - 5) , 'i386').
       
  1562         src_zip := jdkHomeAlt asFilename / 'src.zip'.
       
  1563         src_zip exists ifTrue:[ 
       
  1564             sourcePath add: src_zip pathName. 
       
  1565         ].
       
  1566     ].
       
  1567 
       
  1568 
       
  1569     "
       
  1570         JavaRelease openJDK7 searchForSourcePath; sourcePath
       
  1571         JavaRelease sunJDK6 searchForSourcePath; sourcePath
       
  1572         JavaRelease openJDK6 searchForSourcePath; sourcePath  
       
  1573         JavaRelease openJDK6 jdkHome  
       
  1574         JavaRelease openJDK6 jreHome  
       
  1575     "
       
  1576 
       
  1577     "Created: / 12-02-2014 / 10:15:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
  1543 ! !
  1578 ! !
  1544 
  1579 
  1545 !JavaRelease::OpenJDK7 methodsFor:'testing'!
  1580 !JavaRelease::OpenJDK7 methodsFor:'testing'!
  1546 
  1581 
  1547 isJava6
  1582 isJava6