Home Explore Help
Sign In
swflint
/
org-mode-mirror
1
0
Fork 0
Files Issues 0 Pull Requests 0 Wiki
Tree: 4985075c28
Branches Tags
org-mode-mir...
/
existing_tools
/
RweaveOrg
/
SweaveSyntaxOrg.R

SweaveSyntaxOrg.R 998 B
History Raw

12345678910111213141516171819 
  1. SweaveSyntaxOrg <- list()
    2. 

  2. SweaveSyntaxOrg$doc <- "^#\\+END_[SR]"
    3. 

  3. SweaveSyntaxOrg$code <- "^#\\+BEGIN_[SR]:?[[:space:]]*(.*)$"
    4. 

  4. SweaveSyntaxOrg$coderef <- "^#\\+[SR]_CODEREF:?[[:space:]]*(.*)$"
    5. 

  5. SweaveSyntaxOrg$docopt <- "^#\\+[SR]_OPTS:?[[:space:]]*(.*)$"
    6. 

  6. SweaveSyntaxOrg$docexpr <- "\\\\[SR]\\{([^\\}]*)\\}"
    7. 

  7. SweaveSyntaxOrg$extension <- "\\.[SRsr]org$"
    8. 

  8. SweaveSyntaxOrg$syntaxname <- "^#\\+[SR]WEAVE_SYNTAX:?[[:space:]]*(.*)$"
    9. 

  9. SweaveSyntaxOrg$input <- "^#\\+[SR]_FILE:?[[:space:]]*(.*)$"
    10. 

  10. SweaveSyntaxOrg$trans <- list()
    11. 

  11. SweaveSyntaxOrg$trans$doc <- "\\\\end{Scode}"
    12. 

  12. SweaveSyntaxOrg$trans$code <- "\\\\begin{Scode}{\\1}"
    13. 

  13. SweaveSyntaxOrg$trans$coderef <- "\\\\Scoderef{\\1}"
    14. 

  14. SweaveSyntaxOrg$trans$docopt <- "\\\\SweaveOpts{\\1}"
    15. 

  15. SweaveSyntaxOrg$trans$docexpr <- "\\\\Sexpr{\\1}"
    16. 

  16. SweaveSyntaxOrg$trans$extension <- ".[SR]org"
    17. 

  17. SweaveSyntaxOrg$trans$syntaxname <- "\\\\SweaveSyntax{SweaveSyntaxLatex}"
    18. 

  18. SweaveSyntaxOrg$trans$input <- "\\\\SweaveInput{\\1}"
    19. 

  19. attr(SweaveSyntaxOrg, "class") <- "SweaveSyntax"
    20.