CompiledCode.st
changeset 14490 832e236d9824
parent 14488 12675c2b138a
child 15409 058210984b34
child 18011 deb0c3355881
equal deleted inserted replaced
14489:b276fcb0d516 14490:832e236d9824
   323      may change without notice."
   323      may change without notice."
   324 
   324 
   325     ^ flags
   325     ^ flags
   326 
   326 
   327     "Modified: / 30.1.1999 / 14:51:59 / cg"
   327     "Modified: / 30.1.1999 / 14:51:59 / cg"
       
   328 !
       
   329 
       
   330 homeMethod
       
   331     "for common protocol with blocks: if the receiver is a method,
       
   332      return the receiver; otherwise, if its a block, return its home
       
   333      method."
       
   334 
       
   335     ^ self
   328 !
   336 !
   329 
   337 
   330 literalAt:index
   338 literalAt:index
   331     "return a literal element"
   339     "return a literal element"
   332 
   340 
   532     "/ self obsoleteMethodWarning:'use numVars'.
   540     "/ self obsoleteMethodWarning:'use numVars'.
   533     ^ self numVars
   541     ^ self numVars
   534 
   542 
   535     "Modified: / 30.1.1999 / 14:55:42 / cg"
   543     "Modified: / 30.1.1999 / 14:55:42 / cg"
   536     "Created: / 30.1.1999 / 14:55:51 / cg"
   544     "Created: / 30.1.1999 / 14:55:51 / cg"
       
   545 !
       
   546 
       
   547 source
       
   548     ^ self subclassResponsibility.
   537 ! !
   549 ! !
   538 
   550 
   539 !CompiledCode methodsFor:'compiler interface'!
   551 !CompiledCode methodsFor:'compiler interface'!
   540 
   552 
   541 compilerClass
   553 compilerClass
  1857 ! !
  1869 ! !
  1858 
  1870 
  1859 !CompiledCode class methodsFor:'documentation'!
  1871 !CompiledCode class methodsFor:'documentation'!
  1860 
  1872 
  1861 version
  1873 version
  1862     ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.119 2012-11-03 16:32:04 cg Exp $'
  1874     ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.120 2012-11-04 14:13:28 cg Exp $'
  1863 !
  1875 !
  1864 
  1876 
  1865 version_CVS
  1877 version_CVS
  1866     ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.119 2012-11-03 16:32:04 cg Exp $'
  1878     ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.120 2012-11-04 14:13:28 cg Exp $'
  1867 !
  1879 !
  1868 
  1880 
  1869 version_SVN
  1881 version_SVN
  1870     ^ '§ Id: CompiledCode.st 10643 2011-06-08 21:53:07Z vranyj1  §'
  1882     ^ '§ Id: CompiledCode.st 10643 2011-06-08 21:53:07Z vranyj1  §'
  1871 ! !
  1883 ! !