python source code of test_language

Project: rpy2 (GitHub Link)

rpy2-master
- gpl-2.0.txt
- .github
  - ISSUE_TEMPLATE
    - issue-or-bug-report.md
    - feature_request.md
  - workflows
    - pythonpublish.yml
    - pythonpackage.yml
    - sphinx-doc.yml
- AUTHORS
- NEWS
- readthedocs.yml
- LICENSE
- rpy2
  - rinterface_lib
    - openrlib.py
    - R_API.h
    - embedded.py
    - R_API_eventloop.c
    - embedded_mswin.py
    - conversion.py
    - RPY2.h
    - ffi_proxy.py
    - bufferprotocol.py
    - na_values.py
    - memorymanagement.py
    - __init__.py
    - R_API_eventloop.h
    - sexp.py
    - callbacks.py
    - _rinterface_capi.py
  - rlike
    - container.py
    - functional.py
    - indexing.py
    - __init__.py
  - ipython
    - html.py
    - ipython-COPYING.txt
    - rmagic.py
    - __init__.py
    - ggplot.py
  - _rinterface_cffi_build.py
  - situation.py
  - __init__.py
  - robjects
    - numpy2ri.py
    - environments.py
    - pandas2ri.py
    - robject.py
    - lib
      - dplyr.py
      - dbplyr.py
      - tidyr.py
      - grid.py
      - grdevices.py
      - ggplot2.py
      - __init__.py
    - functions.py
    - packages.py
    - conversion.py
    - vectors.py
    - constants.py
    - packages_utils.py
    - __init__.py
    - help.py
    - language.py
    - methods.py
  - tests
    - rlike
      - test_container.py
      - test_indexing.py
      - test_functional.py
    - ipython
      - test_html.py
      - test_rmagic.py
      - test_ggplot.py
      - __init__.py
    - __init__.py
    - robjects
      - test_packages_utils.py
      - test_pandas_conversions.py
      - test_serialization.py
      - test_vector_extractdelegator.py
      - test_robjects.py
      - test_conversion.py
      - test_formula.py
      - test_conversion_numpy.py
      - lib
        test_grid.py
        test_tidyr.py
        test_grdevices.py
        test_dbplyr.py
        test_ggplot2.py
        test_dplyr.py
      - test_environment.py
      - test_array.py
      - test_vector_factor.py
      - test_rs4.py
      - test_methods.py
      - test_translated_function.py
      - test_language.py
      - __init__.py
      - test_vector.py
      - test_vector_datetime.py
      - test_help.py
      - test_function.py
      - test_packages.py
      - test_dataframe.py
    - utils.py
    - rinterface
      - test_noinitialization.py
      - test_embedded_r.py
      - test_callbacks.py
      - test_vector_pairlist.py
      - test_memorymanagement.py
      - test_externalptr.py
      - test_vectors.py
      - test_openrlib.py
      - test_vector_numpy.py
      - test_environment.py
      - test_bufferprotocol.py
      - test_endr.py
      - test_vector_lang.py
      - test_vector_bool.py
      - test_symbol.py
      - test_vector_int.py
      - test_vector_float.py
      - test_vector_list.py
      - test_functions.py
      - __init__.py
      - test_na.py
      - test_vector_byte.py
      - test_vector_str.py
      - test_vector_complex.py
      - test_sexp.py
  - interactive
    - process_revents.py
    - packages.py
    - __init__.py
  - rinterface.py
- install_r_packages.r
- README.rst
- setup.py
- .travis.yml
- scripts
  - run_tests.sh
  - R_run.bat
  - run_linting.sh
- MANIFEST.in
- doc
  - notebooks.rst
  - graphicaldevices.rst
  - Makefile
  - make.bat
  - robjects_functions.rst
  - callbacks.rst
  - numpy.rst
  - conda_environment.yml
  - rinterface-memorymanagement.rst
  - robjects.rst
  - rhelp.rst
  - introduction.rst
  - robjects_environments.rst
  - miscellaneous.rst
  - interactive.rst
  - performances.rst
  - porting-to-rpy2.rst
  - robjects_serialization.rst
  - rlike.rst
  - server.rst
  - overview.rst
  - appendix.rst
  - vector.rst
  - robjects_oop.rst
  - getting-started.rst
  - robjects_overview.rst
  - high-level.rst
  - robjects_rpackages.rst
  - related_projects.rst
  - notebooks
    - introduction_nb.md
    - dplyr.md
    - pandas.md
    - jupyter.md
    - tidyr.md
    - s4class.md
  - pandas.rst
  - robjects_robjects.rst
  - changes.rst
  - robjects_rinstance.rst
  - requirements.txt
  - index.rst
  - conf.py
  - graphics.rst
  - rinterface.rst
  - robjects_formulae.rst
  - robjects_convert.rst
  - lib_dplyr.rst
  - _static
    - notebooks
      - s4class.ipynb
      - dplyr.ipynb
      - pandas.ipynb
      - tidyr.ipynb
    - demos
      - s4classes.py
      - multiproc_lab.py
      - graphics.py
      - rpyclient.py
      - example01.py
      - radmin.py
      - rpyserve.py
      - benchmarks.py

import pytest
import rpy2.robjects as robjects
import rpy2.robjects.language as lg
from rpy2 import rinterface
from rpy2.rinterface_lib import embedded


@pytest.fixture(scope='module')
def clean_globalenv():
    yield
    for name in robjects.globalenv.keys():
        del robjects.globalenv[name]


def test_eval(clean_globalenv):
    code = """
    x <- 1+2
    y <- (x+1) / 2
    """
    res = lg.eval(code)
    assert 'x' in robjects.globalenv.keys()
    assert robjects.globalenv['x'][0] == 3
    assert 'y' in robjects.globalenv.keys()
    assert robjects.globalenv['y'][0] == 2

    
def testeval_in_environment(clean_globalenv):
    code = """
    x <- 1+2
    y <- (x+1) / 2
    """
    env = robjects.Environment()
    res = lg.eval(code, envir=env)
    assert 'x' in env.keys()
    assert env['x'][0] == 3
    assert 'y' in env.keys()
    assert env['y'][0] == 2


def test_LangVector_from_string():
    lang_obj = lg.LangVector.from_string('1+2')
    assert lang_obj.typeof == rinterface.RTYPES.LANGSXP


def test_LangVector_repr():
    lang_obj = lg.LangVector.from_string('1+2')
    assert repr(lang_obj) == 'Rlang( 1 + 2 )'


def test_LangVector_from_string_invalid():
    with pytest.raises(embedded.RRuntimeError):
        lang_obj = lg.LangVector.from_string(1)