ParserFlags.st
changeset 3550 fe37dad4150e
parent 3546 a242fdde05dd
child 3575 822e97641a38
equal deleted inserted replaced
3549:c427fab999ae 3550:fe37dad4150e
     9  be provided or otherwise made available to, or used by, any
     9  be provided or otherwise made available to, or used by, any
    10  other person.  No title to or ownership of the software is
    10  other person.  No title to or ownership of the software is
    11  hereby transferred.
    11  hereby transferred.
    12 "
    12 "
    13 "{ Package: 'stx:libcomp' }"
    13 "{ Package: 'stx:libcomp' }"
       
    14 
       
    15 "{ NameSpace: Smalltalk }"
    14 
    16 
    15 Object subclass:#ParserFlags
    17 Object subclass:#ParserFlags
    16 	instanceVariableNames:'warnings warnUnusedVars warnUndeclared warnST80Directives
    18 	instanceVariableNames:'warnings warnUnusedVars warnUndeclared warnST80Directives
    17 		warnSTXHereExtensionUsed warnSTXSpecialComment
    19 		warnSTXHereExtensionUsed warnSTXSpecialComment
    18 		warnUnderscoreInIdentifier warnOldStyleAssignment
    20 		warnUnderscoreInIdentifier warnOldStyleAssignment
   488 
   490 
   489     "Modified: / 07-11-2006 / 10:58:54 / cg"
   491     "Modified: / 07-11-2006 / 10:58:54 / cg"
   490 !
   492 !
   491 
   493 
   492 stcModulePath
   494 stcModulePath
   493     ^ STCModulePath
   495     ^ STCModulePath ? 'modules'
   494 !
   496 !
   495 
   497 
   496 stcModulePath:something
   498 stcModulePath:something
   497     STCModulePath := something.
   499     STCModulePath := something.
   498 !
   500 !
  1936 stcKeepSTIntermediate:something
  1938 stcKeepSTIntermediate:something
  1937     stcKeepSTIntermediate := something.
  1939     stcKeepSTIntermediate := something.
  1938 !
  1940 !
  1939 
  1941 
  1940 stcModulePath
  1942 stcModulePath
  1941     ^ stcModulePath
  1943     ^ stcModulePath  ? 'modules'     
  1942 !
  1944 !
  1943 
  1945 
  1944 stcModulePath:something
  1946 stcModulePath:something
  1945     stcModulePath := something.
  1947     stcModulePath := something.
  1946 !
  1948 !
  2657 ! !
  2659 ! !
  2658 
  2660 
  2659 !ParserFlags class methodsFor:'documentation'!
  2661 !ParserFlags class methodsFor:'documentation'!
  2660 
  2662 
  2661 version
  2663 version
  2662     ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.121 2014-12-19 19:53:24 cg Exp $'
  2664     ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.122 2015-01-20 13:15:31 cg Exp $'
  2663 !
  2665 !
  2664 
  2666 
  2665 version_CVS
  2667 version_CVS
  2666     ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.121 2014-12-19 19:53:24 cg Exp $'
  2668     ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.122 2015-01-20 13:15:31 cg Exp $'
  2667 ! !
  2669 ! !
  2668 
  2670 
  2669 
  2671 
  2670 ParserFlags initialize!
  2672 ParserFlags initialize!