c2
This commit is contained in:
parent
6b81c1678a
commit
7678673748
1
.gitignore
vendored
1
.gitignore
vendored
@ -2,3 +2,4 @@
|
||||
.ccls-cache
|
||||
a.out
|
||||
*.o
|
||||
.cache
|
||||
|
||||
764
c2/.clang-format
Normal file
764
c2/.clang-format
Normal file
@ -0,0 +1,764 @@
|
||||
# SPDX-License-Identifier: GPL-2.0
|
||||
#
|
||||
# clang-format configuration file. Intended for clang-format >= 11.
|
||||
#
|
||||
# For more information, see:
|
||||
#
|
||||
# Documentation/dev-tools/clang-format.rst
|
||||
# https://clang.llvm.org/docs/ClangFormat.html
|
||||
# https://clang.llvm.org/docs/ClangFormatStyleOptions.html
|
||||
#
|
||||
---
|
||||
AccessModifierOffset: -4
|
||||
AlignAfterOpenBracket: Align
|
||||
AlignConsecutiveAssignments: false
|
||||
AlignConsecutiveDeclarations: false
|
||||
AlignEscapedNewlines: Left
|
||||
AlignOperands: true
|
||||
AlignTrailingComments: false
|
||||
AllowAllParametersOfDeclarationOnNextLine: false
|
||||
AllowShortBlocksOnASingleLine: false
|
||||
AllowShortCaseLabelsOnASingleLine: false
|
||||
AllowShortFunctionsOnASingleLine: None
|
||||
AllowShortIfStatementsOnASingleLine: false
|
||||
AllowShortLoopsOnASingleLine: false
|
||||
AlwaysBreakAfterDefinitionReturnType: None
|
||||
AlwaysBreakAfterReturnType: None
|
||||
AlwaysBreakBeforeMultilineStrings: false
|
||||
AlwaysBreakTemplateDeclarations: false
|
||||
BinPackArguments: true
|
||||
BinPackParameters: true
|
||||
BraceWrapping:
|
||||
AfterClass: false
|
||||
AfterControlStatement: false
|
||||
AfterEnum: false
|
||||
AfterFunction: true
|
||||
AfterNamespace: true
|
||||
AfterObjCDeclaration: false
|
||||
AfterStruct: false
|
||||
AfterUnion: false
|
||||
AfterExternBlock: false
|
||||
BeforeCatch: false
|
||||
BeforeElse: false
|
||||
IndentBraces: false
|
||||
SplitEmptyFunction: true
|
||||
SplitEmptyRecord: true
|
||||
SplitEmptyNamespace: true
|
||||
BreakBeforeBinaryOperators: None
|
||||
BreakBeforeBraces: Custom
|
||||
BreakBeforeInheritanceComma: false
|
||||
BreakBeforeTernaryOperators: false
|
||||
BreakConstructorInitializersBeforeComma: false
|
||||
BreakConstructorInitializers: BeforeComma
|
||||
BreakAfterJavaFieldAnnotations: false
|
||||
BreakStringLiterals: false
|
||||
ColumnLimit: 80
|
||||
CommentPragmas: '^ IWYU pragma:'
|
||||
CompactNamespaces: false
|
||||
ConstructorInitializerAllOnOneLineOrOnePerLine: false
|
||||
ConstructorInitializerIndentWidth: 8
|
||||
ContinuationIndentWidth: 8
|
||||
Cpp11BracedListStyle: false
|
||||
DerivePointerAlignment: false
|
||||
DisableFormat: false
|
||||
ExperimentalAutoDetectBinPacking: false
|
||||
FixNamespaceComments: false
|
||||
|
||||
# Taken from:
|
||||
# git grep -h '^#define [^[:space:]]*for_each[^[:space:]]*(' include/ tools/ \
|
||||
# | sed "s,^#define \([^[:space:]]*for_each[^[:space:]]*\)(.*$, - '\1'," \
|
||||
# | LC_ALL=C sort -u
|
||||
ForEachMacros:
|
||||
- '__ata_qc_for_each'
|
||||
- '__bio_for_each_bvec'
|
||||
- '__bio_for_each_segment'
|
||||
- '__evlist__for_each_entry'
|
||||
- '__evlist__for_each_entry_continue'
|
||||
- '__evlist__for_each_entry_from'
|
||||
- '__evlist__for_each_entry_reverse'
|
||||
- '__evlist__for_each_entry_safe'
|
||||
- '__for_each_mem_range'
|
||||
- '__for_each_mem_range_rev'
|
||||
- '__for_each_thread'
|
||||
- '__hlist_for_each_rcu'
|
||||
- '__map__for_each_symbol_by_name'
|
||||
- '__pci_bus_for_each_res0'
|
||||
- '__pci_bus_for_each_res1'
|
||||
- '__pci_dev_for_each_res0'
|
||||
- '__pci_dev_for_each_res1'
|
||||
- '__perf_evlist__for_each_entry'
|
||||
- '__perf_evlist__for_each_entry_reverse'
|
||||
- '__perf_evlist__for_each_entry_safe'
|
||||
- '__rq_for_each_bio'
|
||||
- '__shost_for_each_device'
|
||||
- '__sym_for_each'
|
||||
- 'apei_estatus_for_each_section'
|
||||
- 'ata_for_each_dev'
|
||||
- 'ata_for_each_link'
|
||||
- 'ata_qc_for_each'
|
||||
- 'ata_qc_for_each_raw'
|
||||
- 'ata_qc_for_each_with_internal'
|
||||
- 'ax25_for_each'
|
||||
- 'ax25_uid_for_each'
|
||||
- 'bio_for_each_bvec'
|
||||
- 'bio_for_each_bvec_all'
|
||||
- 'bio_for_each_folio_all'
|
||||
- 'bio_for_each_integrity_vec'
|
||||
- 'bio_for_each_segment'
|
||||
- 'bio_for_each_segment_all'
|
||||
- 'bio_list_for_each'
|
||||
- 'bip_for_each_vec'
|
||||
- 'bond_for_each_slave'
|
||||
- 'bond_for_each_slave_rcu'
|
||||
- 'bpf_for_each'
|
||||
- 'bpf_for_each_reg_in_vstate'
|
||||
- 'bpf_for_each_reg_in_vstate_mask'
|
||||
- 'bpf_for_each_spilled_reg'
|
||||
- 'bpf_object__for_each_map'
|
||||
- 'bpf_object__for_each_program'
|
||||
- 'btree_for_each_safe128'
|
||||
- 'btree_for_each_safe32'
|
||||
- 'btree_for_each_safe64'
|
||||
- 'btree_for_each_safel'
|
||||
- 'card_for_each_dev'
|
||||
- 'cgroup_taskset_for_each'
|
||||
- 'cgroup_taskset_for_each_leader'
|
||||
- 'cpu_aggr_map__for_each_idx'
|
||||
- 'cpufreq_for_each_efficient_entry_idx'
|
||||
- 'cpufreq_for_each_entry'
|
||||
- 'cpufreq_for_each_entry_idx'
|
||||
- 'cpufreq_for_each_valid_entry'
|
||||
- 'cpufreq_for_each_valid_entry_idx'
|
||||
- 'css_for_each_child'
|
||||
- 'css_for_each_descendant_post'
|
||||
- 'css_for_each_descendant_pre'
|
||||
- 'damon_for_each_region'
|
||||
- 'damon_for_each_region_from'
|
||||
- 'damon_for_each_region_safe'
|
||||
- 'damon_for_each_scheme'
|
||||
- 'damon_for_each_scheme_safe'
|
||||
- 'damon_for_each_target'
|
||||
- 'damon_for_each_target_safe'
|
||||
- 'damos_for_each_filter'
|
||||
- 'damos_for_each_filter_safe'
|
||||
- 'damos_for_each_quota_goal'
|
||||
- 'damos_for_each_quota_goal_safe'
|
||||
- 'data__for_each_file'
|
||||
- 'data__for_each_file_new'
|
||||
- 'data__for_each_file_start'
|
||||
- 'device_for_each_child_node'
|
||||
- 'device_for_each_child_node_scoped'
|
||||
- 'dma_fence_array_for_each'
|
||||
- 'dma_fence_chain_for_each'
|
||||
- 'dma_fence_unwrap_for_each'
|
||||
- 'dma_resv_for_each_fence'
|
||||
- 'dma_resv_for_each_fence_unlocked'
|
||||
- 'do_for_each_ftrace_op'
|
||||
- 'drm_atomic_crtc_for_each_plane'
|
||||
- 'drm_atomic_crtc_state_for_each_plane'
|
||||
- 'drm_atomic_crtc_state_for_each_plane_state'
|
||||
- 'drm_atomic_for_each_plane_damage'
|
||||
- 'drm_client_for_each_connector_iter'
|
||||
- 'drm_client_for_each_modeset'
|
||||
- 'drm_connector_for_each_possible_encoder'
|
||||
- 'drm_exec_for_each_locked_object'
|
||||
- 'drm_exec_for_each_locked_object_reverse'
|
||||
- 'drm_for_each_bridge_in_chain'
|
||||
- 'drm_for_each_connector_iter'
|
||||
- 'drm_for_each_crtc'
|
||||
- 'drm_for_each_crtc_reverse'
|
||||
- 'drm_for_each_encoder'
|
||||
- 'drm_for_each_encoder_mask'
|
||||
- 'drm_for_each_fb'
|
||||
- 'drm_for_each_legacy_plane'
|
||||
- 'drm_for_each_plane'
|
||||
- 'drm_for_each_plane_mask'
|
||||
- 'drm_for_each_privobj'
|
||||
- 'drm_gem_for_each_gpuvm_bo'
|
||||
- 'drm_gem_for_each_gpuvm_bo_safe'
|
||||
- 'drm_gpuva_for_each_op'
|
||||
- 'drm_gpuva_for_each_op_from_reverse'
|
||||
- 'drm_gpuva_for_each_op_reverse'
|
||||
- 'drm_gpuva_for_each_op_safe'
|
||||
- 'drm_gpuvm_bo_for_each_va'
|
||||
- 'drm_gpuvm_bo_for_each_va_safe'
|
||||
- 'drm_gpuvm_for_each_va'
|
||||
- 'drm_gpuvm_for_each_va_range'
|
||||
- 'drm_gpuvm_for_each_va_range_safe'
|
||||
- 'drm_gpuvm_for_each_va_safe'
|
||||
- 'drm_mm_for_each_hole'
|
||||
- 'drm_mm_for_each_node'
|
||||
- 'drm_mm_for_each_node_in_range'
|
||||
- 'drm_mm_for_each_node_safe'
|
||||
- 'dsa_switch_for_each_available_port'
|
||||
- 'dsa_switch_for_each_cpu_port'
|
||||
- 'dsa_switch_for_each_cpu_port_continue_reverse'
|
||||
- 'dsa_switch_for_each_port'
|
||||
- 'dsa_switch_for_each_port_continue_reverse'
|
||||
- 'dsa_switch_for_each_port_safe'
|
||||
- 'dsa_switch_for_each_user_port'
|
||||
- 'dsa_switch_for_each_user_port_continue_reverse'
|
||||
- 'dsa_tree_for_each_cpu_port'
|
||||
- 'dsa_tree_for_each_user_port'
|
||||
- 'dsa_tree_for_each_user_port_continue_reverse'
|
||||
- 'dso__for_each_symbol'
|
||||
- 'elf_hash_for_each_possible'
|
||||
- 'elf_symtab__for_each_symbol'
|
||||
- 'evlist__for_each_cpu'
|
||||
- 'evlist__for_each_entry'
|
||||
- 'evlist__for_each_entry_continue'
|
||||
- 'evlist__for_each_entry_from'
|
||||
- 'evlist__for_each_entry_reverse'
|
||||
- 'evlist__for_each_entry_safe'
|
||||
- 'flow_action_for_each'
|
||||
- 'for_each_acpi_consumer_dev'
|
||||
- 'for_each_acpi_dev_match'
|
||||
- 'for_each_active_dev_scope'
|
||||
- 'for_each_active_drhd_unit'
|
||||
- 'for_each_active_iommu'
|
||||
- 'for_each_active_route'
|
||||
- 'for_each_aggr_pgid'
|
||||
- 'for_each_and_bit'
|
||||
- 'for_each_andnot_bit'
|
||||
- 'for_each_available_child_of_node'
|
||||
- 'for_each_available_child_of_node_scoped'
|
||||
- 'for_each_bench'
|
||||
- 'for_each_bio'
|
||||
- 'for_each_board_func_rsrc'
|
||||
- 'for_each_btf_ext_rec'
|
||||
- 'for_each_btf_ext_sec'
|
||||
- 'for_each_bvec'
|
||||
- 'for_each_card_auxs'
|
||||
- 'for_each_card_auxs_safe'
|
||||
- 'for_each_card_components'
|
||||
- 'for_each_card_dapms'
|
||||
- 'for_each_card_pre_auxs'
|
||||
- 'for_each_card_prelinks'
|
||||
- 'for_each_card_rtds'
|
||||
- 'for_each_card_rtds_safe'
|
||||
- 'for_each_card_widgets'
|
||||
- 'for_each_card_widgets_safe'
|
||||
- 'for_each_cgroup_storage_type'
|
||||
- 'for_each_child_of_node'
|
||||
- 'for_each_child_of_node_scoped'
|
||||
- 'for_each_clear_bit'
|
||||
- 'for_each_clear_bit_from'
|
||||
- 'for_each_clear_bitrange'
|
||||
- 'for_each_clear_bitrange_from'
|
||||
- 'for_each_cmd'
|
||||
- 'for_each_cmsghdr'
|
||||
- 'for_each_collection'
|
||||
- 'for_each_comp_order'
|
||||
- 'for_each_compatible_node'
|
||||
- 'for_each_component_dais'
|
||||
- 'for_each_component_dais_safe'
|
||||
- 'for_each_conduit'
|
||||
- 'for_each_console'
|
||||
- 'for_each_console_srcu'
|
||||
- 'for_each_cpu'
|
||||
- 'for_each_cpu_and'
|
||||
- 'for_each_cpu_andnot'
|
||||
- 'for_each_cpu_from'
|
||||
- 'for_each_cpu_or'
|
||||
- 'for_each_cpu_wrap'
|
||||
- 'for_each_dapm_widgets'
|
||||
- 'for_each_dedup_cand'
|
||||
- 'for_each_dev_addr'
|
||||
- 'for_each_dev_scope'
|
||||
- 'for_each_dma_cap_mask'
|
||||
- 'for_each_dpcm_be'
|
||||
- 'for_each_dpcm_be_rollback'
|
||||
- 'for_each_dpcm_be_safe'
|
||||
- 'for_each_dpcm_fe'
|
||||
- 'for_each_drhd_unit'
|
||||
- 'for_each_dss_dev'
|
||||
- 'for_each_efi_memory_desc'
|
||||
- 'for_each_efi_memory_desc_in_map'
|
||||
- 'for_each_element'
|
||||
- 'for_each_element_extid'
|
||||
- 'for_each_element_id'
|
||||
- 'for_each_enabled_cpu'
|
||||
- 'for_each_endpoint_of_node'
|
||||
- 'for_each_event'
|
||||
- 'for_each_event_tps'
|
||||
- 'for_each_evictable_lru'
|
||||
- 'for_each_fib6_node_rt_rcu'
|
||||
- 'for_each_fib6_walker_rt'
|
||||
- 'for_each_file_lock'
|
||||
- 'for_each_free_mem_pfn_range_in_zone_from'
|
||||
- 'for_each_free_mem_range'
|
||||
- 'for_each_free_mem_range_reverse'
|
||||
- 'for_each_func_rsrc'
|
||||
- 'for_each_gpiochip_node'
|
||||
- 'for_each_group_evsel'
|
||||
- 'for_each_group_evsel_head'
|
||||
- 'for_each_group_member'
|
||||
- 'for_each_group_member_head'
|
||||
- 'for_each_hstate'
|
||||
- 'for_each_hwgpio'
|
||||
- 'for_each_if'
|
||||
- 'for_each_inject_fn'
|
||||
- 'for_each_insn'
|
||||
- 'for_each_insn_op_loc'
|
||||
- 'for_each_insn_prefix'
|
||||
- 'for_each_intid'
|
||||
- 'for_each_iommu'
|
||||
- 'for_each_ip_tunnel_rcu'
|
||||
- 'for_each_irq_nr'
|
||||
- 'for_each_lang'
|
||||
- 'for_each_link_ch_maps'
|
||||
- 'for_each_link_codecs'
|
||||
- 'for_each_link_cpus'
|
||||
- 'for_each_link_platforms'
|
||||
- 'for_each_lru'
|
||||
- 'for_each_matching_node'
|
||||
- 'for_each_matching_node_and_match'
|
||||
- 'for_each_media_entity_data_link'
|
||||
- 'for_each_mem_pfn_range'
|
||||
- 'for_each_mem_range'
|
||||
- 'for_each_mem_range_rev'
|
||||
- 'for_each_mem_region'
|
||||
- 'for_each_member'
|
||||
- 'for_each_memory'
|
||||
- 'for_each_migratetype_order'
|
||||
- 'for_each_missing_reg'
|
||||
- 'for_each_mle_subelement'
|
||||
- 'for_each_mod_mem_type'
|
||||
- 'for_each_net'
|
||||
- 'for_each_net_continue_reverse'
|
||||
- 'for_each_net_rcu'
|
||||
- 'for_each_netdev'
|
||||
- 'for_each_netdev_continue'
|
||||
- 'for_each_netdev_continue_rcu'
|
||||
- 'for_each_netdev_continue_reverse'
|
||||
- 'for_each_netdev_dump'
|
||||
- 'for_each_netdev_feature'
|
||||
- 'for_each_netdev_in_bond_rcu'
|
||||
- 'for_each_netdev_rcu'
|
||||
- 'for_each_netdev_reverse'
|
||||
- 'for_each_netdev_safe'
|
||||
- 'for_each_new_connector_in_state'
|
||||
- 'for_each_new_crtc_in_state'
|
||||
- 'for_each_new_mst_mgr_in_state'
|
||||
- 'for_each_new_plane_in_state'
|
||||
- 'for_each_new_plane_in_state_reverse'
|
||||
- 'for_each_new_private_obj_in_state'
|
||||
- 'for_each_new_reg'
|
||||
- 'for_each_nhlt_endpoint'
|
||||
- 'for_each_nhlt_endpoint_fmtcfg'
|
||||
- 'for_each_nhlt_fmtcfg'
|
||||
- 'for_each_node'
|
||||
- 'for_each_node_by_name'
|
||||
- 'for_each_node_by_type'
|
||||
- 'for_each_node_mask'
|
||||
- 'for_each_node_state'
|
||||
- 'for_each_node_with_cpus'
|
||||
- 'for_each_node_with_property'
|
||||
- 'for_each_nonreserved_multicast_dest_pgid'
|
||||
- 'for_each_numa_hop_mask'
|
||||
- 'for_each_of_allnodes'
|
||||
- 'for_each_of_allnodes_from'
|
||||
- 'for_each_of_cpu_node'
|
||||
- 'for_each_of_pci_range'
|
||||
- 'for_each_old_connector_in_state'
|
||||
- 'for_each_old_crtc_in_state'
|
||||
- 'for_each_old_mst_mgr_in_state'
|
||||
- 'for_each_old_plane_in_state'
|
||||
- 'for_each_old_private_obj_in_state'
|
||||
- 'for_each_oldnew_connector_in_state'
|
||||
- 'for_each_oldnew_crtc_in_state'
|
||||
- 'for_each_oldnew_mst_mgr_in_state'
|
||||
- 'for_each_oldnew_plane_in_state'
|
||||
- 'for_each_oldnew_plane_in_state_reverse'
|
||||
- 'for_each_oldnew_private_obj_in_state'
|
||||
- 'for_each_online_cpu'
|
||||
- 'for_each_online_node'
|
||||
- 'for_each_online_pgdat'
|
||||
- 'for_each_or_bit'
|
||||
- 'for_each_path'
|
||||
- 'for_each_pci_bridge'
|
||||
- 'for_each_pci_dev'
|
||||
- 'for_each_pcm_streams'
|
||||
- 'for_each_physmem_range'
|
||||
- 'for_each_populated_zone'
|
||||
- 'for_each_possible_cpu'
|
||||
- 'for_each_present_blessed_reg'
|
||||
- 'for_each_present_cpu'
|
||||
- 'for_each_prime_number'
|
||||
- 'for_each_prime_number_from'
|
||||
- 'for_each_probe_cache_entry'
|
||||
- 'for_each_process'
|
||||
- 'for_each_process_thread'
|
||||
- 'for_each_prop_codec_conf'
|
||||
- 'for_each_prop_dai_codec'
|
||||
- 'for_each_prop_dai_cpu'
|
||||
- 'for_each_prop_dlc_codecs'
|
||||
- 'for_each_prop_dlc_cpus'
|
||||
- 'for_each_prop_dlc_platforms'
|
||||
- 'for_each_property_of_node'
|
||||
- 'for_each_reg'
|
||||
- 'for_each_reg_filtered'
|
||||
- 'for_each_reloc'
|
||||
- 'for_each_reloc_from'
|
||||
- 'for_each_requested_gpio'
|
||||
- 'for_each_requested_gpio_in_range'
|
||||
- 'for_each_reserved_child_of_node'
|
||||
- 'for_each_reserved_mem_range'
|
||||
- 'for_each_reserved_mem_region'
|
||||
- 'for_each_rtd_ch_maps'
|
||||
- 'for_each_rtd_codec_dais'
|
||||
- 'for_each_rtd_components'
|
||||
- 'for_each_rtd_cpu_dais'
|
||||
- 'for_each_rtd_dais'
|
||||
- 'for_each_rtd_dais_reverse'
|
||||
- 'for_each_sband_iftype_data'
|
||||
- 'for_each_script'
|
||||
- 'for_each_sec'
|
||||
- 'for_each_set_bit'
|
||||
- 'for_each_set_bit_from'
|
||||
- 'for_each_set_bit_wrap'
|
||||
- 'for_each_set_bitrange'
|
||||
- 'for_each_set_bitrange_from'
|
||||
- 'for_each_set_clump8'
|
||||
- 'for_each_sg'
|
||||
- 'for_each_sg_dma_page'
|
||||
- 'for_each_sg_page'
|
||||
- 'for_each_sgtable_dma_page'
|
||||
- 'for_each_sgtable_dma_sg'
|
||||
- 'for_each_sgtable_page'
|
||||
- 'for_each_sgtable_sg'
|
||||
- 'for_each_sibling_event'
|
||||
- 'for_each_sta_active_link'
|
||||
- 'for_each_subelement'
|
||||
- 'for_each_subelement_extid'
|
||||
- 'for_each_subelement_id'
|
||||
- 'for_each_sublist'
|
||||
- 'for_each_subsystem'
|
||||
- 'for_each_supported_activate_fn'
|
||||
- 'for_each_supported_inject_fn'
|
||||
- 'for_each_sym'
|
||||
- 'for_each_test'
|
||||
- 'for_each_thread'
|
||||
- 'for_each_token'
|
||||
- 'for_each_unicast_dest_pgid'
|
||||
- 'for_each_valid_link'
|
||||
- 'for_each_vif_active_link'
|
||||
- 'for_each_vma'
|
||||
- 'for_each_vma_range'
|
||||
- 'for_each_vsi'
|
||||
- 'for_each_wakeup_source'
|
||||
- 'for_each_zone'
|
||||
- 'for_each_zone_zonelist'
|
||||
- 'for_each_zone_zonelist_nodemask'
|
||||
- 'func_for_each_insn'
|
||||
- 'fwnode_for_each_available_child_node'
|
||||
- 'fwnode_for_each_child_node'
|
||||
- 'fwnode_for_each_parent_node'
|
||||
- 'fwnode_graph_for_each_endpoint'
|
||||
- 'gadget_for_each_ep'
|
||||
- 'genradix_for_each'
|
||||
- 'genradix_for_each_from'
|
||||
- 'genradix_for_each_reverse'
|
||||
- 'hash_for_each'
|
||||
- 'hash_for_each_possible'
|
||||
- 'hash_for_each_possible_rcu'
|
||||
- 'hash_for_each_possible_rcu_notrace'
|
||||
- 'hash_for_each_possible_safe'
|
||||
- 'hash_for_each_rcu'
|
||||
- 'hash_for_each_safe'
|
||||
- 'hashmap__for_each_entry'
|
||||
- 'hashmap__for_each_entry_safe'
|
||||
- 'hashmap__for_each_key_entry'
|
||||
- 'hashmap__for_each_key_entry_safe'
|
||||
- 'hctx_for_each_ctx'
|
||||
- 'hists__for_each_format'
|
||||
- 'hists__for_each_sort_list'
|
||||
- 'hlist_bl_for_each_entry'
|
||||
- 'hlist_bl_for_each_entry_rcu'
|
||||
- 'hlist_bl_for_each_entry_safe'
|
||||
- 'hlist_for_each'
|
||||
- 'hlist_for_each_entry'
|
||||
- 'hlist_for_each_entry_continue'
|
||||
- 'hlist_for_each_entry_continue_rcu'
|
||||
- 'hlist_for_each_entry_continue_rcu_bh'
|
||||
- 'hlist_for_each_entry_from'
|
||||
- 'hlist_for_each_entry_from_rcu'
|
||||
- 'hlist_for_each_entry_rcu'
|
||||
- 'hlist_for_each_entry_rcu_bh'
|
||||
- 'hlist_for_each_entry_rcu_notrace'
|
||||
- 'hlist_for_each_entry_safe'
|
||||
- 'hlist_for_each_entry_srcu'
|
||||
- 'hlist_for_each_safe'
|
||||
- 'hlist_nulls_for_each_entry'
|
||||
- 'hlist_nulls_for_each_entry_from'
|
||||
- 'hlist_nulls_for_each_entry_rcu'
|
||||
- 'hlist_nulls_for_each_entry_safe'
|
||||
- 'i3c_bus_for_each_i2cdev'
|
||||
- 'i3c_bus_for_each_i3cdev'
|
||||
- 'idr_for_each_entry'
|
||||
- 'idr_for_each_entry_continue'
|
||||
- 'idr_for_each_entry_continue_ul'
|
||||
- 'idr_for_each_entry_ul'
|
||||
- 'in_dev_for_each_ifa_rcu'
|
||||
- 'in_dev_for_each_ifa_rtnl'
|
||||
- 'inet_bind_bucket_for_each'
|
||||
- 'interval_tree_for_each_span'
|
||||
- 'intlist__for_each_entry'
|
||||
- 'intlist__for_each_entry_safe'
|
||||
- 'kcore_copy__for_each_phdr'
|
||||
- 'key_for_each'
|
||||
- 'key_for_each_safe'
|
||||
- 'klp_for_each_func'
|
||||
- 'klp_for_each_func_safe'
|
||||
- 'klp_for_each_func_static'
|
||||
- 'klp_for_each_object'
|
||||
- 'klp_for_each_object_safe'
|
||||
- 'klp_for_each_object_static'
|
||||
- 'kunit_suite_for_each_test_case'
|
||||
- 'kvm_for_each_memslot'
|
||||
- 'kvm_for_each_memslot_in_gfn_range'
|
||||
- 'kvm_for_each_vcpu'
|
||||
- 'libbpf_nla_for_each_attr'
|
||||
- 'list_for_each'
|
||||
- 'list_for_each_codec'
|
||||
- 'list_for_each_codec_safe'
|
||||
- 'list_for_each_continue'
|
||||
- 'list_for_each_entry'
|
||||
- 'list_for_each_entry_continue'
|
||||
- 'list_for_each_entry_continue_rcu'
|
||||
- 'list_for_each_entry_continue_reverse'
|
||||
- 'list_for_each_entry_from'
|
||||
- 'list_for_each_entry_from_rcu'
|
||||
- 'list_for_each_entry_from_reverse'
|
||||
- 'list_for_each_entry_lockless'
|
||||
- 'list_for_each_entry_rcu'
|
||||
- 'list_for_each_entry_reverse'
|
||||
- 'list_for_each_entry_safe'
|
||||
- 'list_for_each_entry_safe_continue'
|
||||
- 'list_for_each_entry_safe_from'
|
||||
- 'list_for_each_entry_safe_reverse'
|
||||
- 'list_for_each_entry_srcu'
|
||||
- 'list_for_each_from'
|
||||
- 'list_for_each_prev'
|
||||
- 'list_for_each_prev_safe'
|
||||
- 'list_for_each_rcu'
|
||||
- 'list_for_each_reverse'
|
||||
- 'list_for_each_safe'
|
||||
- 'llist_for_each'
|
||||
- 'llist_for_each_entry'
|
||||
- 'llist_for_each_entry_safe'
|
||||
- 'llist_for_each_safe'
|
||||
- 'lwq_for_each_safe'
|
||||
- 'map__for_each_symbol'
|
||||
- 'map__for_each_symbol_by_name'
|
||||
- 'mas_for_each'
|
||||
- 'mci_for_each_dimm'
|
||||
- 'media_device_for_each_entity'
|
||||
- 'media_device_for_each_intf'
|
||||
- 'media_device_for_each_link'
|
||||
- 'media_device_for_each_pad'
|
||||
- 'media_entity_for_each_pad'
|
||||
- 'media_pipeline_for_each_entity'
|
||||
- 'media_pipeline_for_each_pad'
|
||||
- 'mlx5_lag_for_each_peer_mdev'
|
||||
- 'msi_domain_for_each_desc'
|
||||
- 'msi_for_each_desc'
|
||||
- 'mt_for_each'
|
||||
- 'nanddev_io_for_each_page'
|
||||
- 'netdev_for_each_lower_dev'
|
||||
- 'netdev_for_each_lower_private'
|
||||
- 'netdev_for_each_lower_private_rcu'
|
||||
- 'netdev_for_each_mc_addr'
|
||||
- 'netdev_for_each_synced_mc_addr'
|
||||
- 'netdev_for_each_synced_uc_addr'
|
||||
- 'netdev_for_each_uc_addr'
|
||||
- 'netdev_for_each_upper_dev_rcu'
|
||||
- 'netdev_hw_addr_list_for_each'
|
||||
- 'nft_rule_for_each_expr'
|
||||
- 'nla_for_each_attr'
|
||||
- 'nla_for_each_attr_type'
|
||||
- 'nla_for_each_nested'
|
||||
- 'nla_for_each_nested_type'
|
||||
- 'nlmsg_for_each_attr'
|
||||
- 'nlmsg_for_each_msg'
|
||||
- 'nr_neigh_for_each'
|
||||
- 'nr_neigh_for_each_safe'
|
||||
- 'nr_node_for_each'
|
||||
- 'nr_node_for_each_safe'
|
||||
- 'of_for_each_phandle'
|
||||
- 'of_property_for_each_string'
|
||||
- 'of_property_for_each_u32'
|
||||
- 'pci_bus_for_each_resource'
|
||||
- 'pci_dev_for_each_resource'
|
||||
- 'pcl_for_each_chunk'
|
||||
- 'pcl_for_each_segment'
|
||||
- 'pcm_for_each_format'
|
||||
- 'perf_config_items__for_each_entry'
|
||||
- 'perf_config_sections__for_each_entry'
|
||||
- 'perf_config_set__for_each_entry'
|
||||
- 'perf_cpu_map__for_each_cpu'
|
||||
- 'perf_cpu_map__for_each_cpu_skip_any'
|
||||
- 'perf_cpu_map__for_each_idx'
|
||||
- 'perf_evlist__for_each_entry'
|
||||
- 'perf_evlist__for_each_entry_reverse'
|
||||
- 'perf_evlist__for_each_entry_safe'
|
||||
- 'perf_evlist__for_each_evsel'
|
||||
- 'perf_evlist__for_each_mmap'
|
||||
- 'perf_hpp_list__for_each_format'
|
||||
- 'perf_hpp_list__for_each_format_safe'
|
||||
- 'perf_hpp_list__for_each_sort_list'
|
||||
- 'perf_hpp_list__for_each_sort_list_safe'
|
||||
- 'perf_tool_event__for_each_event'
|
||||
- 'plist_for_each'
|
||||
- 'plist_for_each_continue'
|
||||
- 'plist_for_each_entry'
|
||||
- 'plist_for_each_entry_continue'
|
||||
- 'plist_for_each_entry_safe'
|
||||
- 'plist_for_each_safe'
|
||||
- 'pnp_for_each_card'
|
||||
- 'pnp_for_each_dev'
|
||||
- 'protocol_for_each_card'
|
||||
- 'protocol_for_each_dev'
|
||||
- 'queue_for_each_hw_ctx'
|
||||
- 'radix_tree_for_each_slot'
|
||||
- 'radix_tree_for_each_tagged'
|
||||
- 'rb_for_each'
|
||||
- 'rbtree_postorder_for_each_entry_safe'
|
||||
- 'rdma_for_each_block'
|
||||
- 'rdma_for_each_port'
|
||||
- 'rdma_umem_for_each_dma_block'
|
||||
- 'resort_rb__for_each_entry'
|
||||
- 'resource_list_for_each_entry'
|
||||
- 'resource_list_for_each_entry_safe'
|
||||
- 'rhl_for_each_entry_rcu'
|
||||
- 'rhl_for_each_rcu'
|
||||
- 'rht_for_each'
|
||||
- 'rht_for_each_entry'
|
||||
- 'rht_for_each_entry_from'
|
||||
- 'rht_for_each_entry_rcu'
|
||||
- 'rht_for_each_entry_rcu_from'
|
||||
- 'rht_for_each_entry_safe'
|
||||
- 'rht_for_each_from'
|
||||
- 'rht_for_each_rcu'
|
||||
- 'rht_for_each_rcu_from'
|
||||
- 'rq_for_each_bvec'
|
||||
- 'rq_for_each_segment'
|
||||
- 'rq_list_for_each'
|
||||
- 'rq_list_for_each_safe'
|
||||
- 'sample_read_group__for_each'
|
||||
- 'scsi_for_each_prot_sg'
|
||||
- 'scsi_for_each_sg'
|
||||
- 'sctp_for_each_hentry'
|
||||
- 'sctp_skb_for_each'
|
||||
- 'sec_for_each_insn'
|
||||
- 'sec_for_each_insn_continue'
|
||||
- 'sec_for_each_insn_from'
|
||||
- 'sec_for_each_sym'
|
||||
- 'shdma_for_each_chan'
|
||||
- 'shost_for_each_device'
|
||||
- 'sk_for_each'
|
||||
- 'sk_for_each_bound'
|
||||
- 'sk_for_each_entry_offset_rcu'
|
||||
- 'sk_for_each_from'
|
||||
- 'sk_for_each_rcu'
|
||||
- 'sk_for_each_safe'
|
||||
- 'sk_nulls_for_each'
|
||||
- 'sk_nulls_for_each_from'
|
||||
- 'sk_nulls_for_each_rcu'
|
||||
- 'snd_array_for_each'
|
||||
- 'snd_pcm_group_for_each_entry'
|
||||
- 'snd_soc_dapm_widget_for_each_path'
|
||||
- 'snd_soc_dapm_widget_for_each_path_safe'
|
||||
- 'snd_soc_dapm_widget_for_each_sink_path'
|
||||
- 'snd_soc_dapm_widget_for_each_source_path'
|
||||
- 'sparsebit_for_each_set_range'
|
||||
- 'strlist__for_each_entry'
|
||||
- 'strlist__for_each_entry_safe'
|
||||
- 'sym_for_each_insn'
|
||||
- 'sym_for_each_insn_continue_reverse'
|
||||
- 'symbols__for_each_entry'
|
||||
- 'tb_property_for_each'
|
||||
- 'tcf_act_for_each_action'
|
||||
- 'tcf_exts_for_each_action'
|
||||
- 'ttm_resource_manager_for_each_res'
|
||||
- 'udp_portaddr_for_each_entry'
|
||||
- 'udp_portaddr_for_each_entry_rcu'
|
||||
- 'usb_hub_for_each_child'
|
||||
- 'v4l2_device_for_each_subdev'
|
||||
- 'v4l2_m2m_for_each_dst_buf'
|
||||
- 'v4l2_m2m_for_each_dst_buf_safe'
|
||||
- 'v4l2_m2m_for_each_src_buf'
|
||||
- 'v4l2_m2m_for_each_src_buf_safe'
|
||||
- 'virtio_device_for_each_vq'
|
||||
- 'while_for_each_ftrace_op'
|
||||
- 'xa_for_each'
|
||||
- 'xa_for_each_marked'
|
||||
- 'xa_for_each_range'
|
||||
- 'xa_for_each_start'
|
||||
- 'xas_for_each'
|
||||
- 'xas_for_each_conflict'
|
||||
- 'xas_for_each_marked'
|
||||
- 'xbc_array_for_each_value'
|
||||
- 'xbc_for_each_key_value'
|
||||
- 'xbc_node_for_each_array_value'
|
||||
- 'xbc_node_for_each_child'
|
||||
- 'xbc_node_for_each_key_value'
|
||||
- 'xbc_node_for_each_subkey'
|
||||
- 'ynl_attr_for_each'
|
||||
- 'ynl_attr_for_each_nested'
|
||||
- 'ynl_attr_for_each_payload'
|
||||
- 'zorro_for_each_dev'
|
||||
|
||||
IncludeBlocks: Preserve
|
||||
IncludeCategories:
|
||||
- Regex: '.*'
|
||||
Priority: 1
|
||||
IncludeIsMainRegex: '(Test)?$'
|
||||
IndentCaseLabels: false
|
||||
IndentGotoLabels: false
|
||||
IndentPPDirectives: None
|
||||
IndentWidth: 8
|
||||
IndentWrappedFunctionNames: false
|
||||
JavaScriptQuotes: Leave
|
||||
JavaScriptWrapImports: true
|
||||
KeepEmptyLinesAtTheStartOfBlocks: false
|
||||
MacroBlockBegin: ''
|
||||
MacroBlockEnd: ''
|
||||
MaxEmptyLinesToKeep: 1
|
||||
NamespaceIndentation: None
|
||||
ObjCBinPackProtocolList: Auto
|
||||
ObjCBlockIndentWidth: 8
|
||||
ObjCSpaceAfterProperty: true
|
||||
ObjCSpaceBeforeProtocolList: true
|
||||
|
||||
# Taken from git's rules
|
||||
PenaltyBreakAssignment: 10
|
||||
PenaltyBreakBeforeFirstCallParameter: 30
|
||||
PenaltyBreakComment: 10
|
||||
PenaltyBreakFirstLessLess: 0
|
||||
PenaltyBreakString: 10
|
||||
PenaltyExcessCharacter: 100
|
||||
PenaltyReturnTypeOnItsOwnLine: 60
|
||||
|
||||
PointerAlignment: Right
|
||||
ReflowComments: false
|
||||
SortIncludes: false
|
||||
SortUsingDeclarations: false
|
||||
SpaceAfterCStyleCast: false
|
||||
SpaceAfterTemplateKeyword: true
|
||||
SpaceBeforeAssignmentOperators: true
|
||||
SpaceBeforeCtorInitializerColon: true
|
||||
SpaceBeforeInheritanceColon: true
|
||||
SpaceBeforeParens: ControlStatementsExceptForEachMacros
|
||||
SpaceBeforeRangeBasedForLoopColon: true
|
||||
SpaceInEmptyParentheses: false
|
||||
SpacesBeforeTrailingComments: 1
|
||||
SpacesInAngles: false
|
||||
SpacesInContainerLiterals: false
|
||||
SpacesInCStyleCastParentheses: false
|
||||
SpacesInParentheses: false
|
||||
SpacesInSquareBrackets: false
|
||||
Standard: Cpp03
|
||||
TabWidth: 8
|
||||
UseTab: Always
|
||||
...
|
||||
42
c2/compile_commands.json
Normal file
42
c2/compile_commands.json
Normal file
@ -0,0 +1,42 @@
|
||||
[
|
||||
{
|
||||
"arguments": [
|
||||
"/nix/store/k8mrxviw965lv59hqbln3297jwfffm2w-clang-wrapper-16.0.6/bin/clang",
|
||||
"-g",
|
||||
"-c",
|
||||
"driver.c"
|
||||
],
|
||||
"directory": "/Users/mthomson/dev/personal/modern-compiler-implementation-in-c/c2",
|
||||
"file": "/Users/mthomson/dev/personal/modern-compiler-implementation-in-c/c2/driver.c"
|
||||
},
|
||||
{
|
||||
"arguments": [
|
||||
"/nix/store/k8mrxviw965lv59hqbln3297jwfffm2w-clang-wrapper-16.0.6/bin/clang",
|
||||
"-g",
|
||||
"-c",
|
||||
"lex.yy.c"
|
||||
],
|
||||
"directory": "/Users/mthomson/dev/personal/modern-compiler-implementation-in-c/c2",
|
||||
"file": "/Users/mthomson/dev/personal/modern-compiler-implementation-in-c/c2/lex.yy.c"
|
||||
},
|
||||
{
|
||||
"arguments": [
|
||||
"/nix/store/k8mrxviw965lv59hqbln3297jwfffm2w-clang-wrapper-16.0.6/bin/clang",
|
||||
"-g",
|
||||
"-c",
|
||||
"errormsg.c"
|
||||
],
|
||||
"directory": "/Users/mthomson/dev/personal/modern-compiler-implementation-in-c/c2",
|
||||
"file": "/Users/mthomson/dev/personal/modern-compiler-implementation-in-c/c2/errormsg.c"
|
||||
},
|
||||
{
|
||||
"arguments": [
|
||||
"/nix/store/k8mrxviw965lv59hqbln3297jwfffm2w-clang-wrapper-16.0.6/bin/clang",
|
||||
"-g",
|
||||
"-c",
|
||||
"util.c"
|
||||
],
|
||||
"directory": "/Users/mthomson/dev/personal/modern-compiler-implementation-in-c/c2",
|
||||
"file": "/Users/mthomson/dev/personal/modern-compiler-implementation-in-c/c2/util.c"
|
||||
}
|
||||
]
|
||||
55
c2/driver.c
Normal file
55
c2/driver.c
Normal file
@ -0,0 +1,55 @@
|
||||
#include "errormsg.h"
|
||||
#include "tokens.h"
|
||||
#include "util.h"
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
YYSTYPE yylval;
|
||||
|
||||
int yylex(void); /* prototype for the lexing function */
|
||||
|
||||
string toknames[] = { "ID", "STRING", "INT", "COMMA", "COLON",
|
||||
"SEMICOLON", "LPAREN", "RPAREN", "LBRACK", "RBRACK",
|
||||
"LBRACE", "RBRACE", "DOT", "PLUS", "MINUS",
|
||||
"TIMES", "DIVIDE", "EQ", "NEQ", "LT",
|
||||
"LE", "GT", "GE", "AND", "OR",
|
||||
"ASSIGN", "ARRAY", "IF", "THEN", "ELSE",
|
||||
"WHILE", "FOR", "TO", "DO", "LET",
|
||||
"IN", "END", "OF", "BREAK", "NIL",
|
||||
"FUNCTION", "VAR", "TYPE" };
|
||||
|
||||
string tokname(int tok)
|
||||
{
|
||||
return tok < 257 || tok > 299 ? "BAD_TOKEN" : toknames[tok - 257];
|
||||
}
|
||||
|
||||
int main(int argc, char **argv)
|
||||
{
|
||||
string fname;
|
||||
int tok;
|
||||
if (argc != 2) {
|
||||
fprintf(stderr, "usage: a.out filename\n");
|
||||
exit(1);
|
||||
}
|
||||
fname = argv[1];
|
||||
EM_reset(fname);
|
||||
for (;;) {
|
||||
tok = yylex();
|
||||
if (tok == 0)
|
||||
break;
|
||||
switch (tok) {
|
||||
case ID:
|
||||
case STRING:
|
||||
printf("%10s %4d %s\n", tokname(tok), EM_tokPos,
|
||||
yylval.sval);
|
||||
break;
|
||||
case INT:
|
||||
printf("%10s %4d %d\n", tokname(tok), EM_tokPos,
|
||||
yylval.ival);
|
||||
break;
|
||||
default:
|
||||
printf("%10s %4d\n", tokname(tok), EM_tokPos);
|
||||
}
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
77
c2/errormsg.c
Normal file
77
c2/errormsg.c
Normal file
@ -0,0 +1,77 @@
|
||||
/*
|
||||
* errormsg.c - functions used in all phases of the compiler to give
|
||||
* error messages about the Tiger program.
|
||||
*
|
||||
*/
|
||||
|
||||
#include "errormsg.h"
|
||||
#include "util.h"
|
||||
#include <stdarg.h>
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
bool anyErrors = FALSE;
|
||||
|
||||
static string fileName = "";
|
||||
|
||||
static int lineNum = 1;
|
||||
|
||||
int EM_tokPos = 0;
|
||||
|
||||
extern FILE *yyin;
|
||||
|
||||
typedef struct intList {
|
||||
int i;
|
||||
struct intList *rest;
|
||||
} *IntList;
|
||||
|
||||
static IntList intList(int i, IntList rest)
|
||||
{
|
||||
IntList l = checked_malloc(sizeof *l);
|
||||
l->i = i;
|
||||
l->rest = rest;
|
||||
return l;
|
||||
}
|
||||
|
||||
static IntList linePos = NULL;
|
||||
|
||||
void EM_newline(void)
|
||||
{
|
||||
lineNum++;
|
||||
linePos = intList(EM_tokPos, linePos);
|
||||
}
|
||||
|
||||
void EM_error(int pos, char *message, ...)
|
||||
{
|
||||
va_list ap;
|
||||
IntList lines = linePos;
|
||||
int num = lineNum;
|
||||
|
||||
anyErrors = TRUE;
|
||||
while (lines && lines->i >= pos) {
|
||||
lines = lines->rest;
|
||||
num--;
|
||||
}
|
||||
|
||||
if (fileName)
|
||||
fprintf(stderr, "%s:", fileName);
|
||||
if (lines)
|
||||
fprintf(stderr, "%d.%d: ", num, pos - lines->i);
|
||||
va_start(ap, message);
|
||||
vfprintf(stderr, message, ap);
|
||||
va_end(ap);
|
||||
fprintf(stderr, "\n");
|
||||
}
|
||||
|
||||
void EM_reset(string fname)
|
||||
{
|
||||
anyErrors = FALSE;
|
||||
fileName = fname;
|
||||
lineNum = 1;
|
||||
linePos = intList(0, NULL);
|
||||
yyin = fopen(fname, "r");
|
||||
if (!yyin) {
|
||||
EM_error(0, "cannot open");
|
||||
exit(1);
|
||||
}
|
||||
}
|
||||
15
c2/errormsg.h
Normal file
15
c2/errormsg.h
Normal file
@ -0,0 +1,15 @@
|
||||
#ifndef ERRORMSG_H
|
||||
#define ERRORMSG_H
|
||||
|
||||
#include "util.h"
|
||||
extern bool EM_anyErrors;
|
||||
|
||||
void EM_newline(void);
|
||||
|
||||
extern int EM_tokPos;
|
||||
|
||||
void EM_error(int, string, ...);
|
||||
void EM_impossible(string, ...);
|
||||
void EM_reset(string filename);
|
||||
|
||||
#endif // !ERRORMSG_H
|
||||
2198
c2/lex.yy.c
Normal file
2198
c2/lex.yy.c
Normal file
File diff suppressed because it is too large
Load Diff
BIN
c2/lextest
Executable file
BIN
c2/lextest
Executable file
Binary file not shown.
20
c2/makefile
Normal file
20
c2/makefile
Normal file
@ -0,0 +1,20 @@
|
||||
lextest: driver.o lex.yy.o errormsg.o util.o
|
||||
cc -g -o lextest driver.o lex.yy.o errormsg.o util.o
|
||||
|
||||
driver.o: driver.c tokens.h errormsg.h util.h
|
||||
cc -g -c driver.c
|
||||
|
||||
errormsg.o: errormsg.c errormsg.h util.h
|
||||
cc -g -c errormsg.c
|
||||
|
||||
lex.yy.o: lex.yy.c tokens.h errormsg.h util.h
|
||||
cc -g -c lex.yy.c
|
||||
|
||||
lex.yy.c: tiger.lex
|
||||
lex tiger.lex
|
||||
|
||||
util.o: util.c util.h
|
||||
cc -g -c util.c
|
||||
|
||||
clean:
|
||||
rm -f a.out util.o driver.o lex.yy.o lex.yy.c errormsg.o
|
||||
56
c2/test.tig
Normal file
56
c2/test.tig
Normal file
@ -0,0 +1,56 @@
|
||||
et
|
||||
|
||||
type any = {any : int}
|
||||
var buffer := getchar()
|
||||
|
||||
function readint(any: any) : int =
|
||||
let var i := 0
|
||||
function isdigit(s : string) : int =
|
||||
ord(buffer)>=ord("0") & ord(buffer)<=ord("9")
|
||||
function skipto() =
|
||||
while buffer=" " | buffer="\n"
|
||||
do buffer := getchar()
|
||||
in skipto();
|
||||
any.any := isdigit(buffer);
|
||||
while isdigit(buffer)
|
||||
do (i := i*10+ord(buffer)-ord("0"); buffer := getchar());
|
||||
i
|
||||
end
|
||||
|
||||
type list = {first: int, rest: list}
|
||||
|
||||
function readlist() : list =
|
||||
let var any := any{any=0}
|
||||
var i := readint(any)
|
||||
in if any.any
|
||||
then list{first=i,rest=readlist()}
|
||||
else nil
|
||||
end
|
||||
|
||||
function merge(a: list, b: list) : list =
|
||||
if a=nil then b
|
||||
else if b=nil then a
|
||||
else if a.first < b.first
|
||||
then list{first=a.first,rest=merge(a.rest,b)}
|
||||
else list{first=b.first,rest=merge(a,b.rest)}
|
||||
|
||||
function printint(i: int) =
|
||||
let function f(i:int) = if i>0
|
||||
then (f(i/10); print(chr(i-i/10*10+ord("0"))))
|
||||
in if i<0 then (print("-"); f(-i))
|
||||
else if i>0 then f(i)
|
||||
else print("0")
|
||||
end
|
||||
|
||||
function printlist(l: list) =
|
||||
if l=nil then print("\n")
|
||||
else (printint(l.first); print(" "); printlist(l.rest))
|
||||
|
||||
var list1 := readlist()
|
||||
var list2 := (buffer:=getchar(); readlist())
|
||||
|
||||
|
||||
/* BODY OF MAIN PROGRAM */
|
||||
in printlist(merge(list1,list2))
|
||||
end
|
||||
|
||||
7
c2/test2.tig
Normal file
7
c2/test2.tig
Normal file
@ -0,0 +1,7 @@
|
||||
"hello this \n is \t a \100 test"
|
||||
|
||||
/* this is a comment */
|
||||
|
||||
/* this is a comment too /* even nested */ */
|
||||
|
||||
/* unclosed /* comment */
|
||||
154
c2/tiger.lex
Normal file
154
c2/tiger.lex
Normal file
@ -0,0 +1,154 @@
|
||||
%{
|
||||
#include <string.h>
|
||||
#include "util.h"
|
||||
#include "tokens.h"
|
||||
#include "errormsg.h"
|
||||
|
||||
int charPos=1;
|
||||
|
||||
int commentLevel = 0;
|
||||
|
||||
const int INITIAL_BUF_LENGTH = 32;
|
||||
char *string_buf;
|
||||
char *string_buf_ptr;
|
||||
size_t string_buf_cap;
|
||||
|
||||
void new_string(void) {
|
||||
string_buf = checked_malloc(INITIAL_BUF_LENGTH);
|
||||
*string_buf = '\0';
|
||||
string_buf_cap = INITIAL_BUF_LENGTH;
|
||||
}
|
||||
|
||||
void append(char c) {
|
||||
size_t length = strlen(string_buf);
|
||||
|
||||
if (length + 1 == string_buf_cap) {
|
||||
size_t new_cap = string_buf_cap * 2;
|
||||
char *new_string_buf = checked_malloc(new_cap);
|
||||
memcpy(new_string_buf, string_buf, string_buf_cap);
|
||||
string_buf = new_string_buf;
|
||||
string_buf_cap = new_cap;
|
||||
}
|
||||
string_buf[length] = c;
|
||||
string_buf[length + 1] = '\0';
|
||||
}
|
||||
|
||||
int yywrap(void)
|
||||
{
|
||||
charPos=1;
|
||||
return 1;
|
||||
}
|
||||
|
||||
void adjust(void)
|
||||
{
|
||||
EM_tokPos=charPos;
|
||||
charPos+=yyleng;
|
||||
}
|
||||
|
||||
%}
|
||||
|
||||
%x string
|
||||
%x comment
|
||||
%%
|
||||
|
||||
/* whitespace */
|
||||
\s {adjust(); continue;}
|
||||
" " {adjust(); continue;}
|
||||
\n {adjust(); EM_newline(); continue;}
|
||||
"/*" {adjust(); commentLevel++; BEGIN(comment);}
|
||||
|
||||
/* reserved words */
|
||||
array {adjust(); return ARRAY;}
|
||||
if {adjust(); return IF;}
|
||||
then {adjust(); return THEN;}
|
||||
else {adjust(); return ELSE;}
|
||||
while {adjust(); return WHILE;}
|
||||
for {adjust(); return FOR;}
|
||||
to {adjust(); return TO;}
|
||||
do {adjust(); return DO;}
|
||||
let {adjust(); return LET;}
|
||||
in {adjust(); return IN;}
|
||||
end {adjust(); return END;}
|
||||
of {adjust(); return OF;}
|
||||
break {adjust(); return BREAK;}
|
||||
nil {adjust(); return NIL;}
|
||||
function {adjust(); return FUNCTION;}
|
||||
var {adjust(); return VAR;}
|
||||
type {adjust(); return TYPE;}
|
||||
|
||||
|
||||
/* punctuation */
|
||||
"," {adjust(); return COMMA;}
|
||||
":" {adjust(); return COLON;}
|
||||
";" {adjust(); return SEMICOLON;}
|
||||
"(" {adjust(); return LPAREN;}
|
||||
")" {adjust(); return RPAREN;}
|
||||
"[" {adjust(); return LBRACK;}
|
||||
"]" {adjust(); return RBRACK;}
|
||||
"{" {adjust(); return LBRACE;}
|
||||
"}" {adjust(); return RBRACE;}
|
||||
"." {adjust(); return DOT;}
|
||||
"+" {adjust(); return PLUS;}
|
||||
"-" {adjust(); return MINUS;}
|
||||
"*" {adjust(); return TIMES;}
|
||||
"/" {adjust(); return DIVIDE;}
|
||||
"=" {adjust(); return EQ;}
|
||||
"!=" {adjust(); return NEQ;}
|
||||
"<" {adjust(); return LT;}
|
||||
"<=" {adjust(); return LE;}
|
||||
">" {adjust(); return GT;}
|
||||
">=" {adjust(); return GE;}
|
||||
"&" {adjust(); return AND;}
|
||||
"|" {adjust(); return OR;}
|
||||
":=" {adjust(); return ASSIGN;}
|
||||
|
||||
/* strings */
|
||||
\" {adjust(); new_string(); BEGIN(string);}
|
||||
<string>{
|
||||
\" {
|
||||
adjust();
|
||||
yylval.sval=string_buf;
|
||||
BEGIN(INITIAL);
|
||||
return STRING;
|
||||
}
|
||||
\\[0-9]{3} {
|
||||
adjust();
|
||||
int result;
|
||||
sscanf(yytext+1, "%o", &result);
|
||||
if (result > 0xff) {
|
||||
EM_error(EM_tokPos, "Invalid ASCII escape sequence");
|
||||
yyterminate();
|
||||
}
|
||||
append(result);
|
||||
}
|
||||
\\n {adjust(); append('\n');}
|
||||
\\t {adjust(); append('\t');}
|
||||
\\r {adjust(); append('\r');}
|
||||
\\b {adjust(); append('\b');}
|
||||
\\f {adjust(); append('\f');}
|
||||
\\\" {adjust(); append('"');}
|
||||
\\\\ {adjust(); append('\\');}
|
||||
<<EOF>> {adjust(); EM_error(EM_tokPos, "string EOF");}
|
||||
[^\\\n\"] {adjust(); append(*yytext);}
|
||||
}
|
||||
|
||||
/* comments */
|
||||
<comment>{
|
||||
"*/" {
|
||||
adjust();
|
||||
commentLevel--;
|
||||
if (commentLevel == 0) {
|
||||
BEGIN(INITIAL);
|
||||
}
|
||||
}
|
||||
"/*" {adjust(); commentLevel++;}
|
||||
<<EOF>> {adjust(); EM_error(EM_tokPos, "comment EOF"); yyterminate();}
|
||||
. {adjust();}
|
||||
}
|
||||
|
||||
/* semantic tokens */
|
||||
[0-9]+ {adjust(); yylval.ival=atoi(yytext); return INT;}
|
||||
[a-zA-Z][a-zA-Z0-9]* {adjust(); yylval.sval=yytext; return ID;}
|
||||
. {adjust(); EM_error(EM_tokPos,"illegal token");}
|
||||
|
||||
|
||||
57
c2/tokens.h
Normal file
57
c2/tokens.h
Normal file
@ -0,0 +1,57 @@
|
||||
#ifndef TOKENS_H
|
||||
#define TOKENS_H
|
||||
|
||||
#include "util.h"
|
||||
|
||||
typedef union {
|
||||
int pos;
|
||||
int ival;
|
||||
string sval;
|
||||
} YYSTYPE;
|
||||
extern YYSTYPE yylval;
|
||||
|
||||
#define ID 257
|
||||
#define STRING 258
|
||||
#define INT 259
|
||||
#define COMMA 260
|
||||
#define COLON 261
|
||||
#define SEMICOLON 262
|
||||
#define LPAREN 263
|
||||
#define RPAREN 264
|
||||
#define LBRACK 265
|
||||
#define RBRACK 266
|
||||
#define LBRACE 267
|
||||
#define RBRACE 268
|
||||
#define DOT 269
|
||||
#define PLUS 270
|
||||
#define MINUS 271
|
||||
#define TIMES 272
|
||||
#define DIVIDE 273
|
||||
#define EQ 274
|
||||
#define NEQ 275
|
||||
#define LT 276
|
||||
#define LE 277
|
||||
#define GT 278
|
||||
#define GE 279
|
||||
#define AND 280
|
||||
#define OR 281
|
||||
#define ASSIGN 282
|
||||
#define ARRAY 283
|
||||
#define IF 284
|
||||
#define THEN 285
|
||||
#define ELSE 286
|
||||
#define WHILE 287
|
||||
#define FOR 288
|
||||
#define TO 289
|
||||
#define DO 290
|
||||
#define LET 291
|
||||
#define IN 292
|
||||
#define END 293
|
||||
#define OF 294
|
||||
#define BREAK 295
|
||||
#define NIL 296
|
||||
#define FUNCTION 297
|
||||
#define VAR 298
|
||||
#define TYPE 299
|
||||
|
||||
#endif // !TOKENS_H
|
||||
32
c2/util.c
Normal file
32
c2/util.c
Normal file
@ -0,0 +1,32 @@
|
||||
/*
|
||||
* util.c - commonly used utility functions.
|
||||
*/
|
||||
|
||||
#include "util.h"
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <string.h>
|
||||
void *checked_malloc(int len)
|
||||
{
|
||||
void *p = malloc(len);
|
||||
if (!p) {
|
||||
fprintf(stderr, "\nRan out of memory!\n");
|
||||
exit(1);
|
||||
}
|
||||
return p;
|
||||
}
|
||||
|
||||
string String(char *s)
|
||||
{
|
||||
string p = checked_malloc(strlen(s) + 1);
|
||||
strcpy(p, s);
|
||||
return p;
|
||||
}
|
||||
|
||||
U_boolList U_BoolList(bool head, U_boolList tail)
|
||||
{
|
||||
U_boolList list = checked_malloc(sizeof(*list));
|
||||
list->head = head;
|
||||
list->tail = tail;
|
||||
return list;
|
||||
}
|
||||
22
c2/util.h
Normal file
22
c2/util.h
Normal file
@ -0,0 +1,22 @@
|
||||
#ifndef UTIL_H
|
||||
#define UTIL_H
|
||||
|
||||
#include <assert.h>
|
||||
|
||||
typedef char *string;
|
||||
typedef char bool;
|
||||
|
||||
#define TRUE 1
|
||||
#define FALSE 0
|
||||
|
||||
void *checked_malloc(int);
|
||||
string String(char *);
|
||||
|
||||
typedef struct U_boolList_ *U_boolList;
|
||||
struct U_boolList_ {
|
||||
bool head;
|
||||
U_boolList tail;
|
||||
};
|
||||
U_boolList U_BoolList(bool head, U_boolList tail);
|
||||
|
||||
#endif // !UTIL_H
|
||||
Loading…
x
Reference in New Issue
Block a user