Lines Matching refs:tag
46 (* Property tag to indicate which arguments to a function are functions
48 val closureFreeArgsTag: int list Universal.tag = Universal.tag()
453 | insert(TagTest{test, tag, maxTag}) = BICTagTest{test=insert test, tag=tag, maxTag=maxTag}
488 { tag: word, test: codetree, caseType: caseType } option;
514 then SOME{tag=toShort c1, test=arg2, caseType = CaseWord}
519 then SOME{tag=toShort c2, test=arg1, caseType = CaseWord}
526 | findCase(BICTagTest { test, tag, maxTag }) =
527 SOME { tag=tag, test=test, caseType=CaseTag maxTag }
537 | SOME { tag=caseTags, test=caseTest, caseType=caseCaseTest } =>
674 | CaseTag maxTag => BICTagTest { test=test, tag=t, maxTag=maxTag }